以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 一大串数字 如何 输入完成后 自动 4位自动空一格 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=169676) |
-- 作者:31803263 -- 发布时间:2021/6/25 16:43:00 -- 一大串数字 如何 输入完成后 自动 4位自动空一格 一大串数字 如何 输入完成后 自动 4位自动空一格 |
-- 作者:有点蓝 -- 发布时间:2021/6/25 17:28:00 -- Dim s As String = "1234567890001" Dim d As Integer = s.Length - s.Length Mod 4 For i As Integer = d To 1 Step -4 s = s.Insert(i," ") Next Output.Show(s)
|
-- 作者:31803263 -- 发布时间:2021/6/28 16:22:00 -- 老大 这段代码到哪里去 |
-- 作者:有点蓝 -- 发布时间:2021/6/28 16:30:00 -- 在哪用就放到哪里。表格比如datacolchanging事件,文本框比如textchanged事件 |