braucht man net viel umbaun....:
Code:
DIM x AS integer
DIM y AS integer 'obwohls natürlich auch single gibt, aber ich denk integer passt da besser
RANDOMIZE
y = Int((100 - 0 + 1) * Rnd) + 0
DO
x = InputBox "Bitte geben Sie eine Zahl ein:"
IF int(x) < y THEN
msgbox " zu klein"
ELSEIF int(x) > y THEN
msgbox "zu groß"
ELSE
msgbox "Richtig"
END IF
LOOP UNTIL int(x) = y
Und das ganze rufst jetzt noch mit einem Button oder was du auch immer haben willst auf, und schon hast deine Funktion.
