Visual Basic / MSGBOX
Jean-Marie DUBASIK
-
samounet Messages postés 99 Statut Membre -
samounet Messages postés 99 Statut Membre -
Bonjour,
Ci-dessous un bout de code.
Ma question: A votre avis pourquoi le MsgBox apparait une deuxième fois lorsque l'on a appyer sur l'OK du MsgBox
Private Sub txtUtilisateur_LostFocus(Index As Integer)
If Trim$(txtUtilisateur(0).Text) = "" Then
MsgBox "Le nom est obligatoire.", vbInformation, "Encodage."
txtUtilisateur(0).SetFocus
Exit Sub
End If
txtUtilisateur(0).Text = UCase$(txtUtilisateur(0))
End Sub
Ci-dessous un bout de code.
Ma question: A votre avis pourquoi le MsgBox apparait une deuxième fois lorsque l'on a appyer sur l'OK du MsgBox
Private Sub txtUtilisateur_LostFocus(Index As Integer)
If Trim$(txtUtilisateur(0).Text) = "" Then
MsgBox "Le nom est obligatoire.", vbInformation, "Encodage."
txtUtilisateur(0).SetFocus
Exit Sub
End If
txtUtilisateur(0).Text = UCase$(txtUtilisateur(0))
End Sub
