[求助]如何判断表内所有行全部都满足指定条件后执行代码 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]如何判断表内所有行全部都满足指定条件后执行代码

共有2041人关注过本帖树形打印复制链接主题：[求助]如何判断表内所有行全部都满足指定条件后执行代码

qwersha

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：18 积分：199 威望：0 精华：0 注册：2016/9/10 13:18:00

[求助]如何判断表内所有行全部都满足指定条件后执行代码 发帖心情

Post By：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编辑过]

qwersha

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：18 积分：199 威望：0 精华：0 注册：2016/9/10 13:18:00

Post By：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下去。。咋解决呢。

下一主题 >> << 上一主题

主题：[求助]如何判断表内所有行全部都满足指定条件后执行代码