标题：录入数字自动分层

1楼

zhuxinhui 发表于：2023/10/28 11:02:00

现在设置的层级为：1-2-2-2-2

如何才能够在第一列录入数字时自动生成分层

假如录入：1010101 自动生成 1.01.01.01

2楼

有点蓝 发表于：2023/10/28 11:24:00

如果规律是固定的。拆分字符和点号合成即可：http://www.foxtable.com/webhelp/topics/1338.htm

或者直接在对应位置插入点

Dim s As String = "1010101"

Dim ii() As Integer = {1, 2, 2, 2}

Dim idx As Integer = s.Length

For i As Integer = ii.Length - 1 To 1 Step - 1

idx = idx - ii(i)

s = s.Insert(idx, ".")

Output.Show(s)

共2 条记录, 每页显示 10 条, 页签: [1]