G
Guest
The Following code generates Run-time Error ‘2427’, which says “You entered and expression that has no value.†The control on the report I have generated is named Received and it is a yes / no check box. What is my error?
Private Sub Report_Open(Cancel As Integer)
On Error GoTo Err_Report_Open
If Received.Value = True Then
Line99.Visible = True
Line100.Visible = True
Box97.Visible = True
End If
Exit_Report_Open:
Exit Sub
Err_Report_Open:
MsgBox Err.Description
Resume Exit_Report_Open
End Sub
Private Sub Report_Open(Cancel As Integer)
On Error GoTo Err_Report_Open
If Received.Value = True Then
Line99.Visible = True
Line100.Visible = True
Box97.Visible = True
End If
Exit_Report_Open:
Exit Sub
Err_Report_Open:
MsgBox Err.Description
Resume Exit_Report_Open
End Sub