3.201 cursos gratis
6.233.243 alumnos
Publica tu curso gratis
Busca cursos gratis:
Estás aquí: mailxmail > Cursos de Informática > Diseño > Manual de Visual Basic Principiante > Ejercicio 9: Concatenación 2

Manual de Visual Basic Principiante

Autor: Jorge Alvarez
Curso:  4,24/5 4,24/5 (34 opiniones) |44567 alumnos|Fecha publicación: 17/03/2006
Capítulos del curso

Capítulo 11:

 Ejercicio 9: Concatenación 2

                                   Ejercicio 9: Concatenación 2

Crea un formulario con un control con pestañas (haz clic con el botón derecho del ratón sobre la Caja de herramientas, haz clic en Components. En Components, Controls, selecciona el control Microsoft Tabbed Dialog Control 6.0 (SP5) y haz clic en Aceptar. El control aparecerá en la Caja de herramientas.), en la primera sección crea seis etiquetas, seis cajas de texto y dos botones.

                                   Ejercicio 9: Concatenación 2

En la segunda sección crea tres etiquetas, tres cajas de texto y un botón.

En este programa programaremos las cajas de texto para que el cursor avance con Enter a la siguiente caja de texto. Haz doble clic en la primera caja de texto y en la caja de opciones de eventos selecciona KeyPress y escribe el siguiente código:

Private Sub Text1_KeyPress(KeyAscii As Integer)

If KeyAscii = 13 Then

Text2.SetFocus

End If

End Sub

La caja de texto 2 la programaremos para que se introduzca automáticamente la fecha. Haz doble clic en la caja de texto 2, selecciona el evento GotFocus y escribe el siguiente código:

Private Sub Text2_GotFocus()

Text2.Text = Format(Now, "dd-mm-yyyy")

Text3.SetFocus

End Sub

Programa las cajas de texto (hasta la número seis) para que el cursor avance a la siguiente caja de texto.

El botón Salir

Private Sub Command1_Click()

Unload Me

End

End Sub

El botón Limpiar

Private Sub Command2_Click()

Text1 = ""

Text2 = ""

Text3 = ""

Text4 = ""

Text5 = ""

Text6 = ""

Text7 = ""

Text8 = ""

Text9 = ""

Text1.SetFocus

End Sub

El botón Mostrar Datos

Private Sub Command3_Click()

Text7 = Text1 & " " & Text3

Text8 = Text4

Text9 = Text5

End Sub

Capítulo siguiente - Ejercicio 10: Las Tablas
Capítulo anterior - Ejercicio 8: Conversiones
Recibe nuestras novedades
Al presionar "Recibir" estás dándote de alta y aceptas las condiciones legales de mailxmail

Hay 34 opiniones. Opina sobre este curso.

Descarga el PDF gratis

Cursos similares a Manual de Visual Basic Principiante


Cursos Valoración Alumnos Vídeo
Breve teoría de la selección de canales en Photoshop
Breve tutorial sobre selecciones de áreas por medio de composición del color en Photoshop. Cuando trabajamos sobre una imagen, lo hacemos siempre sobre una com... [09/03/05]
 4,69/5 6.639  
Guía para crear tarjetas de presentación
¿Cuántas veces te has encontrado en una situación en la cuál te piden tus datos de contacto y has tenido que escribirlo en una servilleta o en un papel usado que se termi... [03/07/07]
 4,19/5 2.404  
Photoshop. Mejorar calidad de fotos o imágenes de baja resolución
Photoshop nos permite mejorar la calidad de una imagen o foto de baja resolución. ... [20/10/09]
4/5 702  


Publicar en   del.icio.us    digg    meneame

¿Qué es mailxmail.com?|ISSN: 1699-4914|Recomiéndanos|Ayuda
Condiciones legales de mailxmail