以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]数字分节显示  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=173939)
--  作者：2425004926
--  发布时间：2021/12/23 11:50:00
--  [求助]数字分节显示
如何将  “表A”  的  “大小”  列里的数字分节显示，
比如输入123456789，显示成123，456，789
输入12345，显示成12，345
--  作者：有点蓝
--  发布时间：2021/12/23 12:00:00
--  
Dim s As String = "12345678"
Dim len As Integer = s.Length
For i As Integer = len - 3 To 0 Step -3
    s = s.Insert(i,",")
Next
Output.Show(s)
--  作者：2425004926
--  发布时间：2021/12/23 12:31:00
--  
 谢谢老师，编辑是没有问题，如果是代码导入的数据，显示就没有分节
--  作者：2425004926
--  发布时间：2021/12/23 13:05:00
--  
已解决，我在导入数据中也增加了代码，OK
--  作者：WELOVEFOX
--  发布时间：2021/12/24 14:53:00
--  
mark一下

Dim s As String = "12345678"
Dim len As Integer = s.Length
For i As Integer = len - 3 To 1 Step -3
    s = s.Insert(i,",")
Next
Output.Show(s)
[此贴子已经被作者于2021/12/24 14:53:33编辑过]