关于正则表达式判断IP地址的问题
以下语句根本不能得到结果,(不论输入正确与否都是Flase)哪里错了?
' //利用正则表达式判断IP的输入格式是否符合标准
Dim objRegex As Regex = New Regex("@^(\d{1,2}|1\d\d|2[0-4]\d|25[0-5])\.(\d{1,2}|1\d\d|2[0-4]\d|25[0-5])\.(\d{1,2}|1\d\d|2[0-4]\d|25[0-5])\.(\d{1,2}|1\d\d|2[0-4]\d|25[0-5])$")
If objRegex.IsMatch(TextBox1.Text) Then
MessageBox.Show("IP格式不正确！请重新输入！")
' Else
' MessageBox.Show(objRegex.IsMatch(TextBox1.Text))
Return
End If
[解决办法]
Dim objRegex As Regex = New Regex("@^(\d{1,2}
[解决办法]
1\d\d
[解决办法]
2[0-4]\d
[解决办法]
25[0-5])\.(\d{1,2}
[解决办法]
1\d\d
[解决办法]
2[0-4]\d
[解决办法]
25[0-5])\.(\d{1,2}
[解决办法]
1\d\d
[解决办法]
2[0-4]\d
[解决办法]
25[0-5])\.(\d{1,2}
[解决办法]
1\d\d
[解决办法]
2[0-4]\d
[解决办法]
25[0-5])$")
我擦，，你这代码不是你自己写的，是从别人那COPY过来的吧。。
把@去掉！
[解决办法]
Dim objRegex As Regex = New Regex("^(\d{1,2}
[解决办法]
1\d\d
[解决办法]
2[0-4]\d
[解决办法]
25[0-5])\.(\d{1,2}
[解决办法]
1\d\d
[解决办法]
2[0-4]\d
[解决办法]
25[0-5])\.(\d{1,2}
[解决办法]
1\d\d
[解决办法]
2[0-4]\d
[解决办法]
25[0-5])\.(\d{1,2}
[解决办法]
1\d\d
[解决办法]
2[0-4]\d
[解决办法]
25[0-5])$")
If objRegex.IsMatch("192.168.1.1") Then
Console.WriteLine("IP格式正确！")
Else
Console.WriteLine("IP格式不正确！")
End If