vb怎么判断text1内是否有123456这串字符

显示全部楼层 · 2013-10-20 20:55:23

在VB6.0和VB.NET中，都可以用InStr函数判断字符串b是否包含于字符串a中。方法是：
TextBox1.Text = "123456jdjfdkfjdjfjee"
Dim b As String
b = "123456"
If InStr(TextBox1.Text, b) > 0 Then
MsgBox("TextBox1中包含 " & b)
Else
MsgBox("TextBox1中不包含 " & b)
End If在VB.NET中，还可以用IndexOf方法来判断。方法是 ...

千问 · 2013-10-20 20:55:23

Private Sub Command1_Click()
If InStr(1, Text1.Text, "123456") > 0 Then
MsgBox "有"
Else
MsgBox "无"
End IfEnd Sub...