Al hacer clic en Siguiente se pasa al segundo formulario (convertir pesos a dólares)
El código para el botón Convertir es:
Private Sub Convertir_Click()
Text3.Text = Val(Text2.Text) / Val(Text1.Text)
Text3.Text = Math.Round(Text3.Text)
End Sub
Private Sub Salir_Click()
End
End Sub
No hay comentarios:
Publicar un comentario
No dejes de comentar!!!