[COLOR=black]Private Sub CommandButton1_Click()[/COLOR]
[COLOR=black] If Me.SaisieASA = True Then MsgBox Me.SaisieASA.caption[/COLOR]
[COLOR=black] If Me.SaisieAS = True Then MsgBox Me.SaisieAS.caption[/COLOR]
[COLOR=black] If Me.SaisieSR = True Then MsgBox Me.SaisieSR.caption[/COLOR]
End Sub