Foxtable(狐表)用户栏目专家坐堂 → 如何数据标记


  共有4212人关注过本帖树形打印复制链接

主题:如何数据标记

帅哥哟,离线,有人找我吗?
jason_pitt
  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:126 积分:898 威望:0 精华:0 注册:2016/8/2 9:17:00
  发帖心情 Post By:2016/8/4 10:40:00 [显示全部帖子]

Select Case e.DataCol.Name

    Case "高锰酸盐指数","五日生化需氧量","氨氮"

        If e.DataRow.IsNull("高锰酸盐指数") = False AndAlso e.DataRow.IsNull("五日生化需氧量") = False AndAlso e.DataRow.IsNull("氨氮") = False Then

            If e.DataRow("高锰酸盐指数") <= 4 AndAlso e.DataRow("五日生化需氧量") <= 3 AndAlso e.DataRow("氨氮") <=0.5 Then

                e.DataRow("断面类别") = 2

           If 4<e.DataRow("高锰酸盐指数") <= 6 AndAlso 3<e.DataRow("五日生化需氧量") <= 4 AndAlso 0.5<e.DataRow("氨氮") <= 1 Then

                e.DataRow("断面类别") = 3

 

 If 6<e.DataRow("高锰酸盐指数") <= 10 AndAlso 4<e.DataRow("五日生化需氧量") <= 6 AndAlso 1<e.DataRow("氨氮") <= 1.5 Then

                e.DataRow("断面类别") = 4

 If 10<e.DataRow("高锰酸盐指数") <= 15 AndAlso 6<e.DataRow("五日生化需氧量") <= 10 AndAlso 1.5<e.DataRow("氨氮") <= 2.0 Then

                e.DataRow("断面类别") = 5

If e.DataRow("高锰酸盐指数") >15 AndAlso e.DataRow("五日生化需氧量") >10 AndAlso e.DataRow("氨氮") > 2.0 Then

                e.DataRow("断面类别") = 6

 

                End If

              End If

End If

End If

End If

End If

        

End Select

<!--EndFragment-->

 回到顶部
帅哥哟,离线,有人找我吗?
jason_pitt
  12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:126 积分:898 威望:0 精华:0 注册:2016/8/2 9:17:00
  发帖心情 Post By:2016/8/4 10:40:00 [显示全部帖子]

您好,我是想表达这么个意思,就是比如我举的例子,高锰酸盐指数、五日生化需氧量和氨氮三个指标,如果高锰酸盐指数的值是3类,五日生化需氧量的值是5类,氨氮的值是6类,那么这个断面就是6类;如果高锰酸盐指数的值是2类,五日生化需氧量的值是3类,氨氮的值是5类,那么这个断面就是5类,取最大的那个类别作为最终的判定类别,如果设置?谢谢


 回到顶部
帅哥哟,离线,有人找我吗?
jason_pitt
  13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:126 积分:898 威望:0 精华:0 注册:2016/8/2 9:17:00
  发帖心情 Post By:2016/8/4 10:48:00 [显示全部帖子]

谢谢,我试一下


 回到顶部
帅哥哟,离线,有人找我吗?
jason_pitt
  14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:126 积分:898 威望:0 精华:0 注册:2016/8/2 9:17:00
  发帖心情 Post By:2016/8/4 10:54:00 [显示全部帖子]

您好,我试过了,还不是按我的意思显示的,如何更正了
图片点击可在新窗口打开查看此主题相关图片如下:456.png
图片点击可在新窗口打开查看
我是想表达这么个意思,就是比如我举的例子,高锰酸盐指数、五日生化需氧量和氨氮三个指标,如果高锰酸盐指数的值是3类,五日生化需氧量的值是5类,氨氮的值是6类,那么这个断面就是6类;如果高锰酸盐指数的值是2类,五日生化需氧量的值是3类,氨氮的值是5类,那么这个断面就是5类,取最大的那个类别作为最终的断面类别

 回到顶部
帅哥哟,离线,有人找我吗?
jason_pitt
  15楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:126 积分:898 威望:0 精华:0 注册:2016/8/2 9:17:00
  发帖心情 Post By:2016/8/4 11:13:00 [显示全部帖子]

