Dim A As String, B As String
成都網(wǎng)絡(luò)公司-成都網(wǎng)站建設(shè)公司成都創(chuàng)新互聯(lián)公司10年經(jīng)驗(yàn)成就非凡,專(zhuān)業(yè)從事成都做網(wǎng)站、成都網(wǎng)站設(shè)計(jì),成都網(wǎng)頁(yè)設(shè)計(jì),成都網(wǎng)頁(yè)制作,軟文發(fā)稿,廣告投放平臺(tái)等。10年來(lái)已成功提供全面的成都網(wǎng)站建設(shè)方案,打造行業(yè)特色的成都網(wǎng)站建設(shè)案例,建站熱線:028-86922220,我們期待您的來(lái)電!
A = "123456"
B = "123456"
If A = B Then GoTo xiangdeng
MsgBox "不相等"
GoTo buxiangdeng
xiangdeng:
MsgBox "相等"
buxiangdeng:
select case strings.right(S1,4)
case ".jpg",".bmp",".png"
你的處理代碼
end select
string 里的功能很基本。
strings類(lèi)里有很多靜態(tài)的字符串處理函數(shù),很好用的,好好研究吧。
用 Like
% = 任意數(shù)量的字符
?= 單個(gè)字符
類(lèi)似簡(jiǎn)易的正規(guī)則比對(duì)。
具體可參照MSDN
例:(以下代碼可以直接放到程序里執(zhí)行)
dim str as string
str = "abc123"
if str like "a%" then msgbox "yes"
if str like "%a%2%" then msgbox "yes"
if str like "%3" then msgbox "yes"
if str like "%3?" = false then msgbox "no"