Text in Großbuchstaben oder Kleinbuchstaben ausgeben? (VB.NET) VB-Version:  VB5, VB6
	Views:  567

Von VB 6 kennen wir die Funktionen UCase und LCase. UCaseändert die Buchstaben einer Zeichenfolge in Großbuchstaben; LCase macht dasGanze umgekehrt in Kleinbuchstaben.

Diese Funktionen heißen jetzt in VB.NET ToUpper und ToLower. Also probieren wir die Funktionen mal an einem kleinen Beispiel aus. Starten Sieein neues Projekt und ziehen Sie eine TextBox (TextBox1) und einen CommandButton(Button1) auf Ihre Form. Jetzt benötigen Sie noch diesen Code:

Private Sub Button1_Click(ByVal sender As System.Object, _
  ByVal e As System.EventArgs) Handles Button1.Click
 
  ' Variablen definieren
  Dim Text, NewText As String
 
  ' der Variable "Text" Inhalt der TextBox zuweisen
  Text = TextBox1.Text
 
  ' der Variable "NewText" den geänderten Inhalt zuweisen
  NewText = TextBox1.Text.ToUpper
 
  ' in der TextBox die umgewandelte Zeichenfolge ausgeben 
  TextBox1.Text = NewText
End Sub

Starten Sie Ihr Projekt und geben Sie in die TextBox irgend etwas ein, dasKleinbuchstaben enthält. Klicken Sie auf den Button und Ihr Text wird komplettin Großbuchstaben umgewandelt. Ändern Sie jetzt im Code diese Zeile:

......
NewText = TextBox1.Text.ToLower
......

Nun funktioniert das Ganze umgekehrt. Geben Sie etwas in Großbuchstaben einund bei Klick auf den Button wird es in Kleinbuchstaben umgewandelt.