--- notion-id: 393c2940-ac1a-4705-8d54-87d13ae66316 --- 正则表达式(Regular Expression),常被用来检验、替换符合某个模式(规则)的字符串,在代码中常缩写为regexp。 VBA中并没有直接提供正文表达式对象,需要借助VBScript的正则对象。如果使用前期绑定,那么就需要在VBE中引用如下扩展库: ![[IMG-20260516155656120.png]] ![](data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAb8AAAFYCAIAAABMMGUfAAA/k0lEQVR42u2de5wdRZn3q/tcZs7cJ5mEGEICAiEJQUIu3ILABtDX66orKOK7gVWRTHT31UV8iaJBRVZEfRXBBV0lr+t1XV+WVzergIIGSVYEdF13YfUTJ8mESSaTzO3MnFt37x91pqenq7q6uk736T5nft9PxJ461VVPVZ/+nbo9VZplWWSGTZs2EQAAAAxDQ0OVSuXFF1+0Q9L0/zZt2tTV1XXHHXesWbNm2bJlcdsJAADJwjCM/SOjy658TfHfnh4+coQQolmWtWnTpuuuu+7qq6/+wXPH4rYQAACSy8WXnPUfh49sv/z84SNH0oSQrq6uq6+++ofPjWhEi9s2AABILk/teWHVxWe0XnoVIUTbuHHjHXfc8cfKkritAgCAxmDRxtP7zz0jTQhZs2bNwL+diNseAABoDCpES6fTaUJIX1+fpo3GbQ8AADQGFdNasmRJmhDS2tqqaxjxBAAAKcoWmV2xBPEEAABJXOqpx20PAAA0BmVLm1VP9NwBAI2INTz42Jc+f/g//j3cZJeuPvuKbX+lLTqZ+2nZtGbVEwAAGpH/t/PW7TffePFFHw032V889ey9O299073/VxDH7rmj7QkAaDwmj49cdMG5+d89F26yF11w7qeOj3gJ45xxT10Xque+j7z91u84A87c/uOP/tkK+tHth95Br4/841v/+t5nPZJ4ywd+8rFz61intTK46/b/ufuCr3/7f5wcQmIAgOiwDNM0jKrQzex6ZBGiaYRugqQRQjRiWS5nSs0ilqYRYmlEs6o3atUULMMUCGNp7qyRUD0v/Pg3fvrx2T/33bbzoFa9RaN3U/PImdsf2fnmFYQQMrhr57dP2/nXlxJCCBn4l/d8RZNu3/76MyvvIl/5RvVeQgg58r23vP/xV3/2i1uHPrPyrh/MhJ79oc9+cetJs/cN/Mt7rvr6ac4bB/7lPVd9fWY8ZMvfvPCOC6QfiDZTMDTKAUg2plGxKpXZzeJmZNQi5J/+88VHf3+UBl95xuI/XfUSNoRN0CLENCoCYayYxDlrFGTOXdM0Ta/e4rjWNE0jjnCizSSra0TTNF0yj/Ne/lbywUd/c/Pl66oBA889/uwVf/4PL9HIEUJWvuex29+8ghDy3N1nvP8zL/3WzZdVYw0+sY+sX/kD5426Rtb/+Te++6qTCRl88KPXvfVH9FqGZTd87PEbgjzBgd3brxj889+/U16gAQBhYBmGWSlX24wa0WZ1lDz6+6Pf+8799PrNb3m3ZRiP7R9xhrz29D5bb4lTeQ1DIIxB2p5kYPf2Lbt+O/v3yvfeONP21OwWmq6RF+654tovzka79gezl/9bvhl34VVXknf86l/vOI8q0eDje//92jddqGm0RTiT3dLT1pM/zlp+ZO8/ky13v+mlW562b6Qf0ujLbnjT6z7x/b0HXk2bxuGjOWoCAFA/zErFLNFFRA75tAjRyJYVvW9+y7u/+60vEUK++60vXXPttu9+60umaRJCrrl225YVvValbM3214nd3TcrwrbnHPX0aRbuH/zttbf+/BPVNt3eD992cOYWjRBt9nrlX/7k41fTnvuDt33z1I9/4HJCCCED/7zty5ouv4PT5ZteT+7c8/i7LrqcEDK094cvvH77edUWrZ3dwDM/febKrZfPWD7wzE/JRR9ecd7ya/9m14Ovu+j62V1PdKLNuXfgn7dtGdz6d+QD73h07W2f/9L1S8jjX375Ox6txp4p5uCDt731939WLfJshNkCzgm8bfkXPv4oIeSW02fSBADUD8OoULm0dZBevGZFj2WZ11y77Vt//0VCyLf+/ouGYRBCrn37e/5keferT+0xKxXLIppGHA3W2darlzCWLEu6535o4MDaM//U7npf9Mk7LrLzoUOrOiFEJ2TF8tNmhlk1O5wQXSNEvudOCFn/to+sfOujv75ly3lk4NmfPHPV9Vv0mVHWF76w5S1fIIQQsvYj91w0k+beL+8ir71nma4ve8VVH7jn2cG/eM2yar7Vkd9DX/vHh9df/O3TdG1AI+TRDzy6Y8/+dxNCyOMPXPKOA3/5+D9cs4IQQvbuuPrlH96x55PnVQd0dZ08/sAl9y779v5/WEYIGfjhTZd/Zfn+Gy+cexch5Jorlt10+eD1+2+8MO7vEQDzjGO/+/X+73/D69MzCDnetuLat7/nvnuqkzf9773t3OnBM579xfPPeqZ5WrZFIIzlAD33wd+/8NtvvveSj82GvP5r3/vgn5CZiRV7BumRm097xHHf1Q/bl2/7kDuPn96/+YZHCCFk/Q3f+f5rXPvZn3LF5rUf++W+O9cv+8lTv33bmy+q3qsRctZfPXHHjNK9+ZIPfejJT55HyLM/+9ZZVzzxEk0j5E/Of/0N33vqwGuvWUGIppFnvvbW0x6ck4umEXLVZ+5cT1Pc+8gjaz9yz1tOrdp20U03rL3sl/vuXL+MVDviex95hDxDqokQQshZBw9o2ty7iHOaqR5fFwCAk1S2xZppeM68ghqxCNGsvS0n/zqz5HN3f7hYLNIPPnf3h9938ye0dOrCwmFSnZaf0UDL2QYlYaxYuvjO7z915+yfT91664GX6nZrUKvefmTgmVd8duAm2iw9+NVbv3nanVRhyR9/cOP9mlvGt2x7amCbZ5anbrxyw9d+/vgbTv3h82947wa7QavPZkcufsUryD0vDmobTvnpLx8mz5PL3vx5+/b7n3vrnesJ0bQNf/Hd77/2lDlJa845rGqreNY2TdtwyinVYQZN13SNkHM+eu8DfzFnZu4p913uZAEA9UJLpdJt7UywRYj2C33Rc9rCT33yllKpRAj54I67PvXJWwghn/rkLR/ccZeezlxsDnulKRDGsklob5tQT035f0cOPk8cf85cD7z4h+suvHgmXNeccTQSIH367+RLXnfWQ/d84THyjrdvcYST2WT3PvJjsmrZcnpx3Uf2Hnio+m/XK8g3/3UvzZcq4Jx/1T45/XfxK1/xb7d/4bsDM2k+8FXyuk3LNV2nt1Yj/NPeavzn7trxnDvw8R9+d8CdLP7hH/7V5R9teGbaO9Ltnen2zkxHR6ad/uvMtHc8oy38xO3vK5fL5XL5gzvu2pie+OCOu+ifn7j9fc9oCzP2LR0dmY7qXZn2jlS1587PtOxcsRRol5ChP/7q1MteavelNaJrmk6euv/vyJl/q80Oe1bDyey4Z7BO7SlXvvycnV8hO993yuyNGiHPf+7SN3yO/nXdR/d9aj0hz/zsG+SNX98wW4QrLnojuf1nT2y/+LRqA3JOxrYCVyNv3/f1+y5wpvnOpVX7qc1XbP/HnR/8s+VvIIQQ8sr/c6hfI2RO4HUf3fcpjZBNV274u/ct//E5O//2K+98iUwBAQBhkGptzXR0OtYdzc4bXaAVP/zR6rt9Qa54WbuVys8JybR3zJlyt6qDcKnWVoEwVghxzrn7KduhL9/yxp3/Sa/P2Xn/jhnxqfZXtWd+9o1XvnNwqZ2XTohGtMNfqd51zs77A+9Ectrrvzr4+rlBG3YMPrzDHW/DjsGHPUJe/9WHucnODdmy/ZeD212xdDKrscvfddcv3+VOhglc+raHH35bsBICAGonnWvPtHdyP7qynVxJzJm/MoRk2JC5d1SVNJ1rFwhj2Tnn7j/ZccqNn376Rk745rs+vZkQQjbsOLzBFX8HIeQK/l2J58U9P/jPl71uKSaBAEg86Vxbuq2dWETTqi5GVbSZOSTL0jRizbphEldUe4m93QpN59qk13tCJGyevOW1f/n3hLx956/etTRuWwAAYjoXLf7tHw6ve+Ubw032ud/+V+eixV7CWAniazSfuOTTP3zm03EbAQCQ4jW33HbPnTsnj4+Em2zHgoWvvXWnd9sTuyMDABqcZes23PSd/1/nTI1g454AAAAIIYQY6LkDAIACJlXPp59+mvvxBSuycVsIAADxs2+g5AoxLPL000/DrxAAAFSAegIAgApQTwAAUAHqCQAAKkA9AQBABagnAACoAPUEAAAVoJ4AAKBCOm4DAACJ5uabb47bhGi5++671W6EegIAfPjyl78ctwmR0N/fXy6XlW+vk3r29PSMjo6y18qJBEpHOUcAAOXQoUNxmxAyjz32WI0pqKtnT0+POIK8YAmSCqS5rnS48WXycsUPFA5As9LZ2RlCKk2EunoKtIPbSHTKln1tR+OqpB2NXrB3uUJcmfpazs3LqyCuQtESQUABqAXxS5TwV6x+45419txdMucrfLXjaycEFIBAOF9VrzaQk4S/YjWpJytbbDld7Uev+uJ+Ksg3aK/cK1og5fV9kEl+0gDEDn077NdE0NF0IjMiFwu1tj3FnWVXn52tOzYdmUYlW/WBajZQXtyCyNQGAECMYFjM65aIOppqRNtzd9WC4OfFF247F209ABoLryYLvR4dHfUdLou7BLPUdb2noM3o25uWbySytwTNS3AX9BqAGrGF0tUGck0Oe5GcF7BW9ZRXH3FTUaE3zdZj6HPu7F2J6jgA0FjYuum1nIbbYU2OXLqo1c99dC6+kZNcF1xrWcV0PnivoQkAAIvXRAWrHg3xKtXU9gyqg865F4V76187rNyL1101yg8DAAlBprcuMxwXCyGPewpqwZYbZxfYS54Ea6G4I82sATIOQjKdcd+hBgBAIFxqyF2E4ySx79rMee5zQy3V5LjlZB2BuF5GgnS8VjNItv4C5QUAiBTfxX92JzU576bGC8QeSwCA+sFOtbsans5wbr8+OZI6o55hNT4BAEACmc5ocoSS2/jE3vIAAKACeu4AAH9q3w2z+YB6AgB86O/vj9uEJBLynDsAoPmo5fiK5kA85w79BABwUD40relwSyhmjQAAwBdO6xMrlgAAwA9e150z7gnlBAAAJ9xxT10yHgAAACdYsQQAENHd3R23CRHS399/5513qt3LX7Ekw0MPPRR3wQEIma1bt46NjcVtReI4dOhQ3CZEgrwLgHDFklJ3fd++fXEXH4DQ2LFjR9wmJJfOzs64TYgVwayRMvfddx8hZNeuXeJoW7dujbv0YH5RLBaHh4fT6XQ2m9X12fF9TdMsy9I0zRmiaVqhUCgWi3FbDRoJ9Z67C4E++morAAAIiH2vz0T4GtHffPvH37IsO9y+rkddzDQ9ZDJ1tlMkb6ndPHEuvvZHZ7NX1k6bXQ8XAIrgzAhXNK/zd+OTUY5+Vns0mkY0jRD7X92ps3RaM9ghMubVx0hfY5z2CyJHZLNXss4Q6Cbg4joDju5/bOOMxp6+GW8LlMqjNvOPMme9Z3zimWjqrAuhZAEtAw0B99ieZG6WzApjaOOeNZnF6+g5e4iC/j77p32XII4z0A6RVxnWHm7W3IzYUtSzkllrxTbX/gTFZRfH4X4H6llpIApkDjViY4oPfIya8FcsqUHfBO67MWvrjJY5XySXwDnj2OFeg3H2hZ07a0/QIrAXrrxcF9xS1L/anRXla3PQCnEFisvuWz9cm2sklUrpum6apmEY9X8KwPcsW9d5cEk55128YimZHfZAPdAEtlDErby4TJKckgodV76+rWB5myWh0nnhhRfu3buXEAIBjQVfBeSeMR4vIj/3ZEqnAr5zKbHYE7ti2sbI1Ewgm2uparvJWbvNMqRSqVQqtXr16tbW1htvvFHX9VQqFUrKIBD2rJF8ZJu4bZ+DPec+hzob4RyLpNidOOdH7CocV0ePtZ8bx47JRlOw0JmaHcE14CAohUxeXgUXt8i8smMHN9jOsqA2nEV2lZcdfnGNwHgVhFuHApsVoNK5du3as88++8orrzzvvPM+//nPQ0DjxTmx7tVD75lLXKZyFTK0XUIkl8Q717uIx7Nk+uxsT1Atju/7KZOyr+WSEiBeDCSfVIjZKVRFKNUeIqlU6vrrr7/mmmtWrlzZ29uby+VaW1ufeOKJyy67zDTN+tgAXOeze7UlkzjuySOcOXc4YiYfdkRYYbFB7DYrYxjGgw8+yIZDOusJd0CTaqVghXwSiHDOHX7uyUetAZs0m5UxDIPOEXH93OMu6PzF1kpbQAXSGWfDU3JveTXg5w4AkIddJy9YM+8VoW6I2p51+/VtXD935+yHE/FafUljaiy7cta1VIukPQ3RyAVAjCZoe8a+Zqn+fu7iEJdtrDy5Vnqz0/rhll3GQoVV7lxLau/JuuypMTUAEoD3mZr4gocImlo2SZ6SAvLI78HerCSi5863rEH83FlHQ+fqK7VSyBdB0kdI7LHOHXnwndpW89ZnZ2bEOwMoP2VuSKFQUPkuAob+/v64TYgfcc+9fjSBn7szL2fK7DaXvqVgdUTGZkHFCsrOvfD151H21vd6xGyh5H3huU+Zu7wUG8WHhfKhaU2P3fZMaN89IX7u8v6CXKWr235x4hFYtfqR90bn3iuuGfEtkqVI4P4GoMngvv7NNu5Z+8yJb+JckjnAF2hyzLdoaj+xguk1tVJwn3Kkzx2ApI97st7WrmuvPq9gstsrTo2NF24i7HIfmVIIAsWFFVSgsyPsMonbfWZrjzuk63LkD+Rizx1SkBmAZkvBPmVuCMY9QYiIxj1rV8/m9nP3tSeoz3tYgeJcBHa6hmvlyy6DIF+FMQ3fJ8gNwbgnCJEI13vCETMsIvU957ZGm7KkAISN36lwrjOP5Nnlx0wu2q/ereG/gv8+fSMhhDx9Y1R1FXX6ybEk7pcNNBVchayOOj2zf8wZ9dhE6YIVWXFyDz300L59++677z6qnmI/d/rpr96tvXsDGhogcu7/lbb2C4Xh4eF0Op3NZnV99vRD7i4hdJy0WCwuW7ZsbGxMMVfQpOwbKPV1ztHD94/qT6zvinbWyNUv2/gAoX9tfIDQpsfGB6ofPX3j7HUdoLk7DfCNTGPaNzoL5UpTMlln+jWWXTnrWqpF0p7aU1Ng4wOk8IV6ZwqaGK5C2idzzGmZhpSfOx1WemzqLJ0bH6j+8zWMtc2+kV7YPVBXmvLIK7g4Bac9aqjZL7YnFmqpBABYuAoZzrjnTCI+eybG9S7VmXlSTBnq3KWwwSMA4cJVyJA9NVkXTOenXi0CVy/eFdnZzWf7+759Z24ctjMu85674jgTYW2TLIV8EXwtZA3wCnHiZblXyl7PwusuVwquC2dJlZ9yWAMXAAQi/HFPwZqYjQ8Q6/7q6+F8f9j+pq0UzjeKFS87jh3Oipcrjp270yq1JhKbsssYmVKwOiJjs5c9LsFypcO94Na/oA65pfC1x3XNLanyU4ZoRkp3d3fcJkRIf3+/jCO/cLV8GHb4LidUGI1yCY1vZN8GkRry44lcpQtUitrt9BrPVasfbtklU1D4lWIj+JbCq7kKwuLQoUNxmxAJ8jvviT01w2l8ih2ZadszUth2SuiJc4lrgC+QwWpGuhqqtdyu1sz3ammyrVFnax1z7uHS2dkZtwlxUqddQgSuI+JxT9fLwHb6vPq8ghaHVxzfxosYbiLsch+ZUggCxYUVVKCzI+wyidt9ZmuPO6TrjCMWQWf9cBPnjmmKn7Jg0RhamiBqNK9Ay7L+/dCEM3TweCHoanlxZLpaXtO0DfdjtbwP0TVjuWOyTVnSX71bKxSwWj4curu7Dx065Gp7Os8NZs8QdoUk9rRhKmK+4577BkonL2h1hmwfJk+s7yIz6jnu/PejXx8d9ePBBx/ctm2bFQRnkwT/5f6XvWis9JNjSaFQOHjw4IsvvjgyMnLCwejoKP2vzdjY2Pj4+NGjRw8ePGhZlu83f75hWdbBgwfZcHrIJXvtPCzT9alLlcRpyoTXCBUx32g/+vVRKoy/OzRBLy57Zny27fkfg5POUh0cmY6i7QlA3SgWi2h7hgK37ekFbV06/8u2Pb1aoPandgi3ARsi8m3PUxbmnCHbjloOT037/1Q71jjPHYB5iFPsfGParUhBZ58ru1531Q3uuKc++6E29yIiIzTN3prM1zcpajMkM3XGdF3L3KtWPwp5hVg5QevKN442l3CtDT1N4Istmmxv3UbwZ6JGP6XQ5v4jJEEnczTcee7R7SusnFdYlcOtGZlj48Q1yZ4GGArKh/qBWmC751xskWWbqGIBpfGTI7L+J3PgCwi81K1GearbuXigbgi64Ww0F779/aTN0dsK6Xw37NF0jYS9x1IQyzTu0TRsN5/t77N/+sbhdoolu+HORpZXD5fb9RYXNmhegiJ4ld2rDiWfTuhdY/b5enXtFXJHRz6ByI+QJpKqQjq77o49ltyd+qjgnqjutnTmXDNnBFcge/YZjSmOYx/m40q89qN72NwF5Qr0equl44rDrUPJ3BVsliyUs66cj8Z1/FztNQaiwO5fJ6eRGBEc7XS0PUn95DMICue5R9HukHl7w8pdUimceQkO7GQPQw+9cmrEd9QSk0LJhF2HJJgpcq1G4q79pJ/a//Vacm//ydrjG6KOc1I9abNGYRHXee6h5x7ojE87JPlaKTZYrSqcYAapPsg3Nr3mf9gUfJeCuiK74siEKCOaNYqXhjvPnWuz1znj3HIFVQRx/XDvkqlD37y8DoUXH7kuWQruLV6Pxvcse1cgznOPFNZN0xnivHAtVBK3B730LpnDAjjP3SdcPh3JQ94V1jnJl0vhtHSFUsgfZx80jkLiXpWD89zrg6DFx5W8ZOqgL+Lz3GsCjpggKGwbHCe8g8YiHPWEnzsIiloDFoDkYKsnbZhayhNI8HMHoFmR34O9efHeHdnxsx/t77/dX2Mnc+rsrMkU3N9m9rpGm+UnW+Stdd2rZmGg+gkrd69M0ZePl/7+/rhNiB/uN7CqnmUj5m9ns/q5y5RavGrH6VwQVEeUpTMWtfKqDUhnvMgcmtb0cBWyqp6jU2U7qGnWfoLYQbMRNAeMQqZn1XNyuhKjanKXQLJrFb0Wb3JXXIrjsJ1xmfecXd3JThkHtVm5inzL7lurgowENnuVi1tX3B322Dam78CFbylYg7HeE4QIo5DpuZ6a9WKe+LlzO/hqXtuS3t/yXva+5RLUoZq/POvDzvVql6lnNmuvpwxApCTC10iAgp97FC+PvJ+7OPew9trgOmXKl70OjqR1WL/J9UeKke7u7jrk0t/fj4HIhJB09QxKwv3cZTYbloGbTqRlV66uOuhaWLVaO4cOHYo0fawcShSJUM9m9XMX97XZXUd9/bi59eO1YbuadzybHdtn99Vo8Qb1XqO3rprxyo47DuOqDfXvYs1Inp4GmoDQ1BN+7pJe7aEMsIZoT9C7go4MiO/1TTmiWgWgduDnDuqBV1M99qYiAMrAzx3UA7QWQfMRWs8dfu4ABKXpD7Robuq93nO+neceihm1nIReez17HbQXNERQKHmrmun0dudBFKARiWG1PJf6+7m7FoTL2xaun7ukgxMbU1JBJCfNZHJ3jlQGDRHYpnBEXY3VngScogkBbVCSop5AhuYQDrYszVQuGaI9vwzUi0SoZ1Oe5y5psy/cozpdNgeqH5nKd+bOll3eZoUpdYXz3GsZ2ag/XkIJAW04Ylgtb/u5s+vhbdj11eyryN23zWvrOdcxZ+yqe4VlmOK91NiNQrxslsmLu2Kcu9qfm5dMPYtXvysfbBnoXtYeSQsbqPXKnp6GiaMGJRFtTwEKfu5JPs+9Fgvj8uZO/pLM6J47AAKSrp5BUdvBSD7xGnMPujVR7L7byZdOSqTPHQAu8HPnR1OwOSI/d69NOdmt3sR5catRpuDsJngCN3OvkKDP3StE4AsPQJ2Bn7tPuHw6dfZzVzBJwfNduVDKG+WF5QuffDDc2ejAzx0AAFSAnzsAAKgAP3cAAFCh3rNGOM9dwYwaj3SvpZ7Z8z9Cr97Qb4/xVDjs/T6vSMScO85zl7TWNU0vOTNTi/hyvRtCKZdMedWgKRSLxVoSUaC/v7/OOYJ4SYp6AhnqP7k8n73Rg4LD2uYbiVBPnOcugLsk02WzOC+Zeq5xQEAmHZkmcFinyQNQB3CeewOc584tJjcLbl4y9RzIHq/V+L7pcLfaY2s19NPkAYiCpHtqws89kA1JJsSnA90ESSDp6hkU+LknGXijg2YiQeOe8HNPsp97fbzRQzlNnt4Sy4olMK+An7tPuHw6TennXmdv9FBOk6fRisXi0NDQwMDAyMiI8yN29VVPT88ZZ5yxbNkymZQBsIGfO2haBgYGLrzwwgULFtA/qfIWCgXTJJZlWpZlGEapVBodHfvDH/4L6gmCAj930LQMDw9T6bQsyzBM0zIt05qaKhiGYZimUTGmC9Pj4xM93V1DR4ZCydE+YZi9EEQO9BFIDvBzB80MbW+aDkqlcqVSMUzDqBjT0wXTMA3DiM6A0dFRlxTKKyN70hEkNVHAzx1+7lIWBso9dj93l82maVHpNAyzYlRmMCzTCnHdqJcsBpU8Ox2X8uLYuKSRiDl3+LlLWgs/9+Rja5xL7FzNTzaOfJcfJISkqCeQAX7uicV1QCbVPlYBXW1Jrj7SpAQ31pnu7u5Y8q0P/f39yhsUJEI94ecuAH7uCn7u9V/vSbVSJppMBG5SXFWtD4cOHap/pnWgxh0FcZ47J0S+FGwgG6EJznN3Ed2p6+yzcKXM/SZw06n/DnW+sJrI7d1zm5kCVa0PnZ2dcWWdWBLR9hSg4OceRR9T3s/dd327sp+imsonhxCfToNWAnfmnZ2RdzUzMQCaWODnHizxGnOHn/t88HOvRe9GHdghtqQ2lowGbSk33KKCRLQ94ecOP3evp6Pg584+BcuqrliyLNM07KWfhmmZpmVKplMLMks+uYuTuEuXEo5TBO1GNHd1gSskUB36htcB+Ln7hMunAz/3GjMK0c/dGd8wzEqlYlBnI9OsVMqVSqViGDQw9EEA35dZHMHVZ3fe0igC6rWowEs0ZZqcdg247qKN9LhqBn7uoGnp7e0dHR3t7OzUdZ0QS9eJZeltbTnDMC1Cm6OWaZr5fL6nO5w+I6sXLmlg33Nuu4w7MNpAAupa0Oq7SMs14Os1RuxVV3HVDPzcQdOyYsWKPXv2jBwfEUfr6e5ZvHhx7dnJOBrJOyM5pUEcM4F4zXcJvKecHzXKACj83EHTsmzZslNPPTWbzer67Owo6zdFl0BhP9Cw4I57cmOqaWVytBV+7lJ+7s41qkFtDn0RVSDPSzWf8dptZo10WSKz7t1rhwFuTNf0HdQwLrwanmGt9k9O+zQRc+4J93Ov0ebQ1+g4RVxsufJvUo02s1qm8KsjcNJnU2BnlhK4Wn7+wHVI5S4ziNvSmkiKeoJmpUFXtgNlXPM/XBcASnJakWokQj0T7ufOXSkpkzV3kSO7x51rTEB5SySZla1eCzAD2RypW5dkMcV7DoAYYaeGBJvseQkrN0GvBQyNvWIpEA3q5872Itk/Bd7fApu5eQWtVZmScn3Gg9os6Wmu9k0IdJfXswDJhNsaldy9lF2TJLMKKmoS0fYUkBA/9+hKp+b/w0XemSco4v1QAHDhuzDLa/89QSNUPHEfC0lXz6CEtet7nW3mbuEetBTKzjwR3UVprGcBQkdG3biLW5NPItSzCfzc2T+5nubyfuUyWXOLwI7ncn3h2Vr1tVnwLLyq3Str+e8Gt8bEzu9YsQTqA/zcfcJZs32TFVvOvTHoAEUotaFms/xiI/mCy1S+vElxrViqzx7steyFDsIFfu4AhEbUe7DXuBd6w+WbcODnDkCYNN8e7P39/XGbkFDg5w4AEIGBAi/qvbc8XSrovLDD62+GZKbO6RcFm+UzCmp86CmLa6A+6US37gqAcEnKyRz193N3npCh9jYqz5/UiG150EM+YkdtTRVWm4JkkogVSyD5YNlm6HB3AgYNRCLUE37uNfq5i3P3skdm5zfuhpjcje98n5eaMZJe7WxGWO8JoiaGnjvXT9kVx3X2pGs5tyuO6yUUx2H7vDJLDn1XUzqTZVebs+USjxW4SiFZq5JnwznLK2mP+Ol4PS/Jw464N7Llkvm2NJafLmh0EtH2FAA/99oTF9dPoKMuJV0PglrYKM8LACdJV8+gzGc/dxeC3ZLYvHwtjGimuxGfV4147dKGAdCGIxFz7uxiIHsbNK/VQtxt69hFPNw47CoiO5qyzdw/nckKttpjUxYb47XqywWbO5u4q569iun6k72LrUA2d+6SL+7CNa8H7fttiU7lQySBewUBNeDn7hPOmu2bbP393L18xgW5O7cBlcxLJmXBlJdMs1fm6Uh+W5J8Mge70S+ksxGBn/s8QnmjI0lktl8CFKeAQjobFPi5zy8i1TWIZiDY/dJBYwE/dwBiA9LZ0OA8d/9Mk3yee0Qpc9fAh5u4+Bh3NGNB8knEnDv83IPmq+znLrNKXxyihrPOfX9O1A7Fq91IAAKRFPUEAIDGIhGr5eHnHoWfu5cXOXtMsfL5na4+uEJSXr5Pkt76kk+wbmAP9nkFznPnhAjMFv/pyqtu57lzc+euuJSpQ19CPOGda7Nr/bxvrUo+wajBHuzzjUS0PQXAz732xMUynfwT3r0sTNpTxh7s842kq2dQGtFvOiI/d5l0lL0b61m9DfQowbwiEeqJ89zZlH2zZgccXblz03EZ4LLQlQX7KXuX8gnvbLKSN3KTarhuB2gC4OfuE86a7ZtsXH7urutaKi1QdSmv3Ar3RugmqDPwcwdJIVIffABCB37uIClANEFjAT93AABQAee5S0VO4HnukinXWM/swfF1PkfeWVK4Y4JEkRRPTfi5R0SNJxGxp93V8xB5+ZP7IKyg/iRFPQHwAsoIkkmC1nvCz13Zz92rGr1OJfINlHlA4nKxzy4673juclf51ABQA+e5+/cKuUZ6Ldusz3nuXh7r4twF9Rx05zpxOtz1vNw4rJFehRXYLPkEAQiXpPfcFfzcG6ijJ/BzVyiFwl1h1ZhXOqzEh7K1s8xhojWWCABfEtFzD5FG7LuF5eeutqmwmp+7bzpcCVN+KGwPoxZrAQiFRKgn/NzZlIMi9gd3er571TNXrL0GfAWe715b5Cl4x4ufO/zcQbzAz90nnDXbN9n6+LnL3KhQP76fqlWgTM3Ix5f5wiT5PHfQHMDPHYQPmoFgPgA/dxA+0E0wH4CfOwAAqIDz3P0zVTvPnbt63Al3ql1yZjnECejGWp/QuDaD5iMp6z2bz89dMDvEToCwS/cFixZZ+2uhEWWoEW0GzUdS1HM+IBBNZUWAjgAQFwla7zlP/NyVK4S1R+CxztaYTH2yNR+osL4lUvB89zqV3rfshUJBoeYBkAd+7hH6uSvv5ybj+i32/mZrzGuIQFzzkvUsUyJlz3dXXr7e+miPg/qQiLanAAU/9/nz/rCzWGwE9i7JKRdBC7qWemY938U2z7dnChqIpKtnUBrRzz0oXqWT/3UJipfHUaB6VvZ8nw/PFDQiiVDPpvRzZ+MLxk+90hHnzi2Crxc52/QT1Dw3xHcvJQFBPd+9Nkjl2ixYH5ZKpVKpFBtumqZpmpIPHQAn8HP3CWfN9k1WIFhqruiSpkZUY2pGSloeyHtdMhq9dvm5p1KpzZs35/N5et3X17dmzZqVK1du27YN6gnUgJ87qJWG6FMbhvHkk09ef/31bW1tS5cuXbt27dKlS88//3xIJ1AGfu6gVpIvnVQ9CSEPPvjgzp07161bd/rpp69evdo0TcMwsJUyUAN+7qCZcR5lbJqmpmk7d+7cvXu3LZ1xGwgaGPi5q/i5C9aii5Ot5cS32pcHKVcUd2V70HktyQgClwQFUqmU8xgPKqCvfvWr6WSR87D4WmoJzE8SMecei5+7OETNft99Q5Q96+VVPuhdvvl6eftIWiJYX+W7JKD2E4pSqZSu685E7El21yb5AAQlKeo532iIsUKB8Y2iOC7pdC0dA6AWEqGejejnroCMX7nA11ummDV64ks2nGVKqnCXvA+7+Jvg9HPnqifamyAU4Oeu7ueuIKYC/3RBSWV86iVXpArOfA+9OaxWP+JKk/kmOBOh6ukE0gnCIhFtTwFN6efOVd7ad6tTtkSco1o/N9JpQC9feJapqamIbACg+uY88pth4vj6WRa5YEVWfOdDDz20b9++z33uc3EXAQAOCjvUTUxMLFu2bGxsLG7bQbLYN1DSqmJZ5Y5K6xPru2ptex4+fFgypt1eSKfTBw4cOHDgwIkTJwQbODYWrtZQb2/v8uXLly9fHrddzYnMN6SrqytuM0GTU6t6ptOBU0ilUgcOHLjssst6enoS3sVW5sSJEz//+c9f+tKXxm1Ic+JST13XdV2n+4DQa3TYQR2oVT0zmYxkTGfbc2xsrLe31zTpZIU7TkO3PS3LMk2jo6NzcnJSvnKAGO5Xwjn3pWka1c1G/PKABqVW9dT1ObP29lxBJpNJpVKGYZTLZdct1P2DTvOapslbLx1CwXQ9RW0zTZO9MM2oXPRM06pUTF3XaGsoolzmOZqmpdNpXddN06xUKs75dADqRiQrlqh0vvOd7xTIh2VZhmEahlmpGFH8I4S88hVXvf99/8t18dnP3E0IiShT+s8wjejUGVB0Xb/kkkt0XVcYOwIgFMJXTyqd69at8xv1s0zLMiPDsqxVq1Zt3rzZdfGyl73MijJf08Juu3Uin8/fcMMNaOODuAhZPdPpdCqVOuecc1atWrVy5UpBTMsiUWqYaVnmokWLenp7XRdd3d2RiqdpGBZvOAJEQVtb2+233+61bzwAkRJyryedTm/evPmkk05at25db2+vIOb09PT09HSpVK5UKlEUrKurk15MTubZi/HxiSgypYOq5Uqlra01ovSBTSqVWrp06bp163bv3v2qV70KTX5QZ0JWz0qlsmfPnv7+/oULF+ZyOUHMmXHP6hhl6BiGKbiIKFOqnkalYhpoe0ZOX1/f2rVr7X2O4zYHzDvCV09CyH333Xfvvfe2toraX5ZlUemMqO1pGMZLXvKSjo4O10UulzOMqDIlhBimaVQMy8LLHDlr1qxZunTpqlWrDMOwN+sEoG6EP19Jlyht3779ySefFESjbc9KpRKRkJmmuWLFis7OTtdFW1sbXeYSRaY030qlQpeygkhZuXLlpk2bcLoGiItIVntQAd28ebPg5IOKYUxPT09PFyJqpk1MTK5avdbrolQqRZEpXe9pGIaJtmfEmKZ500032es94zYHzEeiWitXLpfZdfJOSsXS+PiEaRpmNNPThbkH0tYJa2aLPAzDRUx0vQcAJKlVPeVXitiLeHRd7+vrO358pKen2zCac4gwn59qaWlxOWKBiHBt3wlAfYjKU1OApmlnnHHG/v37R0dH4y5+VGSz2ZNOOgkvc1jInKSEnY9BnalVPdU6UCeffPLJJ58cd9kjp1QqYdl8KEATQQKpST137NhRjGV4EQA/8M0EUaOunlu3bo3beAAAiA119cQBBgCA+QwmhQEAQAWoJwAAqAD1BAAAFaCeAACgAtQTAABUgHoCAIAKUE8AAFAB6gkAACpAPQEAQAWoJwAAqAD1BAAAFULeW76np4cQMjo6al/Y4fXczZPm7jRAxmbnjTbOIrCBksbUWHblrGupFkl7ak9N2YbQ85UpVxLKDhJCVCdzuKizdLqyE79pttY7TbVvoRfOFFiFrb3sMha6DFPA6xdCIR2nPTWmVktZYkkWigko6LkHBi+PTZ27FAAkinq0PV29eGegq5vP9vd9+87cOGxnXOY9d8VxJsLaJlkK+SL4Wsga4BXixMtyr5S9noXXXa4UXBfOkio/ZUFS4lJw69kV6FUomYLjl2Oeo6KeDz30EBv4hje8gV7Y3TpWWWxc/T4agRUvtq/q1SW3L1y9bG6IJGzKLmNkSsHqiIzNXva4BIs7yOBlmFeyrru4pfC1x3XNLanyU2ZDxN8oOy+ZlL1y8aoBrzjclwIkn61btypvVazY9mQ3llezwCU0vpF9G0RqiPWFjcm+zPKlqN1OrxFYtfrhll0yBYVfKTaCbynCeu7RfX9w1EKDsmvXrlpub7C95WufOfFNnEsyB/gCTY75Fk1t/kcwvaZWCu5TDuu5i9NRGN6xwVEL85D6jXu6Xga20+fV5xVMdnvFqbHxwk2EHe2SKYUgUFxYQQU6O6cuk7jdZ7b2uEO6zjhiHXHWDzdx7pim+CkLlgR4hXC/Udy8XENJXnhVqdhgMG8JWT2dQ4TiwSaZ3q6ggxwojuSwgCCyTLIy5gUNFOcisNM1XCtfdhkE+SqMafg+QcnH4VtLalUh/2UA8w2sWKorbKstROxpmSSMM0RaUgCSQJ1WywNK1KIWu2gm0BIAIgJtTwAAUAHqCQAAKkA9AQBABagnAACoAPUEAAAVoJ4AAKAC1BMAAFSAegIAgArNoJ5ihxYvd2wAAKiFZlDPoPvLxW2vD0mzMGn2NKKFKGlT0qiemr478XjtRRavB6HC+W7Ond+4ezPL5Ni4fpO++0jJJxJWJYS4jQC7fXXQYmLDpxhpVPWUPzRC8Itd5y9cLUfLKRufqOZ2UN1hfy0Ufj9Cr4Taj/ljDROfQSJfP2GVEcjQqOopc8SC/M9y/b95gkMglI8Sic7UuOwJJI7JqbFIK0T+oBEQNY2qnjI73br2/RULVoxl8f0lYDcDljlsTjC+we4Gz91h3vfoNK8togWnwgk2ihaXwrVdqUAuufYEOqGvnsf81U6jD840Lo06azQ6F25I48L2NMWjt84acP1gsL8Zvt1Ytg659jhrnrsJsSsddrdmr03yWfH1OhGPa6HYHjZllyJzjwMRb//sVQpBJbNPp5bvRqLGZ+YPjaqeFPlvDL5eLNxWrb3Fsu+N3IZtoHToLUGfi3wnXRxTYGFy+iUgyTS2ejrpceAbM/ZXIjlSzj15QrJ9Kjh0OlA6MkMEdkig2RjfaA39s9q4ljcHjTruyVKLINZHT70OFOPmLp4JYU89Ex8b5wqRX67AtUdmDYNXm87rQDqvo4oES3l8j0RmzxyVPGQw9GP+xEMN3AP7XJ9yS4oj6uKlgdUz6BG4gtNo6/bNC3QenGDEUPLwNd+S+qYssEehpDKWi48UlFlrIXmj2mGFaoFBzwGU/xSiGSONqp7OMyO5B5AJ2kH4uQ6X+TznKzm9DpqSRlXPQM0lfLMjZT5X73wuO2ieWSMAAKgnUE8AAFAB6gkAACpAPQEAQAWoJwAAqNCoc+6BVm4nc01JIJOCLm4FAERNo6qn092Chsg4NSdTesQbgjRKKQCYbzSqenJd7lzL4CX3n48drhnsfnQC1z0AQP1pYPW0Ybcct8PjNo2P166jgkIJ3EwBALHQqOop2f4SbELju09HdLg2J/aKIHM2AwAgLhpVPVn3du7uuYE2EKkn3K2DWDNshUW3HYCk0ajqaaN8+EESBMi3zYueOwCJpeHV02ujRtdFomCPEsLJiAA0HM2gnoL96JLZ9pRfk8Qua0XPHYCE0NjqKdNS81oPFDSd+hcBc+4AJJnGVk/BKQs2kufbxF4EVwiEEoCE08Dq6bVBssyS+KQtAxIM3boiJH81KwDzhAZWTxvJQ34Et8Rudi1H3AAAYgF7LAEAgApQTwAAUAHqCQAAKkA9AQBABagnAACoAPUEcZJOp3U9hi9hKpVKp9PO63Q6rWlaoozkouu6bXmdcVaaL85Ki6gCNU3TdZ371OhHgruCfsQlKd8JMD/JZrOlUqlcLrMfpdPpTCbDXodCJpOZnp7O5/P2ta7rxWKxUqlwI1cqlVKpFHdtEVs9p6amos6IrXNaUYZhyDwLZ6WFXoGaprW0tORyuZaWlpaWlmw26/w0m83Sj1pbW1OpVO0feQH1BDEzPT3Nfa9SqZRhGBMTE67rUNA0bXx8nLakNE2bmJjQNG1qaoqrnoSQQqFQLBbjrqoqpmmGWBVesHVOKy2bzUo+C2elhVuB2WxW07QjR44MDAwMDQ2Vy2XTNA3DoEqdSqVGRkYGBgaGh4cJIfa3i/2ot7fX6yMZrW+G1fKg0UmlUrQ5YxiGaZq0haVpmmVZuq47r+23OpVKpVIpy7IqlYplWc6kaDT7daKvvaZpNGXaqiqXy5VKJZvN2tf0rnQ6nc1m2WSdaJpGczFN06W2mqbREQB6u67rtg3caK4UuMbT2qCtIVd2qVTKNE1qj7P22OoVR6M9a2epXXVuVxp9UsVi0Q6nttGyGIbhVWku2BypnZZlWZaVTqd96394eLhQKPT09NDSZTKZY8eO9fb2ptPpfD4/NjbW3d2dzWZN00yn09PT07lcjv1o+fLltBUvuEtQCrQ9Qcy0trZ2dnbStzqdTtMXO51O01e3ra3NsizTNOl1oVCg7Y5MJkNVIJPJ2K9ZNpulLaNyuWy//7Rl0dLSUiwW6Z+pVGp6erqlpYW+h/SaENLR0dHW1sYm60TX9Vwul0qlSqWSZVnOPmwqlcrlcpqm0dyp0ExPT7tSoNF0XafjFXaRvYxPp9Otra1UkalO2UnRIlC5d9aeC0E0WhyqVrTUbP1PT0+bpkkrqrOz0xmeSqVaW1tN0ywUClRxuAawFcjmSB8TrYdUKjU1NcUdz6HqWalUpqamOjo6aGTaciyXy/Rncnx8PJfL0cek63pLS8vU1BStUtdHPT09Xh/Ru8RlQdsTxEw2mx0eHi4Wi5lMpqenxzAM2mmionns2LFUKkV7WMeOHUun0z09PaZpDg0NlUqldDrd3d1NBaulpSWdTg8PD09OTtLhsPb29omJia6urkqlMjExceLEicWLF9OZgYmJiba2NvoyT0xMtLe3U10bGhqqVCrOZF1jalSFBwcH6Uvb1dVF7cxkMtlstlAoHD58mH7U29trWRZ9J13ltaNls9ne3l4qBF7GZ7PZqampoaEhOhDZ29vrFFBaFbT2ent7ae21tra6KtkrWjabrVQqg4ODVDG7u7sJIVS2nPWfzWbtSqNCaT+XycnJo0ePtrS06Lre29tLf4oEk0teOVLp1HV9dHR0fHzcsqyenh7uAKtpmpOTk/QXlIbYWkw/rVQqHR0d9COq9bTG2I/sHonXXfRn26ssiuq5a9euOr1boKnZsmXL888//7vf/a6zs1PX9TPPPLO9vX3Pnj0dHR3nnHOOZVlPPfVUZ2enfd3b2/vyl7/8N7/5zf79+zs7OzVN6+vrW7NmzaOPPtrb23v++ec///zzQ0NDtKNKRdPWQcMwWlpaTjrppEWLFv3iF7/o6uqyrxcsWHDppZdyk81ms5deeunzzz//xz/+ccmSJRs2bHj88cfHx8fb29s1TVu8ePGqVasee+yxRYsWrV+//mc/+9nY2FhbW5umaaeffvrixYt3797t3AJm4cKF55577o9//ONisUijLVmy5Pjx45ZlXXLJJazxp59++rnnnrt7927DMKjcr169uqenhyYrqD2ZSj7ppJMuuOCCPXv2jIyMdHR0aJq2cOHCs88++0c/+lEul3PW/+LFi+1Ke9nLXmaHd3R0HDlyhDYnW1pazj///BdeeGFgYKC1tdWutFwuZ1/39fUJcjz//PPz+fyTTz6Zy+VoD8P3+7NgwYKVK1dmMpk9e/aMjY2tXr36zDPP/MlPfkIHdgghnZ2dGzdu3Lt378KFC8866yz2IyqRdMTAOVlEf2Xp8I5X7hoV2kd+M0wcploWuWCF5z305wKA2rEs68SJE6lUyv5SFYvF8fHxRYsW0QmlfD7f19dnXy9cuJA2QnO5nK0RhmGMjIwsXLjQsqxyuZxOp2nni74StDfnzLRYLE5NTdH2LL2mAueVrK7rY2NjqVSqs7PTMIwjR4709fXZL5UdjRAyPDzc29tLxwGoMcePH1+yZImzvKZpHjlyZPHixXYDLZ/P08VAXOPZ+KVSiSYrrj2ZSjZN09VaNAzj2LFjixYt0nXdWf/OSnOGG4ZBW2d0qMGuKK9rcY6Tk5OFQoGmLPPloT8zJ06cMAxjwYIFdDzn2LFjfX19NH1ajceOHevp6dF1nftRJpPJ5XKDg4M9PT30I13Xs9ns4cOH29raWltb9w2UtKpYVrmj0vrE+i6VtufY2FgsbxpoPtra2ujAE/2TfvvpxC7tI4+Pj9ujlvQ6l8vl83k6hGd/0emkeTabnZycpO2F9vZ2OvDv6kXmcrmhoaHW1taxsTH7mvavvZLt7u6mK3XobE8+n6ejfjRaS0tLPp9Pp9NtbW35fD6TyRQKBXtixNVzp4H2WIFNpVIpFous8VRlJicnaUOVpmAP0glqT6aSc7lcJpM5ceIElSH6qWVZhUIhlUp1dHQ469yuNPtZ0CU+5XJ5fHy8WCwWCoUlS5ZMTU2ZpmmaZi6Xo5XmvKbdba8cOzs7C4UCrUPx14ZWO/3dyufzdOh8enqaDk0UCoWxsTH63OkoCv2TDjuwH9FfPlfDkz4U8fJPjHuCxsP5dtlTt3TWpaOjwzTNUqk0Pj7e09OTz+epEtmR6ZBfV1eX81qQrPP9oWNkLS0t9stPp4npihl7ZsZOgbXcngiyU2htbaUSQwXLZTzVa1eOvjMzktB0DMOgw5o0cVqNTilhK4pCy3748GE6idTe3k5VUmCeZI6+tLS0lEolOna8cOFC+8HRp0CF1ZZIe42BwkdiqzDnDhKKvVzJdU1HrOyFNZlMZmpqinbP6Yp3XddbW1t7e3vtpfhUgKhsFQqFTCZD15zb14Jkne8PbZl2d3fTlUO0uz01NUUX2RiG0dXVRZuu9CPnGilqAP2UTo5RvdZ1/ejRo/l8nmt8qVQyTZNOfNF0qGb51p6do7iGqc10Wj+Xy3V1daVSqWKx6Fwu5qooO5yOQmSz2Z6eHqqe9joBtRwlvxh04cHY2BgdkKWL2+3HRCd/aM3TpzA5OUkjqH0kquR6vAcABIcOqC1atKhUKtE2IL2m4250YiGVShUKhZGRkfb2dtoBpBPW9D0fHx+njjH0z9HR0SVLlkxOTtIp6VQqZV9TaEPVlazrra5UKpVKhfZ5NU2bnp4eHh6m3WraAm1vb6dNoUKh4GqHjo6OdnV1lUol2tKh0U6cOFEsFmmnlWt8uVy2LIuW17IsqrO+tefMURDNTpzWUrlcHhoaovJk1z8darAryvlcTNPs7e2l9xaLxXw+39HRIV5nLshR8otB28Ld3d0u59rp6Wnq1GSaZkdHB01/amrqxIkTtBLUPhIA9QRxMjU1lc/n6XpP+mqNj4/Ta8MwCoXC+Pi4aZp9fX2VSoUuZKGjV8Vika5y1zSNNnzoXfl8/tixY3ToTdd1+o6VSqXR0dFCoTA1NVUoFOi80PT0tH1Nb6SCRf01nclOT0/bK5zo23v8+PFisUj7iW1tbTQR2v61P+ru7ratsg2gL6RlWUePHqVvLF11SDuMXONpyiMjI1St6BJL39pz5iiI5kyczqJks1k6uWTXP52ZsW93PpeFCxdOTU3R8uq63t7eTgcuaYXYleaqQK8cnYOSAsrl8sTEBPWydUFnhDRNO3HiRKlUoqv329vbnVkrfOSFypw7ADGSy+VefPHF1tbWlpYW+tKyzRa7++wKt5eLu65dcbySFUejUyj2Ykk6VzMyMuKaAbehC2XYjATG+47EKUMT526T4VVRXlXhnBFSy5EOB3vdJenxaf8IsekH/SjMOXcAkoBrUNKJVzidhGGvJZMVR6M9VrqmnS4VHBkZEQw+enXABcZHJJ3ixL0qyuteyT64uDiFQuHYsWNe9bZgwQLf9LniWMtHLFBP0GDQhSlebZMYMQyD2kanxekwnGvhOpBHctVnjEA9QYNhWdaCBQuia4XVAp3boRMjbW1t4e6qB5IG1BM0GE4H5wTiu8wFNA1V9bSq/5tl30Ai9oIFAIDYcSnkEW0cq+UBAEARqCcAAKgA9QQAABWgngAAoALUEwAAVEgTQlY/Nxi3GQAAAAAAYB7w37N6B53qIAWhAAAAAElFTkSuQmCC) > [!tip] 💡 > 也可以使用后期绑定的方式创建正则对象,代码如下。 Set objRegEx = CreateObject("vbscript.regexp") 正则对象有四个属性和三个方法。 ![[IMG-20260516155656188.png]] > [!tip] 💡 > 假设待处理的文本如下,现需要提取其中的姓名汉字和电话数字。 > **Name:张三丰,Phone:13801380000** > 示例代码如下。 ```javascript Sub RegExpDemoSyntax() Dim objRegEx As Object Set objRegEx = CreateObject("vbscript.regexp") objRegEx.Pattern = "Name:(.*?),Phone:(\d+)" objRegEx.Global = True myString = "Name:张三丰,Phone:13801380000" Set objMH = objRegEx.Execute(myString) If objMH.Count > 0 Then With objMH(j) Debug.Print .submatches(0), .submatches(1) End With End If Set objRegEx = Nothing End Sub ``` 代码在立即窗口输出结果如下: 张三丰 13801380000 由示例可以看到正则对象的属性和方法并不复杂,也可以说too simple。但是想用好正则就不是那么简单的事情,其核心在于如何编写正确高效的正则匹配模式,即设置Pattern参数。