| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]如何判断表内所有行全部都满足指定条件后执行代码 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=90571) |
| -- 作者：qwersha -- 发布时间：2016/9/17 13:09:00 -- [求助]如何判断表内所有行全部都满足指定条件后执行代码 不好意思，重复发帖了。昨天发的突然停电没能看到。 请教一下。例如表A 中 所有行 的 列一 都等于1的行 的列二 都等于2 那么执行命令 DataColChanged事件
Select Case e.DataCol.name Case "列一","列二" If e.DataRow("列一") = "1" AndAlso e.DataRow("列二") = "2" \'其它处理代码 MessageBox.Show("hello") End If End Select 用以上代码执行的话，如果表A有100行，他会弹出100个HELLO。 主要是想判断整个表是不是全部都满足条件，如果满足在执行代码。如果有任意一行不满足就不执行。 [此贴子已经被作者于2016/9/17 13:10:54编辑过]
|
| -- 作者：cbt -- 发布时间：2016/9/17 13:21:00 -- 弄个 按键 ，事件为 遍历 列一和列二 的 全部行，满足条件就执行你的代码 |
| -- 作者：qwersha -- 发布时间：2016/9/17 13:56:00 -- …… For Each dr As DataRow In DataTables("窗口_table1").DataRows If dr.IsNull("列一") And dr("列二")=True Then MessageBox.Show("HELLO“） End If Next 会一直HELLO。。有一万条就一万个HELLO下去。。咋解决呢。
|
| -- 作者：有点蓝 -- 发布时间：2016/9/17 14:36:00 -- http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=90553 |