Bloque III Programación Estructurada Básica

3.1 Declaración de la estructura de Datos
3.1.1 Estructura de un Programa
3.1.2 Tipos de Datos “Enteros, Reales, Carácter”
3.1.3 Constantes
3.1.4 Variables
3.1.5 Especificaciones del Pseudocódigo para variables y constantes
3.2 Operaciones básicas
3.2.1 Asignación de valores a variables
3.2.2 Lectura y escritura
3.2.3 Evaluación de Expresiones “Aritméticas, De relación, Lógicas”
3.2.4 Prioridad de Expresiones
3.3 Estructuras de Control
3.3.1 Secuenciales
3.3.2 Selectivas “Sentencia If y Case”
3.3.3 Repetitivas “For y While”

FRAME

Es el objeto que me permite organizar diferentes cajas de texto, botones de comando y etiquetas.

LISTA

Permite añadir elementos en forma de lista y también poder seleccionar elementos de la misma para trabajar los datos.

Este control permite seleccionar un elemento solo o varios de ellos, utilizando la propiedad Multiselect. La imagen de la izquierda muestra un ListBox en el que se selecciona un solo elemento y a la derecha se seleccionan.

Para agregar elementos a un control ListBox en tiempo de diseño, se debe seleccionar el control Listbox, y desde la ventana de propiedades ubicarnos en la que se llama List. Al desplegarla podemos agregar y remover elementos.

Para esto se debe ingresar uno, luego mantener la tecla Ctrl presionada y presionar Enter, y agregar el siguiente y asi con los demás.

Para agregarlos en tiempo de ejecución, es decir mediante código, se utiliza un método llamado AddItem.

EJEMPLO:

Private Sub Command1_Click()

List1.AddItem "Brasil"

List1.AddItem "Francia"

List1.AddItem "Italia"

List1.AddItem "Argentina"

List1.AddItem "venezuela"

End Sub

ARREGLOS EN VISUAL BASIC

Se utilizan para almacenar un conjunto de variables, que sean del mismo tipo de dato, y todas estas bajo un mismo nombre. Por ejemplo imaginemos que tenemos 20 variables de tipo String que almacenan nombres (nombre1, nombre2, etc..). si yo ahora quisiera pasar todas estas cadenas a minúsculas tendría que utilizar la función Lcase con cada variable: nombre1 = Lcase(nombre1), nombre2 = Lcase(nombre2), etc..

Dim nombres(30) As String
For x = 0 To 30
nombres(x) = LCase(nombres(x))
Next

Siguiendo el ejemplo anterior: en vez de escribir la sentencia Lcase 30 veces para cada variable, hemos utilizado un arreglo llamado nombres con un número de índice 30 , es decir que almacena 30 datos de tipo String

OBJETOS EN VISUAL BASIC

Son una serie de artículos enfocados en el manejo de Visual Basic.

SENTENCIA IF

La estrutura de control IF permite decidr entre dos opciones resultantes de la evaluación de una sentencia. Si la evaluación es positiva hace una cosa, también podemos especificar accioens para realizar en caso de que la evaluación sea negativa.

Enunciado ELSE

Opcionalmente se puede colocar una serie de sentencias asociadas a la evaluación negativa de la expresión. Estas sentencias se deben colocar después de la orden ELSE y antes del END IF.

IF (expresion) then

Sentencias

....

ELSE

Sentencias

....

END IF

Enunciado ELSEIF

En Visual Basic Script existe la posibilidad de utilizar un enunciado especial en el lugar donde utilizaríamos un ELSE. Sirve para encadenar sentencias IF de modo que en un resultado negativo de un IF se pueda evaluar otra expresión, que tendría a su vez otros enunciados THEN y probablemente ELSE u otro ELSEIF. Se vería en un ejemplo com más facilidad:

IF (expresion1) then

Sentencias1

....

ELSEIF (expresion2) then

Sentencias2

....

ELSEIF (expresion3) then

Sentencias3

....

ELSE

Sentencias4

....

END IF

Se evalúa la primera expresión, en caso positivo se ejecutan las sentencias1, en caso negativo se evalua la expresion 2. Si la expresión 2 es positiva se ejecutan las sentencias 2 en caso negativo evaluamos la expresión 3 con el siguiente ELSEIF. Todo acaba en un ELSE en este ejemplo, pero el ELSE final no es obligatorio.

BOTONES DE OPCION

Este control nos permite elegir una opción entre varias de las que se nos plantean. Cada opción será un control optionbutton diferente.

CICLOS

Los ciclos For/Next le permiten evaluar una secuencia de enunciados varias veces. Esto es diferente a los enunciados If y Select, donde el programa pasa por cada enunciado al menos una vez durante la evaluación de la fórmula.

Los ciclos For/Next funcionan mejor cuando conoce de antemano la cantidad de veces que es necesario evaluar un enunciado.

Sintaxis del ciclo For

Ejemplo

Suponga que desea invertir la cadena {Cliente.Nombre del cliente}. Por ejemplo, la compañía "City Cyclists" pasa a ser "stsilcyC ytiC".

Rem Reverse a string version 1
formula = " "
Dim strLen
strLen = Len ({Customer.Customer Name})
Dim i
For i = 1 To strLen
Dim charPos
charPos = strLen - i + 1
formula = formula & _
Mid({Customer.Customer Name}, charPos, 1)
Next i

Examine cómo funciona esta fórmula asumiendo que el valor actual del campo {Customer.Customer Name} es "Clean Air". La variable strLen se asigna como longitud de “Clean Air”, es decir, 9. En este momento también se escribe para que sea una variable numérica. La variable i se conoce como variable de contador ya que su valor cambia con cada iteración del ciclo For. Es decir, se usa para contar las iteraciones del ciclo. El ciclo For se repetirá 9 veces; la primera vez, i es 1, luego, i es 2, después, i es 3 y así sucesivamente hasta que, finalmente, i es 9. Durante la primera repetición, el noveno carácter de {Customer.Customer Name} se anexa a la fórmula de variable especial vacía. Como resultado la fórmula es igual a "r" después de la primera iteración. Durante la segunda iteración, el octavo carácter de {Customer.Customer Name}se anexa a la fórmula y de este modo la fórmula es igual a "ri". Esto continúa hasta después de la novena iteración, la fórmula es igual a "riA naelC", que es la cadena invertida.