C
Chey
I have this right now
rivate Sub Form_Current()
If [Late] = True Then
[Date suppose to be in].Visible = True
Else
[Date suppose to be in].Visible = False
End If
If [Late] = True Then
[Date Received].Visible = True
Else
[Date Received].Visible = False
End If
If [Late] = True Then
[Date appeal letter sent out].Visible = True
Else
[Date appeal letter sent out].Visible = False
End If
If [Late] = True Then
[Late Approved].Visible = True
Else
[Late Approved].Visible = False
End If
If [Late] = True Then
[Late Denied].Visible = True
Else
[Late Denied].Visible = False
End If
If [Late] = True Then
[Late Approve Date].Visible = True
Else
[Late Approve Date].Visible = False
End If
If Abs([Diff]) >= 10 Then
[Print Diff Letter].Visible = True
Else
[Print Diff Letter].Visible = False
End If
If [Late] = True Then
[Print Late Letter].Visible = True
Else
[Print Late Letter].Visible = False
End If
All of it it works except for these two
If Abs([Diff]) >= 10 Then
[Print Diff Letter].Visible = True
Else
[Print Diff Letter].Visible = False
End If
If [Late] = True Then
[Print Late Letter].Visible = True
Else
[Print Late Letter].Visible = False
End If
These are both command buttons. Is there a differnt way to code it with a
command button?
If I go to the next record and then return to the current record the command
buttons are there. Just not when I click on the the check box for late.
Thanks
Chey
rivate Sub Form_Current()
If [Late] = True Then
[Date suppose to be in].Visible = True
Else
[Date suppose to be in].Visible = False
End If
If [Late] = True Then
[Date Received].Visible = True
Else
[Date Received].Visible = False
End If
If [Late] = True Then
[Date appeal letter sent out].Visible = True
Else
[Date appeal letter sent out].Visible = False
End If
If [Late] = True Then
[Late Approved].Visible = True
Else
[Late Approved].Visible = False
End If
If [Late] = True Then
[Late Denied].Visible = True
Else
[Late Denied].Visible = False
End If
If [Late] = True Then
[Late Approve Date].Visible = True
Else
[Late Approve Date].Visible = False
End If
If Abs([Diff]) >= 10 Then
[Print Diff Letter].Visible = True
Else
[Print Diff Letter].Visible = False
End If
If [Late] = True Then
[Print Late Letter].Visible = True
Else
[Print Late Letter].Visible = False
End If
All of it it works except for these two
If Abs([Diff]) >= 10 Then
[Print Diff Letter].Visible = True
Else
[Print Diff Letter].Visible = False
End If
If [Late] = True Then
[Print Late Letter].Visible = True
Else
[Print Late Letter].Visible = False
End If
These are both command buttons. Is there a differnt way to code it with a
command button?
If I go to the next record and then return to the current record the command
buttons are there. Just not when I click on the the check box for late.
Thanks
Chey