Ejemplo# 1
2(Integer)
Dim A, B
As Integer
3(Double)
Dim C, D,
E As Double
Label1 =”Introduzca
el primer dato”
Label2 =”Introduzca
el segundo dato”
Label3 =”Introduzca
el tercer dato”
Label4 =”Introduzca
el cuarto dato”
E= A+B+C+D
Label5= (“Resultado
de la suma, & E”)
Ejemplo #2
Dim H As
Integer
Dim G As Integer
Dim J As Integer
Label1= “Introduzca
la primera variable”
Label2= “Introduzca
la segunda variable”
J= H/G
Label3= (“Resultado
de la división, & J”)
Ejemplo #3
Dim M As Integer
Dim K As Integer
Dim P As Integer
Label1= “Introduzca
el primer dato”
Label2= “Introduzca
el segundo dato”
P= M*K
Label3= (“Resultado
de la multiplicación, & P”)
No hay comentarios.:
Publicar un comentario