Empezando a programar en Visual Basic
Variables
Una variable seria un nombre al cual le daremos un dato, ese dato puede cambiar. Ejemplo:
En un programa que administra a todos los empleados de una empresa:
Nombre
Apellido 1
Telefono
Salario
La variable Nombre tomara datos distintos segun vayamos introduciendo la informacion, las variables tomarian un dato de nombre, el cual seria:
Jazmin
Erik
Ivan
Osea Visual Basic no pide la definicion previa de las variables, pero siempre es bueno definirlas debido a que si se declaran correctamente el programa puede ser mejor, por que al no definir las variables, Visual Basic, retoma que son de tipo Variant y asi consume mas memoria que cualquiera de otro tipo.
En algunos otros lenguajes de programacion xD!, empieza asi:
Declare Nombre As String Le dice que Nombre son letras
Declare Apellido1 As String Le dice que Apellido1 son letras
Declare Telefono As String Le dice que Telefono son letras
Declare Salario As Numero Le dice que Salario es un numero
Con esto se logra que el programa sepa con que tipos de datos se trabajara, Visual Basic permite que no se declaren, cuando introducimos una variable, retoma que es una variable y que el tipo es correcto para el tipo de dato, si en Visual Basic encuentra esto:
Nombre ="JazmiÂn"
Salario=2000
Telefono = "987654321"
El lo recibiria de la manera en que Salario, Nombre y Telefono son unas variables.
Nombre:Son letras, por que esta en comillas "".
Salario:Es un numero, por que no esta dentro de comillas "".
Telefono:Son letras, por que estan en comillas "".
Esto hace que introducir una nueva variable sea facil, comodo y sencillo, pero en un caso xD!!(Mala suerte), intenta trabajar con el comando PRINT, y comete un error:
Print Nombre
Print Salaro
Print TelefonoEl error esta en el segundo lugar y en lugar de decir "Salario", dice
"Salaro", Visual Basic interpretaria a "Salaro" como una variable e intentara leer el valor que tiene, como no tendra ningun valor, no se escribira nada y no dara ningun aviso de error.
TIPOS DE VARIABLES
Las variables pueden ser de los siguientes tipos, el numero indicado en el parentesis es el numero de Bytes que ocupa en la memoria:
Booleana (2) Admite los valores 0 y 1, o True (verdadero) y False (falso)
Byte (1) Numeros enteros en el rango de 0 a 255
Integer (2) Numeros enteros en el rango de -32768 a 32767
Long (4) Numeros enteros en el rango de -2147483648 a 2147483647
Single (4) Punto flotante, simple precision
Doble (
Punto flotante, doble precision.
Currency (
Entero, con punto decimal fijo
String (*) Cadenas alfanumericas de longitud variable o fija
Date (
Fechas
Objet (4) Referencia a objetos
Variant (**) Otros tipos de datos
(*)String ocupa el mismo numero de Bytes que caracteres tenga la cadena.
(**)Variant ocupa 16 Bytes si se trata de un numero y 22 bytes + longitud de la cadena si se trata de un dato tipo cadena de caracteres.
Los caracteres que definen cada tipo de variable son:
% Integer & Long ! Single
# Double @ Currency $ String
PD:Como antes lo dije al no definir las variables, Visual Basic, retoma que son de tipo Variant y asi consume mas memoria que cualquiera de otro tipo.
Asi que definan las variables. :CRA:
Practica 2
Para practicar con las variables, crearemos una calculadora, le cambiaremos la propiedad BorderStyle a FixedToolWindow
Agregaremos 2 label's(1 sera para los creditos xD!!) y una picture, 2 TextBox y 4 botones.
Les cambiaremos los nombres y el caption:
CommandButton1=CmdSumar
CommandButton2=CmdRestar
CommandButton3=CmdDividir
CommandButton4=CmdMultiplicar
*(cmd=CommandButton)
Ahora la calculadora, graficamente deberia de verse asi:
Ahora vamos con el codigo:
Private Sub CmdDividir_Click()
Dim resultado4 As Long 'Aqui estamos diciendo que la variable seria de Numeros enteros en el rango de -2147483648 a 2147483647
resultado4 = Val(Text1.Text) / Val(Text1.Text) 'val se utiliza para que pueda transformar los caracteres en numeros, por que si no ponemos lo tomaria asi si queremos sumar 8+8 nos daria 88
Label2.Caption = resultado4 'Aqui le damos la instruccion para que marque el resultado
End Sub
Private Sub CmdMultiplicar_Click()
Dim resultado3 As Integer
resultado3 = Val(Text1.Text) * Val(Text2.Text)
Label2.Caption = resultado3
End Sub
Bueno esto es toda la practica!! xD!!, pueden reproducirlo y compilarlo :COOL:
PD:Copiar el codigo y no escribir nisiquiera una letra es de lammers xD! (De aquellos que solo usan Copy&Past), por favor, esto no es para mi, les sirve a ustedes, por eso yo me he empeñado en hacerles este curso, por que me gusta ayudar a la gente, yo no gano nada haciendo esto, pero lo hago por ustedes, mandenme por privado sus inquitudes, dudas, sugerencias, para que este curso sea cada ves mejor.
