Employer le vbCRLF quant à mettent un retour et retour à la ligne de carraige entre ces derniers.
Obscurcir le valMessage comme corde
Obscurcir le valInvolvement comme corde
Obscurcir le valFirstName comme corde
Obscurcir le valLastName comme corde
valMessage = ""
S'IsNull (Me.txtInvolvement.Value) puis
valMessage = valMessage et « participation » et crlf
Finir si
S'IsNull (Me.txtFirstName.Value) puis
valMessage = valMessage et « prénom » et crlf
Finir si
S'IsNull (Me.txtLastName.Value) puis
valMessage = valMessage et « nom de famille » et crlf
Finir si
Si Len (valMessage) > 0 puis
MsgBox « ces champs doit être complété avant qu'une personne puisse être sauvée : » et crlf et crlf et valMessage
L'annulation = rectifient
Sortir le sous-marin
Finir si