Dim rs As List(Of Row) '定义被选中的行的集合
If Tables(Deltables(TablePosition)).Current IsNot Nothing Then
If CheckMult.checked = True Then'如果勾选了多选控件
rs = Tables("通用记录表窗口_Table1").GetCheckedRows()
Else '如果不是多选模式下
rs.Add(Tables("通用记录表窗口_Table1").Current) ’要如何才能将当前行 加入到rs这个集合里的,我这个代码不能执行
End If
定义了rs 为row类型的行 如果勾选了多选控件 rs的数据 可以用GetCheckedRows() 获取 可没有勾选 我希望只得到当前行 但也需要将当前行 加入到rs的集合里
当然,这时候rs这个集合,实际只有一行数据
主要是后面的方法 如果不统一使用一个集合,,同一个方法 就只能分开写2次。