Scribd
Cargar
19 vistas4 páginas

Documento - Ejercico de Programacion

fgfgdfg

Cargado por

adrianaleonax15
Derechos de autor
© © All Rights Reserved
Nos tomamos en serio los derechos de los contenidos. Si sospechas que se trata de tu contenido, reclámalo aquí.
Formatos disponibles
Descarga como RTF, PDF, TXT o lee en línea desde Scribd

Temas abordados

  • Textnum1,
  • Visual Basic,
  • estructura de código,
  • asignación,
  • optimización,
  • interacción,
  • código repetido,
  • entrada de usuario,
  • Textnum3,
  • integer
19 vistas4 páginas

Documento - Ejercico de Programacion

fgfgdfg

Cargado por

adrianaleonax15
Derechos de autor
© © All Rights Reserved
Nos tomamos en serio los derechos de los contenidos. Si sospechas que se trata de tu contenido, reclámalo aquí.
Formatos disponibles
Descarga como RTF, PDF, TXT o lee en línea desde Scribd

Temas abordados

  • Textnum1,
  • Visual Basic,
  • estructura de código,
  • asignación,
  • optimización,
  • interacción,
  • código repetido,
  • entrada de usuario,
  • Textnum3,
  • integer

Private Sub Command1_Click()

Dim numero1, numero2, numero3, resultado As Integer

numero1 = Val([Link])

numero2 = Val([Link])

numero3 = Val([Link])

resultado = Val(numero1) - Val(numero2) - Val(numero3)

Labelresul = resultado

End Sub
Private Sub Command1_Click()

Dim numero1, numero2, numero3, resultado As Integer

numero1 = Val([Link])

numero2 = Val([Link])

numero3 = Val([Link])

resultado = Val(numero1) + Val(numero2) + Val(numero3)

Labelresul = resultado

End Sub
Private Sub Command1_Click()

Dim numero1, numero2, numero3, resultado As Integer

numero1 = Val([Link])

numero2 = Val([Link])

numero3 = Val([Link])

resultado = Val(numero1) * Val(numero2) * Val(numero3)

Labelresul = resultado

End Sub
Private Sub Command1_Click()

Dim numero1, numero2, numero3, resultado As Integer

numero1 = Val([Link])

numero2 = Val([Link])

numero3 = Val([Link])

resultado = Val(numero1) / Val(numero2) / Val(numero3)

Labelresul = resultado

End Sub

También podría gustarte