标题：字符型怎么错

1楼

lin98 发表于：2024/9/23 9:39:00

DataTables("计划执行表A").ReplaceFor("审核 = '已审核'")

DataTables("计划执行表A").ReplaceFor("审核", '已审核')

上面二个都报错，如何改？

2楼

有点蓝 发表于：2024/9/23 9:43:00

DataTables("计划执行表A").ReplaceFor("审核", "已审核")

3楼

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

需求：如果表A的结束时间"="执行时间"和("事件") = Then'事件1'，执行“计划管理中的计划1

如果表A的结束时间"="执行时间"和("事件") = Then'事件2'，执行“计划管理中的计划2

如果表A的结束时间"="执行时间"和("事件") = Then'事件3'，执行“计划管理中的计划3

上面代码，如何改正？

4楼

有点蓝 发表于：2024/9/23 15:52:00

If dr("结束时间") = dr("执行时间") And dr("事件") = "事件" Then

共4 条记录, 每页显示 10 条, 页签: [1]