读书人

刚看完正则语法如何在 VB.Net中使用

发布时间: 2012-01-06 22:55:18 作者: rapoo

刚看完正则语法,怎么在 VB.Net中使用正则表达式,举个简单例子就可以了。
比如只允许编辑框输入数字.代码怎么写?

[解决办法]
顶...
[解决办法]
Imports System.Text.RegularExpressions

Public Class Validate
Private _Regex As Regex
Private _Flag As Boolean

Private Sub Validate(ByVal tmpInfo As String, ByVal tmpRegular As String)
Try
Me._Regex = New Regex(tmpRegular)
Me._Flag = Me._Regex.IsMatch(tmpInfo)
Catch
Me._Flag = False
End Try
End Sub

Public ReadOnly Property ValidateIp(ByVal Ip As String) As Boolean
Get
Me.Validate(Ip, "^(25[0-5]|2[0-4][0-9]|[0-1]{1}[0-9]{2}|[1-9]{1}[0-9]{1}|[1-9])\.(25[0-5]|2[0-4][0-9]|[0-1]{1}[0-9]{2}|[1-9]{1}[0-9]{1}|[1-9]|0)\.(25[0-5]|2[0-4][0-9]|[0-1]{1}[0-9]{2}|[1-9]{1}[0-9]{1}|[1-9]|0)\.(25[0-5]|2[0-4][0-9]|[0-1]{1}[0-9]{2}|[1-9]{1}[0-9]{1}|[0-9])$ ")
Return Me._Flag
End Get
End Property

End Class


[解决办法]
网上例子很多
http://topic.csdn.net/t/20060313/13/4610928.html

读书人网 >VB Dotnet

热点推荐