Esta forma ¿sería válida?,¿funcionaría correctamente?, el ejercicio me pide introducir los tres números por teclado:
Código vb:
Ver originala = InputBox("Introduce Numero 1:")
b = InputBox("Introduce Numero 2:")
c = InputBox("Introduce Numero 3:")
Option Explicit
Dim a, b, c
var = InputBox("Introduce tre números:")
MsgBox(a, b, c)
If (( a > b) && (a > c)) Then
If (b > c)
MsgBox(c, b, a)
Else
MsgBox(b, c, a)
End If
If (( b > a) && (b > c)) Then
If (a > c)
MsgBox(c, a, b)
Else
MsgBox(a, c, b)
End If
If (( c > a) && ( c > b)) Then
If ( a > b)
MsgBox(b, a, c)
Else
MsgBox(a, b, c)
End If