主题：数字格式

这个就是字符，不是数字，哪有那么大的一个数字。

 

设置掩码咯 http://www.foxtable.com/webhelp/scr/3100.htm

 

 设置掩码一劳永逸。参考2楼。

 

那这个没办法，如果不确定卡号，掩码不能设置，必须用代码处理

 

你是需要把表的卡号显示在textbox上？你textbox绑定了表的列？

 

DataFormat事件，写代码。

 

 

Dim s As String = e.value
Dim p As String = ".{4}(?!$)"
Dim rgx = New System.Text.RegularExpressions.Regex(p, System.Text.RegularExpressions.RegexOptions.IgnoreCase)
e.Text = rgx.Replace(s, "$0 ")

TextChanged

 

systemready = False
Dim s As String = e.sender.text.replace(" ", "")
Dim p As String = ".{4}(?!$)"
Dim rgx = New System.Text.RegularExpressions.Regex(p, System.Text.RegularExpressions.RegexOptions.IgnoreCase)
Dim idx As Integer = e.sender.SelectionStart
e.sender.Text = rgx.Replace(s, "$0 ")
e.Sender.SelectionStart = idx+s.length\4
systemready = True

 

Validating

 

systemready = False
Dim str = e.sender.text.replace(" ", "")
e.Sender.text = str
systemready = True

 

DataFormat

 

Dim s As String = e.value.replace(" ", "")
Dim p As String = ".{4}(?!$)"
Dim rgx = New System.Text.RegularExpressions.Regex(p, System.Text.RegularExpressions.RegexOptions.IgnoreCase)
e.text = rgx.Replace(s, "$0 ")