Gestion d'un Textbox en VB.Net 2010

Version imprimable

13/05/2015, 10h59
MedZero

Gestion d'un Textbox en VB.Net 2010

Bonjour je suis nouveau en VB.NET. Je cherche à savoir comment capitaliser le contenu d'un textbox ?
13/05/2015, 15h18
DeWaRs

Capitaliser ?!? : http://www.larousse.fr/dictionnaires...italiser/12905
13/05/2015, 23h00
clementmarcotte

Bonjour,

Citation:

Envoyé par MedZero

Bonjour je suis nouveau en VB.NET. Je cherche à savoir comment capitaliser le contenu d'un textbox ?

Sauf problème de mémoire cela devrait ressembler à cela:

Dim Texte as string
Texte = TextBox1.text.toupper
14/05/2015, 02h43
MedZero

Citation:

Envoyé par DeWaRs

Capitaliser ?!? : http://www.larousse.fr/dictionnaires...italiser/12905

Capitaliser une chaine de caracteres est de mettre la premiere lettre de celle-ci en majuscule..
A la saisie de mon textbox je voudrais mettre la premiere lettre de la chaine de caracteres qui le contient en majuscule.
Je sais compter sur vous :zoubi:

Code:

1
2
3
4
5
6
Private Sub Text1_Change()
 Dim st As String
   st = Text1.Text
   Text1.Text = UCase(Mid(st, 1, 1)) & Mid$(st, 2, Len(st))
   Text1.SelStart = Len(st)
End Sub

14/05/2015, 10h38
conan76
Citation:

Envoyé par MedZero

Bonjour je suis nouveau en VB.NET. Je cherche à savoir comment capitaliser le contenu d'un textbox ?

bonjour MedZero,
Code:

1 2 3 Dim s As String = "test" dim resultat as string = Char.ToUpper(s(0)) & s.Substring(1)
On prend la première lettre que l'on met en majuscule : Char.ToUpper(s(0))
et l'on ajoute le reste

ceci peux être fait dans une fonction à qui l'on passera le texte et retourne le résultat.
15/05/2015, 03h33
MedZero
Citation:

Envoyé par clementmarcotte

Bonjour,

Sauf problème de mémoire cela devrait ressembler à cela:

Dim Texte as string
Texte = TextBox1.text.toupper

Dans ce tout le contenu du textbox est mis en majuscule mon grand!
Citation:
Envoyé par gastoncs

Code:

1 2 3 4 5 6 Private Sub Text1_Change() Dim st As String st = Text1.Text Text1.Text = UCase(Mid(st, 1, 1)) & Mid$(st, 2, Len(st)) Text1.SelStart = Len(st) End Sub
Un peut d'explication svp...........
Citation:
Envoyé par conan76

bonjour MedZero,

Code:

1 2 3 Dim s As String = "test" dim resultat as string = Char.ToUpper(s(0)) & s.Substring(1)

On prend la première lettre que l'on met en majuscule : Char.ToUpper(s(0))
et l'on ajoute le reste

ceci peux être fait dans une fonction à qui l'on passera le texte et retourne le résultat.
:weird: Maintenant comment pourrais je gérer ca avec les événements du textbox ,
car je voudrais que la première lettre du contenu du textbox se met en majuscule des qu'on la saisie?
15/05/2015, 11h44
Jean-Philippe André

salut,

sous VBA je sais qu'on a la possibilite d'utiliser par exemple

Code:

Msgbox StrConv("AAA",vbProperCase)

Je crois que sous vb.net, c'est la meme :)

Bonjour

Code:

1
2
3
4
5
6
7
8
 Private Sub TextBox1_KeyPress(sender As Object, e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
 
        If Char.IsUpper(e.KeyChar) AndAlso DirectCast(sender, TextBox).Text.Length > 0 Then
            e.KeyChar = Char.ToLower(e.KeyChar)
        ElseIf DirectCast(sender, TextBox).Text.Length = 0 Then
            e.KeyChar = Char.ToUpper(e.KeyChar)
        End If
    End Sub

Bonjour !

j'ai trouvé ce code:

Code:

1
2
3
4
5
6
7
 Private Sub Textbox1_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles Textbox1.LostFocus
                   If Textbox1 .Text <> "" Then      
                            Dim chaine As String
                            chaine = Textbox1.Text
                            Textbox1.Text = CStr(chaine(0)).ToUpper + chaine.Substring(1)
                   end if
 End Sub

je vous remercie infiniment de m'avoir aider.....
Une fois encore de plus merci.
:applo: