MaskEdBox videRésolu

Question

Bonjour, 
dans une form j'ai un MaskEdBox
lorsque se que j'appui sur ajouter pour aller dans ma base et que le MaskEdBox n'est pas renseigner,je voudrais qu'il me l'indique donc j'ai mis ce code.
 If txt_secu.Mask = "" Then    MsgBox "Veuillez saisir le champ [N° Sécu]!", vbInformation + vbOKOnly, "Erreur"    txt_secu.SetFocus
mais il ne le prends pas en compte.
par contre pour effacer j'ai mis ce code et lui fonctionne
Dim tmp As String With txt_secu        tmp = .Mask        .Mask = ""        .Text = ""        .Mask = tmp    End With

mais comment faire pour afficher le MsgBox si le champ n'est pas rempli.
merci
@plus

ucfoutu · Answer

Bonjour,
la propriété "mask" n'est pas le contenu de ce contrôle, mais uniquement le masque qu'il utilise !

ucfoutu · Answer

Ouvre ton aide VB6 sur le mot Masked Edit ===>> ouvre ses propriétés ===>>> l'une d'elles est ClipText ===>> lis-la

cs_petchy · Answer

merci c nickel

If txt_secu.ClipText = "" Then    MsgBox "Veuillez saisir le champ [N° Sécu]!", vbInformation + vbOKOnly, "Erreur"    txt_secu.SetFocus

bonne soirée

MaskEdBox vide

3 réponses

Votre réponse

Discussions similaires