クラスモジュールとコレクションを使ったゲームを作りたいですけど．． (ID:104811)

名前

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

本文 Label1.Caption = ary(i)を以下のように書き換えるのはいかがでしょう？ Dim 出力用 As String if i mod 3 then 出力用 = 出力用 & ary(i) & vbcrlf else 出力用 = 出力用 & ary(i) & " " ' " "はスペース end if Next i Label1.Caption = 出力用