这代码哪里错了

snryga

Private Sub 整体完工时间_AfterUpdate()
If Me.整体完工时间 <> "" Then
Me.是否转交 = "是"

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

End Sub

阿cc-ess-VBA

Private Sub 整体完工时间_AfterUpdate()
If Me.整体完工时间 <> "" Then
Me.是否转交 = "是"

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

End Sub

xinrenq

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

roych

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