Foxtable(狐表) → 用户栏目 → 专家坐堂 → 正负值问题


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

主题：正负值问题
帅哥哟，离线，有人找我吗？
denghui69986
 小大  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：429 积分：2766 威望：0 精华：0 注册：2022/3/25 7:44:00 		  发帖心情 Post By：2022/8/22 10:46:00 [只看该作者]

是个人记件的生产的数量=合计数量表达列：IsNull([数量],0  ) + IsNull([数量1],0) + IsNull([数量2],0) + IsNull([数量3],0) + IsNull([数量4],0) + IsNull([数量5],0)

 回到顶部
帅哥哟，离线，有人找我吗？
denghui69986
 小大  12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：429 积分：2766 威望：0 精华：0 注册：2022/3/25 7:44:00 		  发帖心情 Post By：2022/8/22 10:52:00 [只看该作者]

下面截图
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106063 积分：539408 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/8/22 10:53:00 [只看该作者]

If e.DataCol.Name = "数量" orelse e.DataCol.Name = "订单数量" orelse e.DataCol.Name = "数量1" ..... Then 
    If (e.Datarow("数量") + e.Datarow("数量1") + ....) > e.Datarow("订单数量") Then 
        messagebox.show("xxx提示")
    End If
End If

我们可以换个思路，既然C列是有A列和B列计算得出，那么C列发生变化，肯定是因为A列或B列发生变化引起的。
所以正确的代码是：

Select Case e.DataCol.Name
    Case "A" ,"B"
          '计算D列的代码
End Select
 回到顶部
帅哥哟，离线，有人找我吗？
denghui69986
 小大  14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：429 积分：2766 威望：0 精华：0 注册：2022/3/25 7:44:00 		  发帖心情 Post By：2022/8/22 11:10:00 [只看该作者]

弹窗提升错误
图片点击可在新窗口打开查看

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  15楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106063 积分：539408 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/8/22 11:22:00 [只看该作者]

省略号表示还有数量2、3、等等的判断，自己补齐

 回到顶部
帅哥哟，离线，有人找我吗？
denghui69986
 小大  16楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：429 积分：2766 威望：0 精华：0 注册：2022/3/25 7:44:00 		  发帖心情 Post By：2022/8/22 11:35:00 [只看该作者]

If e.DataCol.Name = "数量合计" OrElse e.DataCol.Name = "订单数量" OrElse e.DataCol.Name = "数量", "数量1", "数量2", "数量3", "数量4", "数量5"Then Then 
    If (e.DataRow("数量") + e.DataRow("数量1") + e.DataRow("数量2") + e.DataRow("数量3") + e.DataRow("数量4") + e.DataRow("数量5")) > e.DataRow("订单数量") Then
        messagebox.show("注意：你输入生产数量已经超出订单数值！！！！")
    End If
End If
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  17楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106063 积分：539408 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/8/22 11:40:00 [只看该作者]

 

OrElse e.DataCol.Name = "数量" OrElse e.DataCol.Name ="数量1" OrElse ......
 回到顶部
帅哥哟，离线，有人找我吗？
denghui69986
 小大  18楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：429 积分：2766 威望：0 精华：0 注册：2022/3/25 7:44:00 		  发帖心情 Post By：2022/8/22 12:14:00 [只看该作者]

不知什么原因
If e.DataCol.Name = "数量合计" OrElse e.DataCol.Name = "订单数量" OrElse e.DataCol.Name = "数量" OrElse e.DataCol.Name = "数量1" OrElse"数量1", OrElse "数量2"OrElse "数量3"OrElse"数量4"OrElse"数量5"Then Then 
    If (e.DataRow("数量") + e.DataRow("数量1") + e.DataRow("数量2") + e.DataRow("数量3") + e.DataRow("数量4") + e.DataRow("数量5")) > e.DataRow("订单数量") Then
        messagebox.show("注意：你输入生产数量已经超出订单数值！！！！")
    End If
End If
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  19楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106063 积分：539408 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/8/22 13:32:00 [只看该作者]

图片点击可在新窗口打开查看

每个数量都像红字那样写，窗纸都捅破成这样了，还看不清么？

If e.DataCol.Name = "数量合计" OrElse e.DataCol.Name = "订单数量" OrElse e.DataCol.Name = "数量" OrElse e.DataCol.Name = "数量1" OrElse OrElse e.DataCol.Name = "数量2" OrElse e.DataCol.Name = "数量3" OrElse ......
 回到顶部
帅哥哟，离线，有人找我吗？
denghui69986
 小大  20楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：429 积分：2766 威望：0 精华：0 注册：2022/3/25 7:44:00 		  发帖心情 Post By：2022/8/22 13:54:00 [只看该作者]

感谢老师指导，终于可以了，谢谢

 回到顶部
总数 20 上一页 1 2
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05469 秒, 4 次数据查询