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 tendrá que poner de relieve un campo de texto para enfatizar. Esto podría ser para señalar un error al usuario o simplemente para hacer que el campo se destaca de los otros campos de texto en la pantalla. Microsoft Visual Basic 2008 proporciona la capacidad de hacer que al cambiar las propiedades de color y tipo de letra 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 la "Crear" opción.

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 Visual Basic con una nueva forma de Windows, en blanco.

3 Coloque el cursor sobre la pestaña "Herramientas" situado en la parte superior izquierda de la ventana de diseño para abrir el menú Herramientas.

4 Haga doble clic en el control "Cuadro de texto" y el control "botón" para agregar un cuadro de texto y un botón a su formulario. Rodar el cursor fuera de la caja de herramientas y se cerrará automáticamente. Organizar el cuadro de texto y el botón en el formulario para 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. Copiar y pegar el siguiente código para que el producto final se parece a esto:

Public Class Form1

Dim TextboxFlagHighlightBoolean As Boolean = False

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

System.EventArgs) Maneja Button1.Click

Si TextBox1.Text> "" Entonces

Si TextboxFlagHighlightBoolean Entonces

TextBox1.ForeColor = Color.Black

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

Drawing.FontStyle.Regular)

TextboxFlagHighlightBoolean = False

Más

TextBox1.ForeColor = Color.Red

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

Drawing.FontStyle.Bold)

TextboxFlagHighlightBoolean = True

Terminara si

Más

MessageBox.Show ( "Por favor, introduzca un número en el cuadro de texto")

Terminara si

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 de la fuente en negrita. Si la bandera es "verdadera" un botón del ratón cambia el color del texto de nuevo a negro y la fuente de nuevo a normal.

6 Haga clic en la opción de menú "depuración" 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 a blanco.