| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- [求助]无法执行“=”操作 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=145134) |
| -- 作者：lgj716330 -- 发布时间：2020/1/9 14:22:00 -- [求助]无法执行“=”操作 DataColChanged Dim dr As DataRow = e.DataRow If e.DataCol.Name = "开始日期" And dr.IsNull("开始日期") = False Then For Each nm() As String In DataTables("登记表").GetValues("编号|开始日期|截止日期") dr("月数") = DataTables("登记表").Compute("count(月份)","编号 = \'" & nm(0) & "\' And [开始日期] = \'" & nm(1) & "\' And [截止日期] = \'" & nm(2) & "\'") Next End If 重置开始日期列的时候发生错误 调用的目标发生了异常。 无法在 System.DateTime 和 System.String 上执行“=”操作。 [此贴子已经被作者于2020/1/9 14:22:41编辑过]
|
| -- 作者：有点蓝 -- 发布时间：2020/1/9 15:13:00 -- Dim dr As DataRow = e.DataRow If e.DataCol.Name = "开始日期" orelse e.DataCol.Name = "截止日期" if dr.IsNull("开始日期") = False andalso dr.IsNull("截止日期") = False andalso dr.IsNull("编号") = False Then dr("月数") = DataTables("登记表").Compute("count(月份)","编号 = \'" & dr("编号") & "\' And [开始日期] = \'" & dr("开始日期") & "\' And [截止日期] = \'" & dr("截止日期") & "\'") else dr("月数") = nothing endif End If
|
| -- 作者：lgj716330 -- 发布时间：2020/1/9 20:10:00 -- [此贴子已经被作者于2020/1/9 20:37:34编辑过]
|