[ThOMaZ2118]

Salut,

Je suis en train de faire un form oui il y a des textboxes a remplir mais qui ne sont pas facultatifs.
Je voudrais quand j'essaye de fermer la fenetre qu'il me dise que je dois remplis les cases.
Voici le code:

Private Sub Form_Unload(Cancel As Integer)
If a = 1 Then
    If txtName.Text = "" Then
        MsgBox ("All boxes have to be filled before you exit so the person is added")
    End If
End If
End Sub

Quand je ferme la fenetre il me donne bien le message box mais quand je fait OK il la ferme quand meme.
J'essaye de trouver un moyen pour qu'il ne la ferme pas quand je clic sur la croix et que la valeur de a est sur 1.

J'éspère que c'est clair :confused:

merci