Es gibt Zeiten, wenn Sie bauen eine Visual Basic-Anwendung , die Sie wollen , um ein Textfeld zur Betonung Highlight wird . Dies könnte darauf hinweisen, eine Fehlermeldung an den Benutzer oder nur um das Feld abheben von den anderen Textfelder auf dem Bildschirm. Microsoft Visual Basic 2008 bietet die Möglichkeit, dass durch Veränderung der Farbe und Schriftart Eigenschaften der Text in dem Feld zu tun. Anleitung
1
Öffnen Sie Visual Basic 2008 und auf der Startseite klicken Sie auf das "Projekt "-Link auf der rechten Seite des "Create : " . Option
2
Ändern Sie die Standardanwendung Namen von " WindowsApplication1 " bis " HighlightTextbox ", dann auf " Windows Forms Application" -Symbol doppelklicken . Dies öffnet den Visual Basic Design-Fenster mit einem neuen, leeren Windows-Formular .
3
Platzieren Sie den Cursor auf der "Toolbox "-Reiter am oberen linken Seite des Design-Fenster gelegen, um die Toolbox zu öffnen Menü .
4
Doppelklicken Sie auf das " TextBox " -Steuerelement und das "Button" -Steuerelement eine TextBox und ein Button zum Formular hinzufügen. Rollen Sie den Cursor aus der Toolbox , und es wird automatisch geschlossen. Ordnen Sie das Textfeld und die Schaltfläche auf dem Formular für ein ansprechendes Erscheinungsbild .
5
Doppelklicken Sie auf den " Button1 " Steuerung , um das Codefenster zu öffnen. Visual Basic wird der Cursor zwischen den ersten und letzten Zeilen des Button-Click- Event-Handler zu platzieren. Kopieren Sie den folgenden Code, so dass das fertige Produkt wie folgt aussieht:
Public Class Form1 Dim
TextboxFlagHighlightBoolean As Boolean = False
Private Sub Button1_Click (ByVal sender As -System . Object, ByVal e As
System.EventArgs ) Handles Button1.Click
Wenn TextBox1.Text > "" Then
Wenn TextboxFlagHighlightBoolean Dann
TextBox1.ForeColor = Color.Black
TextBox1.Font = New System.Drawing.Font ("" , 8,
Drawing.FontStyle.Regular )
TextboxFlagHighlightBoolean = False
Else
TextBox1.ForeColor = Color.Red
TextBox1.Font = New System.Drawing.Font ("" , 8,
Zeichnung . FontStyle.BOLD )
TextboxFlagHighlightBoolean = True End If
Else
MessageBox.Show (" Bitte geben Sie eine Zahl in das Textfeld " )
End If End Sub
End Class
Dieser Code ein Flag erklärt mit dem " Dim " -Anweisung, die den Zustand der Hervorhebung des TextBox speichert . Wenn es " falsch" auf die Schaltfläche wechselt die Farbe des Textes der TextBox auf rot und ändert die Schriftart auf fett . Wenn das Flag "True" ist ein Button - Klick ändert die Farbe des Textes zurück zu schwarz und die Schrift wieder regelmäßig .
6
Klicken Sie auf die Schaltfläche " Debug" Menüpunkt am oberen Rand des Bildschirms, um Ihre Anwendung testen . Wenn sie geöffnet wird , geben Sie eine Zahl in das Textfeld und klicken Sie auf " Button1. " Der Hintergrund sollte auf Rot wechseln . Klicken Sie erneut auf und der Hintergrund ändert sich wieder zu weiß .