Foxtable(狐表)用户栏目专家坐堂 → [求助]求助Boolean的转换无效。


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

主题:[求助]求助Boolean的转换无效。

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


加好友 发短信
等级:狐精 帖子:3209 积分:21331 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2024/7/17 10:35:00 [显示全部帖子]

你交单是逻辑列,
If e.DataCol.Name = "交单1" Then
    If e.newvalue = True Then
        e.DataRow("派工已做1") = 1
        e.DataRow("交单") = "已交单"
        e.DataRow("本次耗时")=  e.DataRow("小时")*e.DataRow("人数")    'e.DataRow("数量")
        
    Else 
e.DataRow("交单") = "已交单"肯定就不对啊。

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


加好友 发短信
等级:狐精 帖子:3209 积分:21331 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2024/7/17 10:37:00 [显示全部帖子]

“交单”是逻辑列还是字符列?

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


加好友 发短信
等级:狐精 帖子:3209 积分:21331 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2024/7/17 10:39:00 [显示全部帖子]

e.DataRow("交单") = 0  'Nothing,改为e.DataRow("交单") = Nothing
另外还要判断为空的情况
[此贴子已经被作者于2024/7/17 10:39:09编辑过]

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


加好友 发短信
等级:狐精 帖子:3209 积分:21331 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2024/7/17 10:46:00 [显示全部帖子]

仔细看一下你的逻辑好像有问题,试试:
Dim dr As DataRow = e.DataRow
Select Case e.DataCol.Name
    Case "交单1", "交单"
        If dr("交单1") = True Then
            dr("派工已做1") = 1
            dr("交单") = "已交单"
            dr("本次耗时") = dr("小时") * dr("人数")
            dr("姓名") = dr("工号")
            dr("派工数量") = 1
        Else
            dr("派工已做1") = 0
            dr("交单") = Nothing
            dr("本次耗时") = 0
            dr("姓名") = Nothing
        End If
End Select 
[此贴子已经被作者于2024/7/17 10:51:31编辑过]

 回到顶部