多条件判断 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 多条件判断

共有12557人关注过本帖树形打印复制链接主题：多条件判断

liujinshui

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

加好友

发短信

等级：婴狐帖子：16 积分：207 威望：0 精华：0 注册：2011/11/1 8:03:00

多条件判断

Post By：2012/2/9 6:44:00 [只看该作者]

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目7.table

你好：版主

如何实现根据不同的车间、不同的产品，要求的合格率指标也不相同。如何写出“不合格”、“合格”、“良好”、“优秀”的判断表达式来。

狐狸爸爸

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

加好友

发短信

等级：管理员帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2012/2/9 8:49:00 [只看该作者]

怎样才算合格、不合格、良好、优秀？

liujinshui

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

加好友

发短信

等级：婴狐帖子：16 积分：207 威望：0 精华：0 注册：2011/11/1 8:03:00

Post By：2012/2/9 9:09:00 [只看该作者]

比如：一车间A产品成品率>93%为合格，>96%为良好、>98%为优秀.

二车间B产品成品率>90%为合格，>94%为良好、>96%为优秀。

狐狸爸爸

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

加好友

发短信

等级：管理员帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2012/2/9 10:42:00 [只看该作者]

设置在表A的DataColChanged事件：

Select Case e.DataCol.name
    Case "成品率"
        If e.DataRow("车间") = "一车间" Then
            If e.DataRow("成品率") > 0.98 Then
                e.DataRow("是否达标") = "优秀"
            ElseIf e.DataRow("成品率") > 0.96 Then
                e.DataRow("是否达标") = "良好"
            ElseIf e.DataRow("成品率") > 0.93 Then
                e.DataRow("是否达标") = "合格"
            Else
                e.DataRow("是否达标") = "不合格"
            End If
        ElseIf e.DataRow("车间") = "二车间"
            If e.DataRow("成品率") > 0.96 Then
                e.DataRow("是否达标") = "优秀"
            ElseIf e.DataRow("成品率") > 0.94 Then
                e.DataRow("是否达标") = "良好"
            ElseIf e.DataRow("成品率") > 0.90 Then
                e.DataRow("是否达标") = "合格"
            Else
                e.DataRow("是否达标") = "不合格"
            End If
End Select