Access レポートの詳細Formatに複数の式

いつもお世話になっています。

レポートの詳細に結婚して姓が変更になった場合、旧姓に取り消し線を引く
という式を作成しました。
Private Sub 詳細_Format(Cancel As Integer, FormatCount As Integer)
If 新姓 <> "" Then
Me.取り消し線1.Visible = True
Me.取り消し線2.Visible = True
Else
Me.取り消し線1.Visible = False
Me.取り消し線2.Visible = False
End If
End Sub

今回は、住所も変更になって新住所が入力されたら、旧住所に取り消し線を引きたいと
思います。
ただし、変更にならない場合もあるので、別のIF文になります。
Private Sub 詳細_Format(Cancel As Integer, FormatCount As Integer)
If 新住所 <> "" Then
Me.取り消し線3.Visible = True
Me.取り消し線4.Visible = True
Else
Me.取り消し線3.Visible = False
Me.取り消し線4.Visible = False
End If
End Sub

レポートの詳細_Formatに複数の条件を設定することができるのでしょうか。
お力添えをお願いいたします。

No.1 ベストアンサー 回答者： piroin654 回答日時： 2011/04/02 21:07

できます。

そのままIf文を並べればいいだけです。

Private Sub 詳細_Format(Cancel As Integer, FormatCount As Integer)
If 新姓 <> "" Then
Me.取り消し線1.Visible = True
Me.取り消し線2.Visible = True
Else
Me.取り消し線1.Visible = False
Me.取り消し線2.Visible = False
End If

If 新住所 <> "" Then
Me.取り消し線3.Visible = True
Me.取り消し線4.Visible = True
Else
Me.取り消し線3.Visible = False
Me.取り消し線4.Visible = False
End If
End Sub

この回答へのお礼

早々に回答いただきありがとうございます。
前回に続き、おかげさまで今回も無事に出来ました。
どうぞまたよろしくお願いいたします。

お礼日時：2011/04/02 22:39