Dim Precio
Dim dineroDisponible
Precio = 150
dineroDisponible = 100
if dineroDisponible
> precio then
msgbox "Ok, te alcanza puedes comprarlo"
Else
msgbox “No te alcanza, consiga más dinero"
End if
Este botón te sirve para indicar los signos de mayor que y menor que en el cual el ejemplo dice que es mayor el precio que el dinero disponible y que por lo tanto no alcanza. Después si el dinero disponible es mayor que el precio si te alcanza.
Dim Name
Name=inputbox("Y
tú quién eres?")
If
Name = “ " then
Msgbox "Hola sin nombre :/"
else
msgbox "Mucho gusto en conocerte"
+ Name
end if
No funciona
Dim dinero
dinero=inputbox
("Cuánto
dinero tienes ahorrado?")
if
dinero= 0 Or dinero < 10
then
Msgbox “Estas pobre"
else
Msgbox “Tienes poco ahorrado“
end
if
Tampoco funciona