- Local time
- Today, 14:21
- Joined
- Oct 29, 2018
- Messages
- 21,469
Congratulations! I knew you could do it!Thank you, it worked, this is what i did:
Private Sub Form_Current()
Me.medicaidcheckbox = DCount("*", "InsuranceList", "InsType Like '*Medicaid*' AND DrID=" & Nz(Me.DrID, 0)) > 0
If DCount("*", "InsuranceNotes", "InsuranceNotes <> null AND DrID=" & Nz(Me.DrID, 0)) > 0 Then
[InsuranceListsbfrm].Form![btnopeninsurancenotes].Visible = True
Else
[InsuranceListsbfrm].Form![btnopeninsurancenotes].Visible = False
End If
End Sub