掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
ランダムに表示をするには？ (ID:100052)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
SyokujiNo1〜SyokujiNo10を配列変数、たとえば Dim Answer(1 to 10) as Integer として、Answer()に値を代入していきます。 で、問題となっているランダムのランダム部分で Index = Int(Rnd(1) * 10) + 1 SyokujiNo = Answer(Index) とすればよいのではないでしょうか？ 余談： チェックボックスもflgSyokuji1〜10も配列にしてみては どうでしょうか？ For i = 1 to 10 FieldName = "flgSyokuji" & i flgSyokuji(i) = rs(FieldName).Value chkAnswer(i).Value = flgSyokuji(i) Next など。もちろん変数宣言はお忘れなく。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.