Il ya des moments où vous construisez une application Visual Basic que vous voulez mettre en évidence un champ de texte pour l'emphase . Cela pourrait être de souligner une erreur de l'utilisateur ou tout simplement pour rendre le champ se démarquer des autres champs de texte sur l'écran. Microsoft Visual Basic 2008 offre la possibilité de le faire en changeant la couleur et les propriétés de police du texte dans le champ . Instructions
1
Ouvrez Visual Basic 2008 et sur la page de démarrage, cliquez sur le lien "Projet" à droite de la page «Créer : " . L'option
2
Changer l' nom de l'application par défaut de « WindowsApplication1 " à " HighlightTextbox ", puis double-cliquez sur l'icône « Windows Forms application". Cela ouvre la fenêtre de conception Visual Basic avec une nouvelle forme de Windows vierge.
3
Placez le curseur sur l'onglet " Outils " situé en haut à gauche de la fenêtre de conception pour ouvrir la boîte à outils menu.
4
Double -cliquez sur la commande " zone de texte " et la commande "Button " pour ajouter une zone de texte et un bouton à votre formulaire. Rouler le curseur hors de la boîte à outils et il se fermera automatiquement. Organiser la zone de texte et le bouton sur le formulaire pour une apparence agréable .
5
Double -cliquez sur la commande " Button1" pour ouvrir la fenêtre de code. Visual Basic placer le curseur entre les première et dernière lignes du gestionnaire d'événements clic de bouton . Copiez et collez le code suivant afin que le produit fini ressemble à ceci:
Public Class Form1
TextboxFlagHighlightBoolean As Boolean = False
Private Sub Button1_Click ( sender en tant que système . Object, ByVal e As
System.EventArgs ) Handles Button1.Click
Si TextBox1.Text > "" Then
Si TextboxFlagHighlightBoolean Puis
TextBox1.ForeColor = Color.Black
TextBox1.Font = New System.Drawing.Font ("", 8 , AB
Drawing.FontStyle.Regular )
TextboxFlagHighlightBoolean = False Photos
Else
TextBox1.ForeColor = Color.Red
TextBox1.Font = New System.Drawing.Font ("", 8 , AB
dessin . FontStyle.Bold )
TextboxFlagHighlightBoolean = True
End If Else
MessageBox.Show (" S'il vous plaît entrer un numéro dans le champ de saisie " ) < br >
End If End Sub
End Class
Ce code déclare un drapeau avec la déclaration " Dim" qui stocke l'état de la mise en valeur de la zone de texte . Si elle est "Faux ", en cliquant sur la touche modifie la couleur du texte de la zone de texte de rouge et modifie la police en gras. Si le drapeau est " true", un clic de bouton change la couleur du texte au noir et la police de retour à régulier.
6
Cliquez sur le menu " Debug " en haut de l'écran pour tester votre application. Quand il s'ouvre, entrez un nombre dans la zone de texte et cliquez sur " Button1 ". Le fond devrait changer au rouge. Cliquez à nouveau et le fond redevient blanc.