以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请教  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=138234)

--  作者:xu84988
--  发布时间:2019/7/26 4:09:00
--  请教
textBox 控件中输入账户卡号, 希望从前到后录入时,每次输入到第5位数字时,就在第四和五中间自动插入一个空格,应该写到textbox的什么属性中,还有代码应该是怎么写的.
[此贴子已经被作者于2019/7/26 9:40:15编辑过]

--  作者:有点蓝
--  发布时间:2019/7/26 9:48:00
--  
参考:

textchanged事件

Dim txt As String = e.Sender.Text.Replace(" ","")
If txt.Length > 4 AndAlso txt.Length Mod 4 = 1
    systemready = False
    e.Sender.Text = e.Sender.Text.Insert(e.Sender.Text.Length - 1," ")
    e.Sender.SelectionStart = e.Sender.Text.Length
    systemready = True
End If

--  作者:xu84988
--  发布时间:2019/7/26 10:04:00
--  谢谢蓝老师
完美解决!