共4 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：模拟关联表的明细表的序号列的值如何自动生成？
1楼
lin98 发表于：2025/1/10 18:53:00模拟关联表的明细表的序号列的值如何自动生成？
2楼
有点蓝 发表于：2025/1/11 9:27:003楼
lin98 发表于：2025/1/11 9:35:00
此主题相关图片如下：序号.jpg
问题一：只要简单的序号，在每个明细自动生成如记录顺序号，比如：1、2、3、、、、、，如何实现？
问题二：用下代码实现，在每个明细自动生成如记录顺序号，比如：1、2、3、、、、、，如何实现？
Dim Cols3() As String = {"第一列", "第二列"}'
Dim Cols4() As String = {"第一列", "第二列"}'
For Each dr3 As DataRow In DataTables("表A").Select("[选中] = 1 ")'
Dim dr4 As Row = Tables("表B").AddNew() '
For r As Integer = 0 To Cols3.Length - 1
dr4(Cols4(r)) = dr3(Cols3(r))
Next
dr4(序号)如何实现？
Next
4楼
有点蓝 发表于：2025/1/11 10:08:00编程基础：http://www.foxtable.com/webhelp/topics/0225.htm
Dim drs As List(Of DataRow) = DataTables("表A").Select("[选中] = 1 ") http://www.foxtable.com/webhelp/topics/0400.htm
For i As Integer = 0 To drs .Count - 1
Dim dr3 As Row = drs(i)
Dim dr4 As Row = Tables("表B").AddNew() '
For r As Integer = 0 To Cols3.Length - 1
dr4(Cols4(r)) = dr3(Cols3(r))
Next
dr4(序号) = (i+1)
Next
共4 条记录, 每页显示 10 条, 页签:
[1]