１０回繰り返し実行するには？ (ID:82052)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 何をどう１０回実行したいのですか？ For i = 1 To 10 乱数発生_Click() Next とか Private Sub 乱数発生_Click '乱数発生スイッチ For i = 1 To 10 upper1 = 10 lower1 = -10 If fg1 = 0 Then '初期スピードaの乱数発生 Randomize a = Int((20 * Rnd) + 1) a2 = a Text11.Text = a2 '初期スピードの表示 Text4.Text = a '現在スピードの表示 fg1 = 1 End If Next End Sub とか どこを１０回実行したいのかこれだけでは見えませんが。