Excel2010VBA入門022Like運(yùn)算符模糊查詢

Excel2010VBA?門022Like運(yùn)算符模糊查詢?錄Like運(yùn)算符Like運(yùn)算符是VBA中常?的運(yùn)算符，通常?作模糊匹配，其作?是?來?較某個?本字符串是否符合給定的模式，若是則返回True，否則返回False。其語法如下：StringLikepattern其中，string為所要?較的?本，pattern為給定的模式。在pattern表?中，可以由表給定的字符對?本的內(nèi)容、長度進(jìn)?限制。需要注意的是，pattern表達(dá)式為?本，必須在兩邊加上雙引號(”)。符合string中的?例說明pattern中的字符任何單—字符?長度為1的?本任何單—字符?g長度為2的?本，且以“g”結(jié)尾*零個或多個字符*長度任意，內(nèi)容任意王*長度任意，以“王”開頭*王*長度任意，含有“王”#任何?個數(shù)字（0~9）##長度為2，且兩個均為數(shù)字[charlist]charlist中的任何單?字符[5-9]長度為1，且為5~9的數(shù)字[5-9]#*長度任意，第1個字符為5~9的數(shù)字，第2個字符為任意數(shù)字，之后的字符任意[!charlist]不在charlist中的任何單?字[!a-c]長度為If且不為?寫a~c中的字符符?例某公司員?編號均以1個?寫英?字母開頭，之后為3位數(shù)字。為防?錄?錯誤，希望能夠在錄?時對錄?的員?編號進(jìn)?判斷，?VBA實現(xiàn)。OptionExplicitSubLike運(yùn)算符()'變量聲明DimstrNo1AsStringDimstrNo2AsStringDimstrNo3AsString'編號初始化strNo1="123"strNo2="E234"strNo3="EE23"'判斷員?編號1并輸出結(jié)果IfstrNo1Like"[A-Z]###"ThenDebug.Print"員?編號1合法"ElseDebug.Print"員式編號1不合法"EndIf'判斷員?編號2并輸出結(jié)果IfstrNo2Like"[A-Z]###"ThenDebug.Print"員?編號2合法"ElseDebug.Print"員式編號2不合法"EndIf'判斷員?編號3并輸出結(jié)果IfstrNo1Like"[A-Z]###"ThenDebug.Print"員?編號3合法"ElseDebug.Print"員式編號3不合法"EndIfEndSubVBA?較模式在ExcelVBA中，?共有兩種?本?較的模式?？梢酝ㄟ^在模塊的最上?寫?Option語句進(jìn)?設(shè)置。OptionCompareBinary：?進(jìn)制?較模式。此模式為ExcelVBA默認(rèn)的?較?式，該模式中的英?字符是區(qū)分??寫的，?寫字母a??寫字母A?。OptionCompareText：?本