大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
Dim A As String, B As String
成都网络公司-成都网站建设公司成都创新互联公司10年经验成就非凡,专业从事成都做网站、成都网站设计,成都网页设计,成都网页制作,软文发稿,广告投放平台等。10年来已成功提供全面的成都网站建设方案,打造行业特色的成都网站建设案例,建站热线:028-86922220,我们期待您的来电!
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类里有很多静态的字符串处理函数,很好用的,好好研究吧。
用 Like
% = 任意数量的字符
?= 单个字符
类似简易的正规则比对。
具体可参照MSDN
例:(以下代码可以直接放到程序里执行)
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"