Er zijn momenten waarop u het bouwen van een Visual Basic- toepassing die u zult willen een tekstveld te markeren voor nadruk . Dit zou kunnen worden om te wijzen op een fout van de gebruiker of gewoon om er het gebied te onderscheiden van de andere tekst velden op het scherm . Microsoft Visual Basic 2008 biedt de mogelijkheid om dat te doen door het veranderen van de kleur en het lettertype-eigenschappen van de tekst in het veld . Instructies
1 Open Visual Basic 2008 en op de Start pagina , klik op de " Project" link aan de rechterkant van de "Create : " . Optie kopen van 2 wijzigen standaard applicatie naam van " WindowsApplication1 " naar " HighlightTextbox , " en dubbelklik vervolgens op het pictogram " Windows Forms Application " . Dit opent de Visual Basic Design raam met een nieuwe , lege Windows vorm .
Plaats 3 de cursor op het tabblad " Toolbox " aan de bovenkant links van het ontwerp venster om de Toolbox te openen menu .
4 Dubbelklik op het " TextBox " controle en de " knop " -instelling op een TextBox en een Button toe te voegen aan uw formulier . Rol de cursor van de Toolbox en het zal automatisch sluiten . Schik de TextBox en de knop op het formulier voor een aangename verschijning .
5 Dubbelklik op de " Button1 " controle met betrekking tot de Code venster te openen . Visual Basic zal de cursor tussen de eerste en laatste regels van het button- click event handler . Kopieer en plak de volgende code , zodat het eindproduct ziet er zo uit : Public Class Form1 Dim TextboxFlagHighlightBoolean
Zoals Boolean = False
Private Sub Button1_Click ( ByVal afzender als System . Object , ByVal e als System.EventArgs
) Handles Button1.Click
Als TextBox1.Text > " " dan
Als TextboxFlagHighlightBoolean dan
TextBox1.ForeColor = Nieuwe System.Drawing.Font ( " " , 8 , Drawing.FontStyle.Regular
) op Twitter TextboxFlagHighlightBoolean = False = Color.Black TextBox1.Font
Else
TextBox1.ForeColor = Color.red
TextBox1.Font = Nieuw System.Drawing.Font ( " " , 8 , Tekening
. FontStyle.Bold ) op TextboxFlagHighlightBoolean = True Einde
Else MessageBox.Show
( " Voer een getal in het tekstvak " ) < br Als End > Als End Sub End Class
Deze code verklaart met de " Dim " verklaring dat de toestand van de accentuering van de TextBox slaat een vlag . Als het ' Valse ', te klikken op de knop verandert de tekstkleur van de TextBox naar rood en verandert het lettertype te vet . Als de vlag is " True " een knop - klik verandert de tekstkleur terug naar zwart en het lettertype terug om regelmatig .
6 Klik op de " Debug " menu- item op de bovenkant van het scherm te test uw aanvraag . Wanneer het wordt geopend , voert u een getal in het tekstvak en klik op ' Button1 . " De achtergrond moet veranderen naar rood . Klik nogmaals en de achtergrond verandert naar wit.
|
