If condition

[newsgroup.microsoft.com]

Good afternoon,
On a report I would like a title (M., Mr. Mrs or Mme) to appear before the
full name of a person, according to gender and language spoken. What I did
does not work. Could you help me please? Thanks

Private Sub Report_Open(Cancel As Integer)
Dim title2
If sex = 1 Then
If french Is True Then
title2 = "M."
Else: title2 = "Mr."
End If
ElseIf sex = 2 Then
If french Is False Then
title2 = "Mme"
Else: title2 = "Ms."
End If
End If
End Sub

 

[Roger Carlson]

The Open event of the Report will only fire once (when the report opens).
Try it in the Format event of the Details section:

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
....
End Sub

--
--Roger Carlson
MS Access MVP
Access Database Samples: www.rogersaccesslibrary.com
Want answers to your Access questions in your Email?
Free subscription:
http://peach.ease.lsoft.com/scripts/wa.exe?SUBED1=ACCESS-L