[求助]表内条件比较并作标记（已解决） - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]表内条件比较并作标记（已解决）

共有2514人关注过本帖树形打印复制链接主题：[求助]表内条件比较并作标记（已解决）

大红袍

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

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2015/5/14 22:04:00 [显示全部帖子]

当C000大于R000 是什么意思？怎么比较

大红袍

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

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2015/5/14 22:20:00 [显示全部帖子]

For Each ygbh As String In DataTables("门禁查询").GetValues("员工编号")
Dim r As Date = DataTables("门禁查询").Compute("max(日期时间)", "员工编号 = '" & ygbh & "' and 设备编号 = 'R000'")
Dim c As DataRow = DataTables("门禁查询").Find("员工编号 = '" & ygbh & "' and 设备编号 = 'C000'", "日期时间 desc")

    If c IsNot Nothing AndAlso c("日期时间") > r Then
        c("标记") = 1
    End If
Next

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

主题：[求助]表内条件比较并作标记（已解决）