Need help with syntax of If Then statement

[HLCruz via AccessMonster.com]

Private Sub Form_Current()
If Me.ListType = "Resident" And Me.Address Is Not Null Then
Me.cmdEditAddress.Visible = False
Else
Me.cmdEditAddress.Visible = True
End If

End Sub


I have a command button that I would like to be visible only if the record
meets two critera, that the ListType is Resident and their address is Not
Null. I've tried this several ways and haven't gotten it to work... thank
you to anyone who can help me out with this.

Heather

 

[bohemian9485]

Private Sub Form_Current()
If Me.ListType = "Resident" And Me.Address Is Not Null Then
Me.cmdEditAddress.Visible = False
Else
Me.cmdEditAddress.Visible = True
End If

End Sub

I have a command button that I would like to be visible only if the record
meets two critera, that the ListType is Resident and their address is Not
Null. I've tried this several ways and haven't gotten it to work... thank
you to anyone who can help me out with this.

Heather

What is the setup of your ListType? Is it a multi-column listbox?

 

[Klatuu]

Is Not Null is strictly an SQL statment. In VBA, use the IsNull function:

Private Sub Form_Current()
If Me.ListType = "Resident" And Not IsNull(Me.Address) Then
Me.cmdEditAddress.Visible = False
Else
Me.cmdEditAddress.Visible = True
End If

End Sub

 

[Ron2006]

If Dave's answer does not give you the results you want, then you
definitely have to look at
bohemian9485 's question. The value of the "bound column" of the
combobox/listbox(?) is the value you need to test for and that can
often be different than the value that is displayed (bound column is
column 1 BUT the length for column 1 is 0. - not shown).

Ron