以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 字符型怎么错 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=193520) |
-- 作者:lin98 -- 发布时间:2024/9/23 9:39:00 -- 字符型怎么错 DataTables("计划执行表A").ReplaceFor("审核 = \'已审核\'") DataTables("计划执行表A").ReplaceFor("审核", \'已审核\') 上面二个都报错,如何改?
|
-- 作者:有点蓝 -- 发布时间:2024/9/23 9:43:00 -- DataTables("计划执行表A").ReplaceFor("审核", "已审核") |
-- 作者:lin98 -- 发布时间:2024/9/23 15:34:00 -- Dim d2 As Date = DataTables("表A").Current Dim drs As List(Of DataRow) drs = DataTables("表A").Select("[事件] = \'" & d2("事件") & "\'") For Each dr As DataRow In drs If drs("结束时间") = drs("执行时间") And drs("事件") = Then\'事件1\' Then 计划1 ElseIf drs("结束时间") = drs("执行时间") And drs("事件") = Then\'事件2\' Then 计划2 ElseIf drs("结束时间") = drs("执行时间") And drs("事件") = Then\'事件3\' Then 计划3 Else 计划X End If Next 需求:如果表A的结束时间"="执行时间"和("事件") = Then\'事件1\',执行“计划管理中的计划1 如果表A的结束时间"="执行时间"和("事件") = Then\'事件2\',执行“计划管理中的计划2 如果表A的结束时间"="执行时间"和("事件") = Then\'事件3\',执行“计划管理中的计划3 上面代码,如何改正?
|
-- 作者:有点蓝 -- 发布时间:2024/9/23 15:52:00 -- If dr("结束时间") = dr("执行时间") And dr("事件") = "事件" Then |