Please enable JavaScript.
Coggle requires JavaScript to display documents.
Código fuente de estructuras de control If simple y anidado, estructura…
Código fuente de estructuras de control If simple y anidado, estructura selectiva múltiple.
Estructura If simple
Ejemplo:
Declaración de variables
Dim cursor1 As Byte
Dim cursor2 As Byte
Dim cursor3 As Byte
Dim prom As Single
Dim sit As String
Ingreso de datos
Curso1 = Val(txtcurso1.Text)
Curso2 = Val(txtcurso2.Text)
Curso3 = Val(txtcurso3.Text)
Proceso
prom = (curso1 + curso2 + curso3) / 3
Evaluación de condiciones
lógicas
1 more item...
Código fuente
Estructura If anidado
Ejemplo:
Reparto de utilidades laborales
Código fuente
Declaración de variables
Dim salario As Double
Dim antiguedad As byte
Dim utilidad As Double
Ingreso de datos
salario = Val(txtsalario.Text)
antiguedad = Val(comboantiguedad.Text)
Proceso
2 more items...
Estructura selectiva múltiple
Ejemplo:
Menú de comida
Código fuente
Declaración de variables
Dim num As Integer
Dim platillo As String
Ingreso de datos
num = Val(combomenu.Text)
Proceso
1 more item...
Aplicación para el calculo de promedio