Det finns tillfällen när du bygger ett Visual Basic-program som du vill markera ett textfält för betoning . Detta skulle kunna vara att påpeka ett fel till användaren eller bara för att göra området stå ut från de andra textfält på skärmen . Microsoft Visual Basic 2008 ger möjlighet att göra det genom att ändra färg och egenskaper typsnitt på texten i fältet . Instruktioner
1
Öppna Visual Basic 2008 och på startsidan , klicka på " Projekt " länken till höger om " Skapa : " . Alternativ
2
Ändra standardprogrammet namn från " WindowsApplication1 " till " HighlightTextbox , " dubbelklicka sedan på " Windows Forms Application " -ikonen . Detta öppnar Visual Basic Design fönstret med ett nytt , tomt Windows formulär .
3
Placera markören på fliken "Verktyg" längst upp till vänster på Design fönstret för att öppna verktygslådan menyn .
4
Dubbelklicka på " TextBox " kontroll och " Button " kontroll för att lägga till en textruta och en knapp i formuläret . Rulla markören utanför Toolbox och den kommer att stängas automatiskt . Ordna textrutan och knappen på formuläret för ett tilltalande utseende .
5
Dubbelklicka på " Button1 " för att öppna fönstret Kod . Visual Basic kommer att placera markören mellan de första och sista raderna i knapp - klick händelsehanterare . Kopiera och klistra in följande kod så att den färdiga produkten ser ut så här :
Public Class Form1
Dim TextboxFlagHighlightBoolean As Boolean = False
Private Sub Button1_Click ( ByVal avsändaren som System . Object , ByVal e Som
System.EventArgs ) Handtag Button1.Click
p Om TextBox1.Text > " " Då
p Om TextboxFlagHighlightBoolean Sedan
TextBox1.ForeColor = Color.Black
TextBox1.Font = Ny System.Drawing.Font ( " " , 8 ,
Drawing.FontStyle.Regular ) katalog
TextboxFlagHighlightBoolean = False
Else
TextBox1.ForeColor = Color.Red
TextBox1.Font = Ny System.Drawing.Font ( " " , 8 ,
Ritning . FontStyle.Bold ) katalog
TextboxFlagHighlightBoolean = Sant
End If
Else
MessageBox.Show ( " Ange ett nummer i textrutan " )
End If
End Sub
End Class
Denna kod deklarerar en flagga med " Dim " uttalande som lagrar tillståndet för att framhäva textrutan . Om det är " False ", klicka på knappen ändrar textfärg textrutan till rött och ändrar teckensnittet till fet . Om flaggan är "sann " en knapp - klick ändrar textfärgen till svart och typsnittet tillbaka till vanliga .
6
Klicka på " Debug " i menyn längst upp på skärmen för att testa din applikation . När det öppnas , ange ett nummer i textrutan och klicka på " Button1 . " Bakgrunden bör ändras till rött . Klicka på den igen och bakgrunden ändras tillbaka till vitt .
