Imposer type de variable en Visual Basic
ATJtwoo
-
ATJtwoo -
ATJtwoo -
Bonjour,
j'ai créer un petit programme de gestion des notes des étudiants, après un certain temps j'ai réussi a le faire mais j'aimerais bien aussi éviter un blocage en minimisant les erreur, je veux donc imposer le type de variable que doit entrer l'utilisateur, par exemple là où il doit mettre la note; s'il met une chaine de caractère une msgbox lui demandera de taper un chiffre et non des lettres. mais comment VBasic peut il identifier le type d'une variable ?
Merci !
j'ai créer un petit programme de gestion des notes des étudiants, après un certain temps j'ai réussi a le faire mais j'aimerais bien aussi éviter un blocage en minimisant les erreur, je veux donc imposer le type de variable que doit entrer l'utilisateur, par exemple là où il doit mettre la note; s'il met une chaine de caractère une msgbox lui demandera de taper un chiffre et non des lettres. mais comment VBasic peut il identifier le type d'une variable ?
Merci !
A voir également:
- Imposer type de variable en Visual Basic
- Visual basic - Télécharger - Langages
- Visual basic editor - Télécharger - Langages
- Visual petanque - Télécharger - Sport
- Microsoft 365 basic - Accueil - Microsoft Office
- Visual c++ 2019 - Guide
2 réponses
Ben il n'est pas cool du tout juste un exemple de verification essaie de le modifié plus voir
Private Sub Text1_KeyPress(KeyAscii As Integer)
If Not IsNumeric(Chr(KeyAscii)) Then
MsgBox "entrer un chiffre", vbCritical, "Erreur de saisie"
End If
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
If Not IsNumeric(Chr(KeyAscii)) Then
MsgBox "entrer un chiffre", vbCritical, "Erreur de saisie"
End If
End Sub
Merci beaucoup pour votre réponse, je sais maintenant que j'ai oublier le fait que même un label peut être programmé, sauf que ... le code que tu m'as filé ne marche pas, peut être que j'ai une version récente vus qu'on a pas le même code lors le keypress d'un label, voila le mien :
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
End Sub
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
End Sub
