QA@IT

まとめて初期化したい、短いコードにしたい。

238 PV

Dim table(2, 2) As String
table(0, 0) = " "
table(0, 1) = " "
table(0, 2) = " "
table(1, 0) = " "
table(1, 1) = " "
table(1, 2) = " "
table(2, 0) = " "
table(2, 1) = " "
table(2, 2) = " "

  • Dim table(2, 2) As String
    For i = 0 To 2
    For j = 0 To 2
    table(i, j) = " "
    Next
    Next
    解決しました。
    -
ウォッチ

この質問への回答やコメントをメールでお知らせします。