Не выводится надпись для поля при печати

[vladtr]

Создал форму карточки. Есть поле с надписью. Для формы в событии текущая запись сделал подпрограмму. Если нет значения в поле, надпись поля не показывается.

Private Sub Form_Current()
If IsNull([Поле92]) Then
Me.Надпись93.Visible = False
Else
Me.Надпись93.Visible = True
End If
Me.Refresh
End Sub

Все работает когда прыгаешь по записям. Перехожу к печати Надпись не отображается при предварительном просмотре и при печати тоже. Можно ли сделать чтобы при печати формы все срабатывало как надо, т.е. для пустого поля надпись поля в форме не выводилась. У меня MS Office 2007.