标题：GetComboListString统计后的分割符

1楼

timber83 发表于：2024/5/14 15:35:00

GetComboListString("内容", Filter).replace("|", " ")，这里如果需要使用换行符，应该如何写

2楼

有点蓝 发表于：2024/5/14 15:49:00

3楼

timber83 发表于：2024/5/14 21:05:00

If e.DataCol.Name = "条款码" Then

Dim Filter As String = "[条代码] = '" & e.NewValue & "'"

e.DataRow("条款内容") = DataTables("依据内容码").GetComboListString("内容", Filter).replace("|", " ")

End If

我需要合并后，能分行，该怎么改，求帮忙

4楼

有点蓝 发表于：2024/5/14 21:12:00

e.DataRow("条款内容") = DataTables("依据内容码").GetComboListString("内容", Filter).replace("|", vbcrlf)

5楼

timber83 发表于：2024/5/15 8:23:00

非常感谢

换行后，还要加入序号，又要怎么改代码呢？

6楼

有点蓝 发表于：2024/5/15 8:34:00

http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=191895

7楼

timber83 发表于：2024/5/15 15:45:00

上面的解答我看了，是合并文本时按照序号进行排序

我想问的，在文本合并统计后，原先文本没有序号的，想着能不能通过代码，自动增加序号（根据文本的行数增加）

8楼

有点蓝 发表于：2024/5/15 16:09:00

dim ss() as stirng = DataTables("依据内容码").GetComboListString("内容", Filter).split("|")

Dim s As String

For i As Integer = 0 To ss.length - 1

s = s & vbcrlf & (i + 1) & "，" & ss(i)

e.DataRow("条款内容") = s.trim(vbcrlf )

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