Visual Basic 6.
0 es un
programa que consiste en la
programacin en lenguaje Basic
en un entorno visual de manejo.
PROGRAMACIN
PROGRAMACINORIENTADA
ORIENTADAAAOBJETOS
OBJETOS
La programacin orientada a objetos (POO)
es una forma de programacin que utiliza
objetos, ligados mediante mensajes, para la
solucin de problemas. Puede considerarse
como una
extensin natural de la programacin
estructurada en un intento de potenciar los
conceptos de
modularidad y reutilizacin de cdigo.
Un objeto es una encapsulacion genrica de
datos y de
los procedimientos para manipularlos. Dicho
de otra forma, un objeto es una entidad que
tiene
unos atributos particulares, las propiedades, y
unas formas de operar sobre ellas, los
mtodos.
en Visual Basic un mensaje
esta asociado con un procedimiento, de tal
forma que cuando un objeto recibe un mensaje
la
respuesta a ese mensaje es ejecutar el
procedimiento asociado. Este procedimiento
recibe el
Un metodo se implementa en una clase de objetos y
determina como tiene que actuar el objeto
cuando recibe un mensaje. Propiedades
Las propiedades de un objeto definen la manera en
que dicho objeto se ve y se comporta
La primera lnea del cdigo, la cual Visual Basic escribi
por usted, comienza con las palabras
Private Sub. Sub es una palabra clave que indica que
ah comienza un procedimiento.
nombre de metodo.
Un procedimiento es cdigo dedicado a una accin en particular. La ultima lnea del cdigo
(tambin escrita por Visual Basic) es End Sub, que indica el final del procedimiento.
Visual Basic es un lenguaje de programacin controlado por eventos. Esto significa que el
cdigo se ejecutara en respuesta a algo que ocurre. Por ejemplo, si hace clic en un botn durante
la ejecucin del programa, se generara un evento Clic y se ejecutara automticamente el cdigo
que le corresponde.
La programacin
visual, es un tipo de
programacin que
utiliza elementos
visuales, como
botones, dibujos,etc.,
controlados por el
cuadro de
herramientas
ENTORNO DE DESARROLLO DE VISUAL BASIC
Cuando se arranca Visual Basic 6, usted podr ver una interfaz similar a la de la figura que se
muestra a continuacin:
Facilita un acceso rpido a
las ordenes mas
comnmente
Visualiza las ordenes que
usted utiliza para
desarrollar una aplicacin.
utilizadas.
Esta ventana contiene la lista de
los ficheros que componen el
proyecto actual.
Es la ventana sobre la que
colocaremos los controles de la
interfaz grafica
que el usuario utilizara para
comunicarse con la aplicacin.
Proporciona un conjunto de
herramientas que permiten
colocar los controles en el
formulario durante el diseo de la
interfaz grafica del usuario.
Cada objeto lleva
asociado un conjunto de
propiedades
(nombre, posicin,
tamao, color, etc).
El formulario es la
ventana desde donde
se opera y se colocan
los elementos
visuales
El cdigo, en
cambio, es desde
donde se programan
los eventos
Los
objetos de Visual
Basic estn
encapsulados, es decir,
contienen su propio
cdigo y sus propios
datos.
Al conjunto de
propiedades y mtodos
se les llama Interfaz.
Adems de su interfaz
predeterminada, los
objetos pueden
implementar interfaces
adicionales para
proporcionar
polimorfismo.
El entorno Visual Basic corrige los eventos
programados y detecta si hay un error cuando se
produce un error de sintaxis o cuando hay variables
no especificadas, por ejemplo.
El momento de
deteccin es
programable.
La programacin ms
sencilla es la que se hace
utilizando las propiedades
del objeto. Estas propiedades
se controlan desde el Cuadro
de Propiedades y son
programables desde la
ventana Cdigo. Para
programar en ste se pone el
nombre del objeto.Propiedad
La versin 6.0 de Visual
Basic, sugiere de una
manera automtica el
comando o evento ms
recomendado para la
situacin.
Pero no obliga en ningn momento a utilizar
el evento recomendado.
La versin 6.0 de Visual
Basic, sugiere de una
manera automtica el
comando o evento ms
recomendado para la
situacin.
Pero no obliga en ningn momento a utilizar
el evento recomendado.
Tipos de Datos predefinidos
Declaraciones de variables y
constantes
Cbool
Boolean
Cbyte
Byte
Ccur
Currency
Cdate
Date
CDbl
Double
Cint
Integer
CLng
Long
CSng
Single
CStr
String
Cvar
Variant
CVErr
Error
!! Cuidado al tratar de convertir contenidos de cajas de texto
a nmeros y stas estn vacas
Funciones de conversin de tipos
de datos:
+
*
/
\
Suma
Resta
Multiplicacin
Divisin decimal
Cociente de una divisin entera
Mod
^
Resto de una divisin entera
Potencia
Operadores aritmticos:
Operadores Lgicos
Sentencias de control
Ejemplo de utilizacin de If Else
anidados
Se trata de mostrar un mensaje indicando a banda
del espectro electromagntico pertenece una
determinada longitud de onda l expresado en m
Dim l as Single
If l < 0.3 Then
msgbox Pertenece al Ultravioleta
ElseIf l < 0.4 Then
msgbox Pertenece al Azul
ElseIf l < 0.5 Then
msgbox Pertenece al Verde
ElseIf l < 0.6 Then
msgbox Pertenece al Rojo
Else
msgbox Pertenece al InfraRojo
End If
Visual Basic. El Lenguaje.
Miguel ngel Manso Callejo
Se
trata de diferenciar una operacin
matemtica en funcin del contenido de una
variable de tipo cadena de caracteres, para
simular una calculadora con las funciones + */
Dim Operando1 As Double, Operando2 As Double, Resultado As Double
Dim Operacin As String
Select case (Operacin)
Case + : Resultado = Operando1 + Operando2 : break;
Case - : Resultado = Operando1 - Operando2 : break;
Case * : Resultado = Operando1 * Operando2 : break;
Case / : Resultado = Operando1 / Operando2 :
break;
Case Else : msgbox La operacin no est definida
End Select
Ejemplo de utilizacin de Select
Case
Visual Basic. El Lenguaje.
Miguel ngel Manso Callejo
Sentencias de Control
Do While <condicin >
Do
....
Loop
While <condicin>
....
....
Loop While <condicin >
Exit Do
Do Until <condicin >
Wend
Do
....
....
Loop Until <condicin >
Loop
For Each elemento In grupo
For <cond inicial > To <cond final > Step ...
.....
Next elemento
.....
Next ...
Exit For
Visual Basic. El Lenguaje.
Miguel ngel Manso Callejo
Calcular la suma de los
nmeros 3 al 15
Dim i As Integer
Dim Sum As Long
Se inicializa la variable a
0
Sum = 0
For i = 3 To 15
Sum = Sum + i
Next i
Calcular el producto de los
nmeros 2 al 15
Dim i As Integer
Dim Prod As Long
Se inicializa la variable a 1
Prod = 1
For i = 2 To 15
Prod = Prod * i
Next i
Ejemplos de sentencias
repetitivas.
Visual Basic. El Lenguaje.
Miguel ngel Manso Callejo
Ejemplo de utilizacin de
sentencias repetitivas
Se pretende determinar si un nmero es primo o no
Consideraciones prcticas: Un nmero ser primo si no es
divisible por los nmeros inferiores a l. Hay que probar si
es divisible por 2, 3, ... Hasta llegar a el propio valor o por
el contrario si se puede dividir por uno de estos nmeros
inferiores no es primo (es divisible). Se utiliza la operacin
resto de divisin entera para saber si es divisible o no
Dim Num As Integer, i As Integer
For i = 2 To Num
If (Num Mod i) = 0 Then Exit For
Next i
If i = Num Then
msgbox El nmero & Num & es primo
Else
msgbox El nmero & Num & no es primo es divisible por
&i
End If
Visual Basic. El Lenguaje.
Miguel ngel Manso Callejo
La caja de dilogo InputBox pide al usuario que teclee
una frase, por ejemplo su nombre, un ttulo, etc.
La
sintaxis de la funcin es:
InputBox(prompt[, title][, default][, xpos][, ypos][, helpfile,
context])
Retorna el valor textual que el usuario ha suministrador por la
caja de texto de la ventana
Se puede convertir al formato adecuado para almacenarlo en la
variable correspondiente
Ejemplo:
N = Cint(InputBox("Cuantas distancias?", "N observaciones"))
Funcin InputBox
Visual Basic. El Lenguaje.
Miguel ngel Manso Callejo
Funcin MsgBox
Estas cajas de dilogo son similares a las que se utilizan en muchas
aplicaciones de Windows. La
caja de mensajes o MsgBox abre una ventana a travs de la cual
se enva un mensaje al usuario y se
le pide una respuesta, por ejemplo en forma de clicar un botn
O.K./Cancel, o Yes/No. Este tipo de
mensajes son muy utilizados para confirmar acciones y para decisiones
sencillas. La forma general de la funcin MsgBox es la siguiente:
respuesta = MsgBox("texto para el usuario", tiposBotones,
"titulo")
lblBox.Caption = MsgBox("Pulse un botn: ", 2 + 256 + 48, _
"Caja de mensajes")
donde el 2 indica que deben aparecer los botones Abort, Retry y Cancel, el 256 indica que
el
botn por defecto es el segundo (Retry) y el 48 indica que debe aparecer el icono de
exclamacin.
Por otra parte, la forma general de la funcin InputBox es la siguiente:
texto = InputBox("texto para el usuario", "titulo", "default", left, top)
EJEMPLOS
Vamos ha hacer ahora un ejemplo de cmo se
pueden hacer clculos en Visual Basic.
Lo Primero es introducir los
elementos visuales de los que
va a constar el programa.
Tres etiquetas, dos cuadros
de textos y un botn de
accin.
Etiqueta
Botn de accin
Cuadro de texto
Para escribir el texto deseado en las etiquetas,
modificaremos la propiedad Caption. En los
botones de accin, se utiliza la misma propiedad.
Para los cuadros de texto
Utilizaremos la
propiedad Text.
Ahora, desde la ventana cdigo del botn de accin,
programaremos los clculos que se han de hacer.
Se define una variable x.
En este caso X es lo que
haya en el cuadro de texto
1
En el 2 cuadro de texto se multiplica
a X por 3.1415 (PI) y por 2, puesto
que esto es el rea del crculo.
Se introduce la funcin Circle Step, que
dibuja un circulo y se les da las
coordenadas del centro (X,Y),X(que es el
radio dado).
Observese, que X est multiplicada por 100 debido a que en
Visual Basic las unidades son mucho ms pequeas que en
Qbasic
Si todo ha sido seguido correctamente, el resultado
debera ser ste.
