以文本方式查看主题 - 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 -- 谢谢蓝老师 完美解决! |