Eliminating labels 2when the field is blank

[solriv]

I would like to know how to set up Access so that when I make a report to
print a phone book that has labels like,
Home Phone
Work Phone
Fax
Mobile
and any of these fields are blank I would like to eliminate that label, and
move up a line to the next label the way outlook dos when you print a phone
book.

 

[Maarkr]

Private Sub Report_Page()
Me.Fax.Visible = True
If IsNull(Me.Fax) Then
Me.Fax.Visible = False
End If
End Sub

Be sure to set the fax field Can Shrink Property to Yes.