扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
不知道你说的空是哪种意思?
创新互联主要从事成都做网站、网站建设、网页设计、企业做网站、公司建网站等业务。立足成都服务德宏州,十年网站建设经验,价格优惠、服务专业,欢迎来电咨询建站服务:18982081108
有两种说法,一种是String.Empty,例如
Dim s As String = String.Empty 等同于 Dim s As String = ""
这种情况下直接If s = "" Then就可以判断是不是空.
还有一种是Nothing,必须要用If IsNothing(s) Then来判断.
用 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"
很简单,用字符串查找函数就可以实现了。\x0d\x0a当在StrB查找到StrA字符串时,返回肯定是非0的数,值就是True,找不到为0或者-1,值就是Flase\x0d\x0a\x0d\x0a比如:\x0d\x0aDim StrA As String = "Time is Limited"\x0d\x0aDim StrB As String = "Time"\x0d\x0aDim Stu As Boolean= InStr(StrA, StrB)\x0d\x0a\x0d\x0a这运行段代码,Stu值就是True了。\x0d\x0a我觉得这样最简单有效。
如果是要判断引用类型可以用TypeOf来判断
Dim s = "666"
If TypeOf (s) Is String Then
Debug.Print("string")
Else
Debug.Print("not string")
End If
如果不知道是否是引用类型,可以这样判断:
Dim s = 666
If VarType(s) = VariantType.String Then
Debug.Print("string")
Else
Debug.Print("not string")
End If
或者:
Dim s = 666
If s.GetType = "".GetType Then
Debug.Print("string")
Else
Debug.Print("not string")
End If
可以用VB6里的函数
isnumeric()
比如要判断文本框里的内容是否数字
if isnumeric(TextBox1.text) Then
msgbox("是数字!")
else
msgbox("不是数字!")
end if
有一个字符串函数:Instr(n,S1,S2)
该函数的功能:从字符串S1的左起第N位开始,向右逐位进行搜索匹配字符串S2,如果找到匹配,就返回一个整数指明匹配的位置,否则就返回0。如果缺省n,就是默认从字符串S1的左起第1位开始,进行搜索匹配字符串S2。
例如1:Instr(1,"abcde","a"),返回1
例如2:Instr(3,"abcde","a"),返回0
例如3:Instr(1,"abcde","c"),返回3
例如4:Instr(1,"abcde","cde"),返回3
例如5:Instr(4,"ab12cd12e12","12"),返回7,这里从字符串"ab12cd12e12"左起第4位开始向右搜索匹配字符串"12",找到的是中间一个“12”,这个“12”是位于字符串"ab12cd12e12"左起的第7个字符。
而:Instr(1,"ab12cd12e12","12"),返回3
Instr("ab12cd12e12","12"),返回3
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流