Textbox ou label en majuscule [Résolu]
elwadeh
- 13 mars 2010 à 13:17
- Messages postés
- 55
- Date d'inscription
- samedi 11 avril 2009
- Dernière intervention
- 28 juin 2018
- Messages postés
- 55
- Date d'inscription
- samedi 11 avril 2009
- Dernière intervention
- 28 juin 2018
A voir également:
- Textbox ou label en majuscule
- Types de textes, [elite et hacker] pour agrémenté vos textbox et label =) - Codes sources - Visual Basic / VB.NET (Texte)
- Textbox avec label incorporé - Codes sources - C# / .NET (.NET)
- TextBox et Label ✓ - Forum - Visual Basic 6
- Actualisation textbox et label ✓ - Forum - VB.NET
- Visual Basic - VB.NET : Imprimer une textbox - Forum - VB.NET
3 réponses
Meilleure réponse
- Messages postés
- 111
- Date d'inscription
- dimanche 24 décembre 2000
- Dernière intervention
- 17 novembre 2012
Bonjour,
Reste plus qu'à afficher le contenu du textBox dans le Label en question
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
Dim entree As TextBox = DirectCast(sender, TextBox)
Dim selDebut As Integer = entree.SelectionStart
Dim selLongueur As Integer = entree.SelectionLength
entree.Text = entree.Text.ToUpper
entree.SelectionStart = selDebut
entree.SelectionLength = selLongueur
End Sub
Reste plus qu'à afficher le contenu du textBox dans le Label en question
Avec quelques mots c'est encore mieux Ajouter un commentaire
a aidé 87 internautes ce mois-ci
Meilleure réponse
- Messages postés
- 13368
- Date d'inscription
- lundi 13 décembre 2004
- Dernière intervention
- 3 février 2018
salut,
quel mic mac...
textbox en majuscule
en mode design (propriétés) ou par code au load
textbox vers label (forcément en majuscule, du coup)
++
[hr]
quel mic mac...
textbox en majuscule
en mode design (propriétés) ou par code au load
TextBox1.CharacterCasing = CharacterCasing.Upper
textbox vers label (forcément en majuscule, du coup)
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
label1.text = textbox1.text
End Sub
++
[hr]
Avec quelques mots c'est encore mieux Ajouter un commentaire
a aidé 87 internautes ce mois-ci
- Messages postés
- 55
- Date d'inscription
- samedi 11 avril 2009
- Dernière intervention
- 28 juin 2018
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.