Question

alguien puede ayudarme a resolver en visual basic este ejercicio. ¿Desarrollar un programa que recoja 1 Real, usando inputbox y muestre en

un mensaje msgbox si es positivo o negativo.?​

Answer 1

Respuesta:

Use Visual Basic 6.0

Explicación:

Private Sub Command1_Click()

numero = Val(InputBox("Ingrese un número con decimales", "Ejemplo"))

If numero = 0 Then

  MsgBox "Es neutro"

  Else

     If numero > 0 Then

        MsgBox "Positivo"

        Else

           MsgBox "Es Negativo"

     End If

End If

End Sub

Private Sub Command2_Click()

Unload Me

End Sub