A voir également:
- If textbox is empty vba
- What is my movie français - Télécharger - Divers TV & Vidéo
- Remove empty directories - Télécharger - Nettoyage
- Who is on my wifi - Télécharger - Outils Internet
- Where is it - Télécharger - Gestion de fichiers
- Vba attendre 1 seconde ✓ - Forum VB / VBA
8 réponses
Tant mieux !
N'oublie pas de tester également la valeur vide, qui n'est pas "null" (si l'utilisateur commence à saisir et efface ensuite...)
N'oublie pas de tester également la valeur vide, qui n'est pas "null" (si l'utilisateur commence à saisir et efface ensuite...)
If IsNull(User.Value) or User.Value = "" Then...
Salut,
c'est normal, null ne se teste pas en tant que valeur, mais avec une fonction :
c'est normal, null ne se teste pas en tant que valeur, mais avec une fonction :
If IsNull(User.value)...
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
J'aurais juste une dernière question :
Savez-vous quelle police je dois utiliser pour le textbox contenant le mot de passe ?
Pour que ça affiche que des boules noires...
Savez-vous quelle police je dois utiliser pour le textbox contenant le mot de passe ?
Pour que ça affiche que des boules noires...
Ca n'est pas une histoire de police, mais plutôt une histoire de format, il faut choisir "password" ou "mot de passe" et c'est lui qui va afficher des étoiles ou des "boules noires"... (onglet données du textbox, champ "masque de saisie")...
Bonjour
Je développe un formulaire et je veux contrôler la valeur d'un TextBox qui doit être un entier non nul
Que dois-je faire ?
J'ai écrit celà mais voilà que ça ne marche pas :
Private Sub TextBoxl_Change()
Dim KeyAscii As MSForms.ReturnInteger
Select Case KeyAscii
Case Is < 49, Is > 57
MsgBox "Seuls un entier non nul est autorisé."
KeyAscii = Asc(Chr(8))
End Select
End Sub
Je développe un formulaire et je veux contrôler la valeur d'un TextBox qui doit être un entier non nul
Que dois-je faire ?
J'ai écrit celà mais voilà que ça ne marche pas :
Private Sub TextBoxl_Change()
Dim KeyAscii As MSForms.ReturnInteger
Select Case KeyAscii
Case Is < 49, Is > 57
MsgBox "Seuls un entier non nul est autorisé."
KeyAscii = Asc(Chr(8))
End Select
End Sub
