How do you find the greatest of three numbers using vb script?

Answer 1

dim a,b,c

a=cint(inputbox("enter value for a"))

b=cint(inputbox("enter value for b"))

c=cint(inputbox("enter value for c"))

if((a>b)and(a>c)) then

msgbox "greatest number is a="&a

else if ((b>a)and(b>c)) then

msgbox "greatest number is b="&b

else

msgbox "greatest number is c="&c

end if

end if