Здравствуйте,
Помогите исправить:

Private Sub Form_Current()

Dim varRef As Date
varRef = Me.ReferralDate
If Me.ReferralDate = IsNull(varRef) Then
Me.ReferralDate.Enabled = False
End If

End Sub

Заранеее спасибо!

http://www.sql.ru/forum/1261371/run-time-error-94