初期データの書き方

質問

PHPのように初期データを行を変えて書くことはできるでしょうか？
$a = Array(
0, 0, 0,
0, 0, 0,
);

dim a() as integer
redim a(5)
a = array(0,0,0,0,0,0)
でも良いのですが、長いデータの場合限っては最初のように書きたいです。

回答No.2

imogasi · ベストアンサー

ソースコードの書き方（入力し方）のことなら、行継続記号である（スペース）＋（アンダースコア）で改行できます。
ＶＢの文法（？）で、解説書の初めに載ってます。
どの言語にも、ソースコードを２行以上に分けて書く方法の決まりが決められていると思います。
ただし、文字列式の途中の行継続形式は使用できません。
注釈文の中の改行は、別途決められている場合があるます。
（何々から何々までは何行にわたってでも注釈、など）
http://support.microsoft.com/kb/843621/ja
（１）画面表示桁に比べ、長いのでやむをえず分ける
（２）意味的に対応しているので分けて書きたい
例　
Sub test01()
a = Array( _
"北海道", 1, _
"東北", 2, _
"関東", 3, _
"中部", 4, _
"近畿", 5 _
)
'For i = 0 To UBound(a)
'MsgBox a(i)
'Next i
b = InputBox("コード")
For i = 1 To UBound(a) Step 2
If a(i) = Val(b) Then
MsgBox a(i - 1)
End If
Next i
End Sub
ときなど、
ーー
参考
http://www.ne.jp/asahi/hishidama/home/tech/lang/symbol.html#_

回答No.1

himajin100000

手元のExcel 2007 VBAではサンプルが動作しませんでした。

http://www13.ocn.ne.jp/~msactown/vba_19.html
上記のように
Variantでなら動作したけど

Option Explicit
Sub Main()
Dim a As Variant
a = Array(1, 3, 5)
MsgBox (a(0))
End Sub

本題の回答はこれ

http://oshiete1.goo.ne.jp/qa2585414.html

こーいう書き方でも動作しています

Option Explicit
Sub Main()
Dim a As Variant
a = Array(1, _
3, _
5)
MsgBox (a(0))
End Sub