如果，那么，否则在访问中起作用

Question

我在访问时使用以下代码。

我正在设置它，以便2个文本框不能留空，如果它们有日期，那么它将继续生成报告。

    If IsNull(Me.txtStart.Value) Then
    MsgBox "Please ensure that both date fields are populated"
    Exit Sub
ElseIf IsNull(Me.txtEnd.Value) Then
    MsgBox "Please ensure that both date fields are populated"
    Exit Sub
Else
End If

提前谢谢

Answer 1

只需使用

If IsNull(Me.txtStart.Value) Or IsNull(Me.txtEnd.Value) Then
    MsgBox "Please ensure that both date fields are populated"
    Exit Sub
End If
' open the report here

Else之后无需使用Exit Sub。

实际上，我更喜欢这种编码风格，以便对大Else个案例进行初步检查。