- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助] 得到未选中复选框的行的集合 过程中出错 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=40687)
-- 发布时间：2013/9/26 18:30:00
-- [求助] 得到未选中复选框的行的集合 过程中出错
我想得到未选中复选框的行的集合 ，下面是我的代码
With CurrentTable
Dim rs As List(of Row)=.Rows
Dim crs As List(of Row)=.GetCheckedRows
For Each r As Row In crs
If .Rows.Contains(r)
rs.Remove(r)
End If
Next
End With
确定之后会出现这个错误
此主题相关图片如下：qq截图20130926181820.jpg
然后我把上面提示的代码删除，就出现这个错误
此主题相关图片如下：QQ截图20130926181820.jpg
[此贴子已经被作者于2013-9-26 21:04:24编辑过]
-- 发布时间：2013/9/26 19:21:00
--
如下代码，效率基本是一样的。
With CurrentTable
Dim rs As new List(Of Row)
Dim crs As new List(Of Row)
For Each r As Row In .Rows
If r.Checked Then
crs.Add(r)
Else
rs.add(r)
End If
Next
End With
-- 发布时间：2013/9/26 21:02:00
--
啊哈，终于没有弹框了，而且简单很多 ，谢谢有点甜老师~！
奇怪的是，我的代码语法应该没错的吧，竟然会报错。。。