VBScriptで困ってます(>_<)

質問

VBScriptを使って、クイズ的なものを作成しているのですが、
打ち込んだクイズをランダムに表示させられないかと考えました
ですが、どのような文字列を打ち込んだら良いか分かりません…
一応、こんな感じで作成しています。

moji = inputbox("クイズの内容","タイトル")
if (moji = "ここには正解を") then
msgbox("当たっていた場合の表示")
else
msgbox(moji = "外れていた場合の表示")
end if

以下二問目～

という風に作成しています
どこにどのようにどのような文字列を打ち込めばよいか(ToT)/~~~
どなたか知恵をお貸しください…

回答No.1

imogasi

質問者はプログラムの、初心者ですか。
質問のやり方では問題の数だけIF-Then-Else-EndIfを書くことになるが、普通こんなことをしないのでは。
またなぜクイズをVBSｃrptでやるのかかわからない。文章・語句的な回答の記憶を試すクイズ以外は、クイズに向いたビジネス系のVBAやVBSｃriptに特別使えるステートメントなど無い。ファイルやフォルダを扱うときに少し便利だが。
ーー
・質問と回答の対応テーブルをデータまたはプログラムの中に持って対応回答と答えをチェックする。
・毎回同じ順序で発問されるのが平板なら、質問を出す順番をランダムにする。
などやるのでは。
＞どこにどのようにどのような文字列を打ち込めばよいか(
何を聞いて居るかわからない。プログラムコードの描き方を聞いているの？
VBｓｃりｐｔの市販解説書は少ないから、やや似たエクセルVBAの本でも読むことをはじめたら。