Cómo resaltar un número en un cuadro de texto con Microsoft Visual Basic 2008

Hay momentos en que usted está construyendo una aplicación de Visual Basic que se desee resaltar un campo de texto para enfatizar. Esto podría indicar un error al usuario o simplemente para que el campo se destacan de los otros campos de texto en la pantalla. Microsoft Visual Basic 2008 proporciona la capacidad de hacer que al cambiar el color y las propiedades de fuente del texto en el campo . Instrucciones
1

Abra Visual Basic 2008 y en la página de inicio, haga clic en el enlace " Proyecto " a la derecha de "Create : " . Opcion a Compra 2

Cambiar el nombre de la aplicación por defecto de " WindowsApplication1 " a " HighlightTextbox ", haga doble clic en el icono de " aplicación de Windows Forms " . Esto abre la ventana de diseño de Visual Basic con un nuevo formulario en blanco de Windows.

3 Coloque el cursor en la pestaña " Herramientas " situada en la parte superior izquierda de la ventana de diseño para abrir la Caja de herramientas menú.
4

doble clic en el control " TextBox " y el control " Button " para agregar un cuadro de texto y un botón al formulario. Enrolle el cursor fuera de la caja de herramientas y se cerrará automáticamente. Organizar el cuadro de texto y el botón de la forma de una apariencia agradable .
5

Haga doble clic en el control " Button1 " para abrir la ventana de código . Visual Basic se coloque el cursor entre la primera y la última línea del controlador de eventos de clic de botón . Copia y pega el siguiente código para que el producto final se parece a esto :

Public Class Form1

TextboxFlagHighlightBoolean Dim As Boolean = False

Private Sub Button1_Click (remitente de ByVal como sistema . Object, ByVal e As

System.EventArgs ) Handles Button1.Click

Si TextBox1.Text > "" Entonces

Si TextboxFlagHighlightBoolean Entonces

TextBox1.ForeColor = Color.Black

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

Drawing.FontStyle.Regular )

TextboxFlagHighlightBoolean = False

demás

TextBox1.ForeColor = Color.Red

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

Dibujo. FontStyle.Bold )

TextboxFlagHighlightBoolean = True End If

demás

MessageBox.Show ("Escriba un número en el cuadro de texto ")

End If End Sub

End Class

Este código declara una bandera con la frase " Dim " que almacena el estado del resaltado del cuadro de texto. Si es " falso ", haga clic en el botón cambia el color del texto del cuadro de texto a rojo y cambia el tipo de letra en negrita . Si la bandera es un botón de clic con el botón cambia el color " verdadero" texto de nuevo a negro y la fuente de nuevo a normal.
6

Haga clic en la opción de menú " Debug" en la parte superior de la pantalla para probar la aplicación. Cuando se abre, introduzca un número en el cuadro de texto y haga clic en " Button1 ". El fondo debe cambiar a rojo. Haga clic de nuevo y el fondo cambia de nuevo a blanco.