Foxtable(狐表)用户栏目专家坐堂 → [求助]请大侠进一步,简单语句逻辑捋顺了!{求优化方案}


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

主题:[求助]请大侠进一步,简单语句逻辑捋顺了!{求优化方案}

帅哥哟,离线,有人找我吗?
狐狸爸爸
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2015/4/16 20:16:00 [显示全部帖子]

看不懂你的描述,最好用一个图片或表格来列出各种情况,自己的需求,自己最清楚,自己捋不清楚,别人更看明白。

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2015/4/17 9:23:00 [显示全部帖子]

if 语句本身可以多分支的:


Select Case e.DataCol.name
    Case "第一列","第二列"
        If e.DataRow.isnull("第一列") OrElse e.DataRow.isnull("第二列") Then
            e.DataRow("第三列")=Nothing
        ElseIf e.DataRow("第一列")=e.DataRow("第二列") And e.DataRow("第一列")="aaa" And e.DataRow("第二列")="aaa" Then
            e.DataRow("第三列")="同类同"
        ElseIf e.DataRow("第一列")<>"aaa" And e.DataRow("第二列")<>"aaa" And e.DataRow("第一列")=e.DataRow("第二列") Then
            e.DataRow("第三列")="异类同"
        ElseIf e.DataRow("第一列") <> e.DataRow("第二列") And e.DataRow("第一列")<>"aaa"  And e.DataRow("第二列")<>"aaa" Then
            e.DataRow("第三列")="异类"
        ElseIf e.DataRow("第一列")="aaa" And e.DataRow("第二列")<>"aaa" Then
            e.DataRow("第三列")="顺差"
        ElseIf e.DataRow("第一列")<>"aaa" And e.DataRow("第二列")="aaa" Then
            e.DataRow("第三列")="逆差"
        Else
            e.DataRow("第三列")="注意异常请检查"
        End If
End Select

 回到顶部