Der er tidspunkter, hvor du er ved at opbygge en Visual Basic-program , som du gerne vil fremhæve et tekstfelt for fokus . Dette kunne være at påpege en fejl til brugeren eller bare for at gøre feltet skiller sig ud fra de andre tekstfelter på skærmen. Microsoft Visual Basic 2008 indeholder mulighed for at gøre det ved at ændre farve og skrifttype egenskaber af teksten i feltet . Instruktioner
1
Open Visual Basic 2008 og på Startsiden , "Projekt " linket til højre for klik på " Opret : " . Option
2
Skift standardprogram navn fra " WindowsApplication1 " til " HighlightTextbox " og derefter dobbeltklikke på "Windows Forms Application "-ikonet. Dette åbner Visual Basic Design vindue med en ny, tom Windows formular.
3
Placer markøren på " Toolbox" fanen er placeret øverst til venstre på Design vinduet for at åbne Værktøjskassen menu.
4
Dobbeltklik på " TextBox " kontrol og " Button " kontrol for at tilføje et tekstfelt og en knap til formularen . Rul markøren ud Værktøjskassen , og det vil lukke automatisk. Arranger TextBox og knappen i formularen for et tiltalende udseende .
5
Dobbeltklik på " Button1 " for at åbne vinduet Kode . Visual Basic vil placere markøren mellem første og sidste linjer af knappen -klik hændelseshandler . Kopier og indsæt følgende kode , så det færdige produkt ligner dette : Hej
Public Class Form1
Dim TextboxFlagHighlightBoolean Som Boolean = False
Private Sub Button1_Click ( ByVal afsender Som System . Object , ByVal e Som
System.EventArgs ) Handles Button1.Click
p Hvis TextBox1.Text > "" Så
p Hvis TextboxFlagHighlightBoolean Så
TextBox1.ForeColor = Color.Black
TextBox1.Font = Ny System.Drawing.Font ("" , 8, nær
Drawing.FontStyle.Regular )
TextboxFlagHighlightBoolean = False
Else
TextBox1.ForeColor = Color.Red
TextBox1.Font = Ny System.Drawing.Font ("" , 8, nær
Tegning. FontStyle.Bold )
TextboxFlagHighlightBoolean = Sand
End If
Else
MessageBox.Show ( "Indtast et tal i tekstfeltet " ) < br >
End If
End Sub
End Class
Denne kode erklærer et flag med " Dim " erklæring , der gemmer tilstand fremhævelsen af TextBox . Hvis det er " False ", klikke på knappen ændrer tekstfarven tekstboksen til rød og ændrer skrifttypen til fed . Hvis flaget er " Sand " en knap -klik skifter tekstfarven tilbage til sort og skrifttypen tilbage til almindelig.
6
Klik på " Debug" menupunktet i toppen af skærmen for at teste din ansøgning. Når den åbner , skal du indtaste et tal i tekstfeltet , og klik på " Button1 ". Baggrunden bør skifte til rød. Klik på det igen og baggrunden skifter tilbage til hvid .