Materiales

Contenido

• Controles intrínsecos (definición, uso)
• Controles extrínsecos (definición, uso)
• Propiedades de un proyecto
• Elementos de un proyecto
• Eventos, procedimientos
• Algunas sentencias

• Manejo de bases de datos

• La API de Windows
• Funciones

• Activex - Creación de un control Activex

• Optimizar la Programación

Prefacio

Todos tenemos una grancapacidad de auto – enseñanza, este y muchos otros manuales y cursos estimulan ese sentido de autoaprendizaje que tienes tu (lector), y de esto estoy seguro, sino, no te hubieras tomado la molestia de descargar este tutorial.

Entrando en materia, este no es exactamente un tutorial para "sabiondos" es un introductorio a la programación avanzada, es por así decirlo un empujoncito para aquellos queya saben lo básico y quieren saber mas, así que por esta razón algunas explicaciones y ejemplos no van a excederse en "complicadas" y mantendré un nivel básico en algunos temas.

Todo esto teniendo en cuenta que los que necesitan ser enseñados son "los que no saben mucho" y por eso no pienso escribir algo para los que "ya saben bastante". El que quiera alcanzar un grado de complejidad enprogramación bastante alto, por favor, siéntese en su ordenador a programar unas 5 o 10 horas diarias (

Controles Intrínsecos

Los controles intrínsecos son aquellos que aparecen "cargados por defecto" en el cuadro de herramientas con abres VB. Estos se diferencian de los extrínsecos, por que una aplicación creada únicamente con estos controles (y sin agregar referencias o librerías) se puededistribuir sin instalador (algunas veces).

• TextBox (Caja de texto) :
Se utiliza para el ingreso y validación de datos o información.

Algunas Propiedades
Text: Almacena la cadena de caracteres que contenga el control.
DataFiled: Enlaza en control con un campo de base de datos.
DataSource: Enlaza el control con un origen de manipulación de base de datos.
MultiLine: Permite escribir variaslíneas en el control.
ScrollBars: Agrega barras de desplazamiento al control si esta MultiLine = True
PasswordChar: Es el carácter que ocultara el texto que se escribe en el control, por ejemplo PasswordChar = * (Asterisco).
Locked = Permite bloquear la escritura sobre el Textbox.

Hacer que un Textbox solo reciba números:
Podemos utilizar el siguiente condicional en el evento Validate queno nos permitirá salir del control si lo escrito en él no son números:
Private Sub Text1_Validate(Cancel As Boolean)
If Not IsNumeric(Text1.Text) Then
Cancel = True
Else
Text2.SetFocus
End If
End Sub

Pero para que las teclas "de letras" o "símbolos" no se puedan escribir es necesario:
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii Asc("9") Then
If KeyAscii Asc("8") ThenIf KeyAscii Asc("7") Then
If KeyAscii Asc("6") Then
If KeyAscii Asc("5") Then
If KeyAscii Asc("4") Then
If KeyAscii Asc("3") Then
If KeyAscii Asc("2") Then
If KeyAscii Asc("1") Then
If KeyAscii Asc("0") Then
If KeyAscii 8 Then
If KeyAscii 32 Then
KeyAscii = 0
End If
End If
End If
End If
End If
End If
End If
End If
End If
End If
End If
End If
End Sub

Formatearun Textbox
Esto se utiliza para que un Textbox muestre un numero separados por unidades y decimales.
Private Sub Text1_LostFocus()
If Text1.Text = "" Then
Text1.Text = "0,00"
End If
Text1 = Format(CCur(Text1.Text), "###,###,###,##0.00")
End Sub
Para realizar operaciones matemáticas con un Textbox formateado se debes cambiar la función Val por CDbl, ejemplo:
txResultado = CDbl(Text1) +CDbl(Text2)
• CommandButton (Botón de Comando):

Este control permite encapsular procedimientos para que sean utilizados por el usuario con solo hacer click sobre él.

Algunas Propiedades
Cancel: Permite ejecutar el código escrito en el control presionando "Esc"
Default: Permite ejecutar el código escrito en el control presionando "Enter"
Style: Puede ser Graphical o Standard. Si...