operación de suma vb
Tres cuadros de texto, Texto1, Texto2 y Texto3, están organizados horizontalmente en orden
Tres etiquetas, Etiqueta1 se coloca entre Texto1 y Texto2, el valor de Título de la Tabla1 es "+" y Etiqueta2 se coloca entre Texto2 y Texto3, el valor del Título de Etiqueta2 es "+", la Tabla3 está ubicada en cualquier posición
Dos botones de comando, Comando1 y Comando2
El siguiente es el código completo
Privado
Sub
Command1_Click()
Text1.Text
=
Fix(Rnd
*
41)
+
10
Texto2.Text
=
Fijar(Rnd
*
41)
+
10
Fin
Sub
Privado
Sub
Command2_Click()
Atenuar
a
Como
Entero
a
=
Val(Texto1."
Fin
Si
Fin
Sub
Privado
Sub
Form_Load()
Comando1.Caption
=
"Pregunta"
Comando2.Caption
=
"Sentencia"
Fin
Sub