Ci sono momenti in cui si sta costruendo una applicazione Visual Basic che si vuole evidenziare un campo di testo per dare enfasi. Questo potrebbe essere far notare un errore per l'utente o semplicemente per rendere il campo si distinguono dagli altri campi di testo sullo schermo . Microsoft Visual Basic 2008 offre la possibilità di farlo modificando il colore e le proprietà dei font del testo nel campo . Istruzioni
1

Aprire Visual Basic 2008 e nella pagina iniziale , fare clic sul collegamento "Progetto" a destra di "Crea : " . Opzione
2

Cambiare il nome applicazione predefinita da " WindowsApplication1 " a " HighlightTextbox ", quindi fare doppio clic sull'icona "Windows Forms Application" . Si apre la finestra di progettazione di Visual Basic con un nuovo modulo vuoto di Windows.
3

Posizionare il cursore sulla scheda " Strumenti " nella parte superiore sinistra della finestra di progettazione per aprire la casella degli strumenti menu.
4

Fare doppio clic sul controllo " TextBox " e il controllo " Button " per aggiungere un TextBox e un pulsante al form . Arrotolare il cursore fuori dalla Casella degli strumenti e si chiuderà automaticamente . Disporre la TextBox e il pulsante sul form per un aspetto gradevole .

5 Fare doppio clic sul controllo " Button1 " per aprire la finestra del codice . Visual Basic verrà posizionare il cursore tra la prima e l'ultima riga del gestore eventi del pulsante del mouse . Copiare e incollare il seguente codice in modo che il prodotto finito si presenta così:

Public Class Form1 Dim

TextboxFlagHighlightBoolean As Boolean = False

Private Sub Button1_Click ( ByVal sender As Sistema . Object, ByVal e As

System.EventArgs ) Handles Button1.Click

TextBox1.Text > "" Then

TextboxFlagHighlightBoolean Poi

TextBox1.ForeColor = Color.Black

TextBox1.Font = New System.Drawing.Font ( " " , 8 , Stati

Drawing.FontStyle.Regular ) per

TextboxFlagHighlightBoolean = False

Else

TextBox1.ForeColor = Color.Red

TextBox1.Font = New System.Drawing.Font ( " " , 8 , Stati

Disegno . FontStyle.Bold ) per

TextboxFlagHighlightBoolean = True

End If

Else

MessageBox.Show ( "Inserire un numero nella casella di testo " ) < br

End > Se

End Sub End Class

Questo codice dichiara una bandiera con l'istruzione " Dim " che memorizza lo stato delle evidenziazione della TextBox . Se è " False ", cliccando sul pulsante cambia il colore del testo della TextBox al rosso e cambia il font in grassetto. Se il flag è "vero " di un pulsante del mouse cambia il colore del testo torna al nero e il font torna al normale .
6

Cliccare sulla voce di menu "Debug " nella parte superiore dello schermo per testare l'applicazione. Quando si apre, digitare un numero nella casella di testo e fare clic su " Button1 ". Il fondo dovrebbe cambiare in rosso. Fare clic di nuovo e lo sfondo cambia torna al bianco .