sábado, 1 de diciembre de 2012

TEXTBOX

El control TextBox (Cuadro de Texto) se utiliza para ingresar y/o visualizar texto. Es un control de entrada de datos.Si en nuestro programa no vamos a ingresar texto, es decir si va sólo a visualizar o mostrar información es preferible hacerlo en el control Label.

PROPIEDADES

Al igual de todos los controles, el TextBox entre otras tiene las siguientes propiedades:
Name: Es recomendable que las tres primeras letras sean Txt
BackColor: Establece el color de fondo del control
BorderStyle: Indica el tipo de borde que tendrá el control
Cursor: Establece el puntero que se presentará cuando pase el mouse por este control
Enabled: Indica si el control está habilitado o no.
Font: Letra utilizada en el control
ForeColor: Color de la letra
Text: Texto que se encuentra en el control
Visible: Determina si el control está visible u oculto

Averiguar sobre las siguientes propiedades:
Locked
Multiline
PaswordChar
TabIndex
TabStop
TextAlign
CharacterCasing

EJERCICIO - PRÁCTICA


Al iniciar los controles para ingresar (TextBox) el Nombre, Apellido, Ciudad y en donde se forma el mensaje (Label) deben estar en blanco.

Al dar click en MENSAJE (Label) se berá mostrar, presentar un mensaje que se formará con los datos ingresados, como se muestra en el ejemplo: Mi nombre es Elisabeth Quizhpi y vivo en Cuena. Para realizar esto debemos programar en el click del Label del Mensaje, de la siguiente manera :

Private Sub LblMen_Click (ByVal.....)

LblInf.Text = "Mi nombre es " & TxtNom.Text & " " & TxtApe.Text & " y vivo en " & TxtCiu.Tex

End Sub

Como se notará el texto que no cambia irá entre comillas (" ") y los controles sin comillas (TxtNom.Text) por lo que debemos fijarnos bien, en qué control se encuentra la información que necesitamos, para unir el texto y los controles se utiliza &, considerar los espacios que deben estar entre las palabras, si quiero que se visualice espacios deberé colocar dentro de comillas.

Luego de visualizar el mensaje debemos deshabilitar los controles TextBox de tal manera que no puedan modificar y no se altere el mensaje, para lo cual utilizamos la propiedad Enabled de cada TextBos y se colocará luego de la visualización, así:

Private Sub LblMen_Click(ByVal...)

LblInf.Text = "Mi nombre es " & TxtNom.Text & " " & TxtApe.Text & " y vivo en " & TxtCiu.Text

TxtNom.Enabled=False

TxtApe.Enabled=False

TxtCiu.Enabled=False

End Sub

Cuando se dé cliclk en NUEVO se deberá borrar toda la información, luego de borrarse se deberá permitir que ingrese los datos, por lo que Enabled de cada control deberá estar en TRUE

Private Sub LblNue_Click (ByVal...)
TxtNom.Text=""
TxtApe.Text=""
TxtCiu.Text=""
LblInf.Text=""
TxtNom.Enabled=True
TxtApe.Enabled=True
TxtCiu.Enabled=True
TxtNom.Focus ( )
End Sub

Como observa para limpiar o dejar en blanco un control se utiliza por ejemplo TxtNom.Text="", es decir abre y cierra comillas sin dejar espacio entre ellas.

Con Enabled = True permite ingresar datos en cada uno de los TextBox

El MÉTODO Focus( ) permite que el cursor se coloque automáticamente en el control indicado en este caso en el TxtNom.

Al dar click en MODIFICAR deberá permitir que los datos se modifiquen, es decir los controles TextBox deberán estar deshabilitados y borrar lo que este en el control en donde se forma el mensaje.

Private Sub LblMod_Click (ByVal...)

TxtNom.Enabled=Ture

TxtApe.Enabled=True

TxtCiu.Enabled=True

LblInf.Text=""

TxtNom.Focus ( )

End Sub

En lugar de lblInf.Text="" se puede utilizar lblInf.Clear

FIN. Deberá finalizar la aplicación

Private Sub LblFin (ByVal... )

End

End Sub

No hay comentarios:

Publicar un comentario