1.
¿Cómo se da la asignación de valores en visual Basic?
2.
estructura de programaciones en Visual Basic
3. Como
se realiza los ingresos de datos a través de controles de visual Basic
4. Cuál
es la sintaxis de las siguientes estructuras de decisión
Decisión
simple, decisión múltiple
5.
cuáles son los operadores básicos en Visual Basic
Operador
|
Operación
|
+
|
Suma
|
1. Se
utiliza “Dim” y seguido al nombre de la variable, la etiqueta “as”.
2. Una solución consta de uno o varios proyectos. Un proyecto a su vez puede
contener uno o más ensamblados. Cada ensamblado se compila a
partir de uno o varios archivos de código fuente. El archivo de código fuente proporciona la
definición e implementación de clases, estructuras, módulos e interfaces, que
en última instancia contienen todo el código.
3. Primer
paso: Predefinir los requisitos (campos)
La aplicación corresponde al registro y
actualización de una tabla que contiene información sobre las personas que
ingresan y salen de una edificación.
La tabla debe contener los siguientes campos:
Nombre(s) y Apellidos
Tipo de documento de identidad
Número del documento
Fecha
Hora entrada
Hora salida
Estado (adentro o afuera): En caso de no
registrar hora de salida, el estado será adentro, de lo contrario el estado
será afuera.
Segundo paso: Diseño del formulario principal
Diseñe el siguiente formulario desde la consola
de Microsoft® Excel Visual Basic para Aplicaciones, basado en los campos
mencionados en el paso anterior.
Tercer paso: Programación preliminar del
formulario
Antes de pasar a la programación de los botones
del formulario, debemos programar el ComboBox1 (control de listado), para que
muestre las opciones: C.C., C.E. y T.I. (Cédula de Ciudadanía, Cédula de
Extranjería y Tarjeta de Identidad). Haga doble click en el formulario y en la
ventana de código seleccione el procedimiento ACTIVATE. Escriba el siguiente
código (en color rojo):
Private Sub UserForm_Activate()
ComboBox1.Clear
ComboBox1.AddItem
("C.C.")
ComboBox1.AddItem
("C.E.")
ComboBox1.AddItem
("T.I.")
End Sub
El código borra primero el contenido del
COMBOBOX1 y luego agrega las tres opciones disponibles (esto ocurre cuando se
activa la ventana).
Cuarto paso: Activar el formulario desde la hoja
de cálculo
Desde la hoja de Microsoft® Excel donde se
encuentra la tabla creada en el paso 1, agregué un botón justo al lado de la
tabla (Control Active X) llamado FORMULARIO, como se observa en la siguiente
ilustración.
Haga doble click en el botón y agregue el
siguiente código:
Private Sub CommandButton1_Click()
UserForm1.Show
End Sub
Pruebe el botón y verifique el COMBOBOX1 muestre
las opciones programadas en el paso anterior.
Quinto paso: Programar el ingreso de datos
Regrese nuevamente al formulario en Visual Basic
y haga doble click en el botón ACTUALIZAR. Ingrese el siguiente código.
Private Sub CommandButton2_Click()
For I = 1 To 100
If Cells(I + 2, 2).Value
= "" Then
Cells(I + 2, 2).Value =
I
Cells(I + 2, 3).Value =
TextBox1.Text
Cells(I + 2, 4).Value =
TextBox2.Text
Cells(I + 2, 5).Value = ComboBox1.Text
Cells(I + 2, 6).Value =
TextBox3.Text
Cells(I + 2, 7).Value =
TextBox4.Text
Cells(I + 2, 8).Value =
TextBox5.Text
Cells(I + 2, 9).Value =
TextBox6.Text
If TextBox6.Text =
"" Then
Cells(I + 2, 10).Value =
"Adentro"
Else
Cells(I + 2, 10).Value =
"Afuera"
End If
Exit For
End If
Next
End Sub
En código se detalla el envío de datos desde los
controles dispuestos en el formulario a las respectivas celdas ubicadas en
Excel.
4. Se usa cuando se tiene una serie de estructuras Si (if), unas interiores a otras (anidadas). Esta estructura se interpreta de la siguiente manera: Evalúa la condición. Si condición1 es cierta entonces ejecuta el conjunto de sentencias definidas por S1i , i = 1 .. n. Si condición1 es falsa entonces evalúa condición. Si condición2 es cierta entonces ejecuta el conjunto de sentencias definidas por S2i , i = 1 ..m. Si la condición es cierta entonces ejecuta el conjunto de sentencias definidas por Si , i = 1 .. n. Si la condición es falsa entonces no ejecuta el conjunto de sentencias definidas por Si , i = 1 .. n.
5. Dim x As Integer = 100
Dim y As Integer = 6
Dim z As Integer
z = x Mod y
' The preceding statement sets z to 4. Dim a As Double = 100.3
Dim b As Double = 4.13
Dim c As Double
c = a Mod b
' The preceding statement sets c to 1.18.
