Office中国论坛/Access中国论坛

标题: 这代码哪里错了 [打印本页]

作者: snryga 时间: 2017-1-7 22:35
标题: 这代码哪里错了
Private Sub 整体完工时间_AfterUpdate()
If Me.整体完工时间 <> "" Then
Me.是否转交 = "是"

ElseIf Me.整体完工时间 = "" Then
Me.是否转交 = "否"
End If

End Sub

作者: 阿cc-ess-VBA 时间: 2017-1-8 07:16
Private Sub 整体完工时间_AfterUpdate()
If Me.整体完工时间 <> "" Then
Me.是否转交 = "是"

Else
Me.是否转交 = "否"
End If

End Sub

作者: xinrenq 时间: 2017-1-8 13:28
从写法上，没问题，
如果是字段数据类型出错，或格式出错，这里是看不出来，（你没有贴出错误提示）
如果以上没错的话，那就考虑你的 Me.整体完工时间是否为Null值出错，进行Null值处理就可以了。
至于Null值处理，这个就自已找找吧。

作者: roych 时间: 2017-1-9 15:06
If Me.整体完工时间 <> "" Then
Me.是否转交 = "是"
'如果Me.整体完工时间 = "" 则直接跳出if了。不会执行ElseIf那一句。
ElseIf Me.整体完工时间 = "" Then
Me.是否转交 = "否"
End If
如果非要两个都执行的话，请使用2楼的写法。

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)