こんにちは
Vistaでメモ帳を使ってvbsを作っているのですが
次のコードがうまくいきません

randomize

Dim as

as = int(rnd*100) + 1

MsgBox "1～100までの数を入力してね"

Dim in

in = inputBox "予想は？"

if in = as then

   MsgBox "正解!"

else

   MsgBox "不正解"

end if

要するに１から１００までの数を入力してあっていれば
正解と表示したいだけです。
よろしくお願いします！