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("派工已做1") = 0
e.DataRow("交单") = 0 'Nothing
e.DataRow("本次耗时")= 0
End If
End If
If e.DataCol.Name = "交单"
If e.DataRow(e.DataCol.Name) = "已交单"
e.DataRow("派工已做1") = 1
e.DataRow("交单1") = True
e.DataRow("姓名") = e.DataRow("工号")
e.DataRow("派工数量") = 1
Else
e.DataRow("派工已做1") = 0
e.DataRow("交单1") =False
e.DataRow("姓名") = Nothing
End If
End If
错误所在事件:表,派工_Table1,DataColChanged
详细错误信息:
调用的目标发生了异常。
从字符串“已交单”到类型“Boolean”的转换无效。
输入字符串的格式不正确。
你交单是逻辑列,
I
f 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("交单") = "已交单"肯定就不对啊。
“交单1”是逻辑列
“交单”是字符列
[此贴子已经被作者于2024/7/17 10:37:21编辑过]
e.DataRow("交单") = 0 'Nothing,改为e.DataRow("交单") = Nothing另外还要判断为空的情况
[此贴子已经被作者于2024/7/17 10:39:09编辑过]
先感谢。但还是不行的。
加单:是字符型
[此贴子已经被作者于2024/7/17 15:15:50编辑过]