UNIDAD 1: PROGRAMACION VISUAL BASIC CGI ELEMENTOS BASICOS
TEMA 4: DECLARACION VARIABLES VISUAL BASIC PROGRAMACION CGI
A toda variable que se use en un programa, se debera declarar de preferencia al principio del programa.
En VISUAL BASIC existen los siguientes tipos de variables:
| Tipo | Rango |
| BYTE | 0-255 |
| INTEGER(%) | +-2,147,483,698 |
| SINGLE(!) | 3.4E+-38(7 DECIMALES) |
| DOUBLE(#) | 1.8E+308(16 DECIMALES) |
| CURRENCY | 15 DIG IZQ 4 DIG DEECHA |
| STRING($) | 2 BILLONES CHARS |
| BOOLEAN | TRUE, FALSE |
| DATE | FECHA |
| VARIANT | TODOS LOS TIPOS y mas usado en este curso |
Tambien toda variable usada en un programa se debera declarar al principio del programa el formato de declaracion mas sencillo es:
DIM VARIABLE AS TIPO (EJEMPLOS)
DIM ALFA AS INTEGER
DIM ALFA AS LONG, BETA AS LONG
DIM ALFA AS INTEGER, NOMBRE AS STRING
DIM CIUDAD AS STRING * 20, ALFA AS DOUBLE
Observar ultimo caso de ciudad asi de esta manera se consigue una string de tamano definido.
Un problema comun a lo largo de este curso, es la necesidad de convertir variables numericas a strings y tambien el problema inverso es decir convertir strings a su representacion numerica.
Para este ultimo problema por ejemplo se tiene:
DIM ALFA AS STRING
ALFA=“3.1416”
Como se observa del ejemplo anterior, se puede dar en algun momento convertir la string ALFA a su valor numerico, para resolver este problema se deberan usar las siguientes funciones de conversion numerica que proporciona visual basic.
| Action | Language element |
| ANSI value to string. | Chr, ChrW |
| String to lowercase or uppercase. | Format, LCase, UCase |
| Date to serial number. | DateSerial, DateValue |
| Decimal number to other bases. | Hex, Oct |
| Number to string. | Format, Str |
| One data type to another. | CBool, CByte, CDate, CDbl, CDec, CInt, CLng, CSng, CShort, CStr, CType, Fix, Int |
| Date to day, month, weekday, or year. | Day, Month, Weekday, Year |
| Time to hour, minute, or second. | Hour, Minute, Second |
| String to ASCII value. | Asc, AscW |
| String to number. | Val |
| Time to serial number. | TimeSerial, TimeValue |
Fuente: microsoft net
Para el ejemplo anterior se tendria:
DIM ALFA AS STRING
DIM BETA AS SINGLE
ALFA=“3.1416”
BETA=CINT(ALFA)