谢谢,就是这个意思,太感谢了

 回到顶部
帅哥哟,离线,有人找我吗?
jason_pitt
  16楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:126 积分:898 威望:0 精华:0 注册:2016/8/2 9:17:00
  发帖心情 Post By:2016/8/4 16:03:00 [显示全部帖子]

Select Case e.DataCol.Name
    
    Case "高锰酸盐指数","五日生化需氧量","氨氮"
        
        If e.DataRow.IsNull("高锰酸盐指数") = False AndAlso e.DataRow.IsNull("五日生化需氧量") = False AndAlso e.DataRow.IsNull("氨氮") = False Then
            Dim lb1, lb2, lb3 As Char
            If e.DataRow("高锰酸盐指数") <= 4 Then
                lb1 = "Ⅱ类"
            ElseIf e.DataRow("高锰酸盐指数") <= 6 Then
                lb1 = "Ⅲ类"
            Else If e.DataRow("高锰酸盐指数") <= 10 Then
                lb1 = "Ⅳ类"
            Else If e.DataRow("高锰酸盐指数") <= 15 Then
                lb1 = "Ⅴ类"
            Else
                lb1 = "劣Ⅴ"
            End If
            
            If e.DataRow("五日生化需氧量") <= 3 Then
                lb2 = "Ⅱ类"
            ElseIf e.DataRow("五日生化需氧量") <= 4 Then
                lb2 = "Ⅲ类"
            ElseIf e.DataRow("五日生化需氧量") <= 6 Then
                lb2 = "Ⅳ类"
            ElseIf e.DataRow("五日生化需氧量") <= 10 Then
                lb2 = "Ⅴ类"
            Else
                lb2 = "劣Ⅴ"
            End If
            
            If e.DataRow("氨氮") <=0.5 Then
                lb3 = "Ⅱ类"
            ElseIf e.DataRow("氨氮") <=1 Then
                lb3 = "Ⅲ类"
            ElseIf e.DataRow("氨氮") <=1.5 Then
                lb3 = "Ⅳ类"
            ElseIf e.DataRow("氨氮") <=2 Then
                lb3 = "Ⅴ类"
            Else
                lb3 = "劣Ⅴ"
            End If
            
            If lb1 > lb2 Then lb2 = lb1
            If lb2 > lb3 Then lb3 = lb2
            
            e.DataRow("断面类别") = lb3
        End If
End Select

图片点击可在新窗口打开查看此主题相关图片如下:789.png
图片点击可在新窗口打开查看


 回到顶部
帅哥哟,离线,有人找我吗?
jason_pitt
  17楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:126 积分:898 威望:0 精华:0 注册:2016/8/2 9:17:00
  发帖心情 Post By:2016/8/4 16:04:00 [显示全部帖子]

请问,为什么结果显示的只有一个字符,我设置列的时候,是16个字符,但是显示不完全,差一个类子,劣V类,只能显示劣一个字,错在什么地方了,求解。谢谢

 回到顶部
帅哥哟,离线,有人找我吗?
jason_pitt
  18楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:126 积分:898 威望:0 精华:0 注册:2016/8/2 9:17:00
  发帖心情 Post By:2016/8/4 17:15:00 [显示全部帖子]

您好,我按您的写进去了,但是数值低的时候,正常,数据大一点,就出现异常,说调用的目标发生了异常,索引超出了数组的界限,请问如何调整数组的界限?谢谢

 回到顶部
帅哥哟,离线,有人找我吗?
jason_pitt
  19楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:126 积分:898 威望:0 精华:0 注册:2016/8/2 9:17:00
  发帖心情 Post By:2016/8/4 17:16:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:9.png
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
jason_pitt
  20楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:126 积分:898 威望:0 精华:0 注册:2016/8/2 9:17:00
  发帖心情 Post By:2016/8/4 17:16:00 [显示全部帖子]

您好,我按您的写进去了,但是数值低的时候,正常,数据大一点,就出现异常,说调用的目标发生了异常,索引超出了数组的界限,请问如何调整数组的界限?谢谢

 回到顶部
总数 22 上一页 1 2 3 下一页