Display fields if not null

[adams.bria]

I have about 25 fields on a form all locked. If any of the fields are null, I do not want that field to display. I was able to create this on one field by attaching it to the on load event, however, I am not sure how to add the other fields. Thanks!

Private Sub Form_Load()
If IsNull(Me!Pref_Athl_Assis) Then
Me!Pref_Athl_Assis.Visible = False
Else
End If
End Sub

 

[vbaInet]

Is your form in Single Form view?

 

[adams.bria]

Yes it is.

 

[vbaInet]

So use:

Private Sub Form_Load()
    If Len(Me!Pref_Athl_Assis & vbNullString) Then
        Me!Pref_Athl_Assis.Visible = False
    Else
        Me!Pref_Athl_Assis.Visible = True
    End If

    [COLOR=Red]If ...[/COLOR]
End Sub

And just repeat the same code under each block.

Oh, by the way, move the code to the On Current event of the form.

 

[adams.bria]

I was sure I was getting an error when I tried that...

Works now though!

 

[vbaInet]

No problemo!

 

[missinglinq]

You did move the code to the Form_Current event, rather than the Form_Load event, as vbaInet instructed, didn't you? Not doing so would result in all Records being formatted according to the data in the First Record!

Linq ;0)>