トオリスガリ様

ご返答ありがとうございます。
上手い説明が出来ずに申し訳ありません。

5個数字をランダムで選択し、その数字分クリックした時に加算。という形にすると、実験参加された方みんなが同じ回数で加算されることになってしまわないでしょうか？
そうならないのであれば良いのですが、何人か実験に参加して下さる方がいるのでその数字も毎回ランダムにしたいと思っています。


乱数発生のプログラムの仕方を先ほど見ていたのですが、

' 乱数を格納するための変数を宣言する 

    Dim iRandom As Integer



    ' 0 以上 100 未満の乱数を取得する 

    iRandom = CInt(Math.Rnd() * 100)



    ' 取得した乱数を表示する 

    Call MsgBox(CStr(iRandom))

上記プログラムを使うと、最初に言ったような「平均20回で1ポイント加算」条件を作ることが出来るかなと思ったのですが、乱数を発生させてそこから加算させる方法がいまいち分かりかねます。
この考え方が根本的に違うのでしょうか…。


http://jeanne.wankuma.com/tips/vb6/random/next.html