”公司表“里作了一些标记，我的目的是让可见行显示一些标记，这些标记和”传真表“里有关联，关联列是单位编号，也就是“传真表”里有这个编号的行，打开“公司表”时可见行就显示标记，否则不显示标记，以下是代码，测试时出现运行错误，“至少一个参数没有被指定值。”，是什么原因
If DataTables("公司").DataRows.Count = 0 Then '如果公司表没有加载数据
DataTables("发传真").LoadFilter = "单位编号 Is Null" '发传真表不加载数据
Else
'Output.Show(Tables("公司_Table1").TopVisibleRow)
'Output.Show(Tables("公司_Table1").BottomVisibleRow)
Dim a As Integer = Tables("公司_Table1").TopVisibleRow
Dim b As Integer = Tables("公司_Table1").BottomVisibleRow
Dim i As Integer
For i = a To b
Output.Show(Tables("公司_Table1").Rows(i)("单位编号"))
Dim ids As String
ids = ids & "," & Tables("公司_Table1").Rows(i)("单位编号")
If i = b Then
ids = ids.Trim(",")
'Output.Show(ids)
DataTables("发传真").LoadFilter = "单位编号 In (" & ids & ")"
End If
Next
End If
DataTables("发传真").Load()
加好友 
发短信
Post By：2020/6/8 16:21:00 [只看该作者]
