呵呵,我正则也只会点简单的,偶也业余的。看过你的贴,很厉害的.....我在net下用textbox的测试如下,你看看是不是你要的结果:Imports System.Text.RegularExpressionsPublic Class Form1 Dim mText As String Function b(ByVal s As String, ByVal p As String) As Boolean Dim r As Regex = New Regex(p) b = r.IsMatch(s) End Function Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged Dim p As String = "^[0-9a-fA-F]{1,8}$" If b(TextBox1.Text, p) Then mText = TextBox1.Text Else TextBox1.Text = mText End If End SubEnd Class
MaskedTextBox没用过
我是在.NET下使用的,打开MaskedTextBox的Mask对话框后,在掩码里输入^[0-9a-fA-F]+$,得到的预览结果是^[ - -f -F]+¥,输入^[0-9a-fA-F]{1,8}$得到的结果^[ - -f -F]{1,8}¥。。只有空格的部分才是可以输入的。郁闷ING。。这个MASK中的正则似乎和其他的不一样。。
上次在.NET区里问一个关于TOKEN权限API和READPROCESSMEMORY应该怎么用就伤透心了,没一个明白的。不去。再翻资料,哪怕看教程也写不出来呢,我也不去。http://community.csdn.net/Expert/topic/5577/5577501.xml?temp=.5175135
Dim r As Regex = New Regex(p)
b = r.IsMatch(s)
End Function Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
Dim p As String = "^[0-9a-fA-F]{1,8}$"
If b(TextBox1.Text, p) Then
mText = TextBox1.Text
Else
TextBox1.Text = mText
End If
End SubEnd Class
啊呀我那BLOG整天做广告才那么几个访问的,哈哈,,厉害啥呀,太抬举我啦~~写什么都现学,直接对自己的智商头疼可能是抽烟太多了,明显不如以前的时候了
发布出去了,呵呵,经过N天的不屑努力,大家的不断的大力的支持(顶到我肺疼)刚刚发布了今天现到这里,陪媳妇去了。。要不人家脑了
有空下下来看看,提点意见~~~ ^_^
有空多交流啊~~代码我整理整理,然后写在BLOG上,特别是几个该死的API,弄的我头比门都大,那天出去的时候头都撞门框了,我kào!!!
http://community.csdn.net/Expert/topic/5585/5585724.xml?temp=.6193354
没人回帖我结不了啊。。郁闷了,帖子里的问题确实是像我说的那样,我就奇怪了,为什么我用CI引用的时候是将CI实例化,而不是将CI指向数组中的实例呢。。.NET还是太不熟悉了