How to set subform.visible = false, If subform control value is nothing?

[Janine Moore]

In MS Access 2007, I have a vehicle information form. On my form is an equipment subform. The two forms are linked by V_ID (vehicle id). In the Form Current of my parent form I want to set the subform to only be visible if there is a value in the V_ID. Here's what I've tried, but it always evaluates to true even if the value is nothing.

 
If Me!Equipment.Form!V_ID Is Nothing Then
    Me.Equipment.Visible = False
Else
    Me.Equipment.Visible = True
End If
 
 

[TheSmileyCoder]

Welcome to Bytes. Instead of Is Nothing, try:

If IsNull(Me!Equipment.Form!V_ID) Then

[ADezii]

Private Sub Form_Current()
  If Not Me.NewRecord Then        'Not sure how you want to handle a New Record
    Me!Equipment.Visible = Not IsNull(Me![Equipment].Form![V_ID])
  End If
End Sub

[mshmyob]

"IS NOTHING" is more of a vb or vb.net reference where vba uses the "ISNULL" function to test for nulls as TSO pointed out.

cheers,

[Janine Moore]

Thanks. Tried your code, but subform is still visible even if there is no equipment record for the vehicle.

[Janine Moore]

The message box always says "not null"

'*****TRYING TO MAKE SUBFORM INVISIBLE IF THERE IS NO EQUIPMENT RECORDS FOR THE VEHICLE ****
If IsNull(Me![Equipment].Form![V_ID]) Then
    MsgBox "null"
Else
    MsgBox "not null"
End If
 

[mshmyob]

Reference the whole form like so

If IsNull(Forms!yourParentFormName!Equipment.Form.[V_ID]) Then 
    MsgBox "null" 
Else 
    MsgBox "not null" 
End If
 

DO NOT use "ME" when referencing a subform name in AC2007.

cheers,