Le titre le dit ... ca sert à Verifier si un text box contient du texte
Source / Exemple :
Private sub Text1_Validate(Cancel As boolean)
'Vérification du texte à la sortie du controle
If text1.text = "" then
MsgBox "Il faut d'aboud taper un texte !", vbExclamation, "Attention"
Cancel = True
'Retour dans le controle, car sinon l'arrêt du programme est possible par une nouvelle
'action du bouton quitter
Text1.Setfocus
'Eventuellement affectation en interne, par code d'un texte prédefini
Else
Cancel = False
End If
End Sub
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.