Remove White Space

[jsimard]

I have used the following to hide record fields that are blank as well as their label.



Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
Me.Calculation_Label.Visible = Not (IsNull(Me.Calculation))
Me.Definition_Label.Visible = Not (IsNull(Me.Definition))
Me.Interpretation_Label.Visible = Not (IsNull(Me.Interpretation))
Me.StandardsBenchmark_Label.Visible = Not (IsNull(Me.StandardsBenchmark))
Me.DataSources_Label.Visible = Not (IsNull(Me.DataSources))
Me.SecondarySources_Label.Visible = Not (IsNull(Me.SecondarySources))
Me.Comments_Label.Visible = Not (IsNull(Me.Comments))
End Sub

My report now has lines of white space where that data would have been had it not been blank. Is there a way to remove the white space?

[RuralGuy]

If the Section (Detail??) has the CanShrink property set to True and each control has their CanShrink property set to True then I don't believe you need *any* of the code you have and it will work as you wish.

[jsimard]

This seems to work to remove the space of the text fields but the labels still appear and I would like them gone as well if there is no data. My report is designed with the label on top and then the text below:

Definition:
Definition Text.....

Calculation:
Calculation Text....

etc...

[RuralGuy]

In that case, re-enabling the code you had should do it.