función vbscript

dim a, b, c, d

a=inputbox("Ingrese el primer número")

b=inputbox("Ingrese el primer número) número" Dos números")

c=inputbox("Ingrese el tercer número")

si agt;=b y agt;=c entonces d=a

si bgt;=a y bgt;=c entonces d=b

si cgt;=a y cgt;=b entonces d=c

msgbox "El número más grande es" amp; d