Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Otvorte niektorú z aplikácií balíka Office , ako je Word , Excel alebo Access . Stlačte tlačidlo " Alt " a " F11 " súčasne pre vstup do programovacieho prostredia VBA , kliknite na " Vložiť " menu hlavičky. Kliknite na " Module " položku , ktorú chcete vytvoriť nové okno , v ktorom sa vstúpiť programy VBA
2
Zadajte nasledujúce príkazy vytvoriť podprogram , v ktorom chcete použiť regulárne výrazy : .
sub RegularExpressionTester ( ) End sub
3
pred " End sub " vyhlásenie o programe vytvoriť regulárny výraz objektu z VBScript Zadajte nasledujúci príkaz . Tento príkaz vytvorí objekt , ktorého funkcia vykonávať regulárnych výrazov vyhľadávanie .
Set objRegExp = CreateObject ( " vbscript.regexp " )
4
typu " objRegExp.Global = true " , ak chcete , aby vaše regulárny výraz tak , aby zodpovedala reťazec len na prvý výskyt reťazca . Typ " objRegExp.Global = false " , ak chcete , aby zodpovedal na všetky výskyty reťazca . Napríklad , ak hľadáte pre " @ " charakteru v e - mailovú adresu a len chcete nájsť prvý výskyt tohto znaku , nastavte " globálne " na " false " .
5 Typ
" objRegExp.IgnoreCase = true " , ak chcete , aby vaše regulárny výraz ignorovať prípad , kedy zodpovedajúci reťazec . Nastavte túto vlastnosť na false , ak budete potrebovať prípad reťazca hľadáte tak , aby zodpovedala regulárneho výrazu . Napríklad , ak ste potvrdenie e - mailové adresy, ktoré nie sú rozlišované , nastavte túto vlastnosť na hodnotu " true " .
6
typu " objRegExp.Pattern = " zadajte vzor regulárneho výrazu chcete , aby zodpovedal vstupnom reťazci . Napríklad na overenie e - mailovú adresu , ktorú ste mohli zahrnúť vzor regulárneho výrazu ako " [ az, AZ ] * @ [ az, AZ ] * . Com . " Tento vzorec určuje reťazec s abecedné znaky pred a po " , @ " symbol . Vzor obsahuje tiež podreťazec domény " . Com . Všimnite si , že skutočné e - mailovej adresy môže byť zložitejšie , než toto zjednodušené vzorom .
7
typu " Nastaviť regExpMatches = objRegExp.Execute ( strToSearch ) " uplatniť svoje regulárneho výrazu pre vstupný reťazec " strToSearch . " Pre príklad email validácie , ktoré ste predtým nastavili premennú " strToSearch " na text , ktorý chcete overiť ako e - mailovú adresu . Jedna ukážka príkazu nastaviť túto premennú je " strToSearch = " ClarkKent@DailyPlanet.com " "
8
typu " Ak regExpMatches.Count = 0 , potom " otestovať , či regulárny výraz objektu uzavreté ľubovoľný text vo vstupnom reťazci . Ak váš vkladanie textu bolo " ClarKent@DailyPlanet.com " pre príklad email overenie , potom " gróf " by 1. Dalo by sa teda napísať vyhlásenie , že text bol platnú e - mailovú adresu : . " MsgBox ( " . Tento reťazec je platnú e - mailovú adresu " ) "