１ループごとにラベルに表示するには？ (ID:107884)

名前

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

本文 こんにちは１ループごとにラベルに表示させたいのですができません。再描画とかいう処理はありますか。なおＡＰＩのＤｒａｗＴｅｘｔではできたのですが、どうしてもラベルでやりたいのでお願いします。 Private sub commond_Click For i = 1 To 300 Label1 = i For j = 1 To 1000000: Next j Next i End sub このようにしても全ての処理が終わるまでラベルには表示されませんでした。 理想は１，２，３・・・３００となるようにしたいです。