質問編集履歴
2
あってたので元に戻しました。
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -16,7 +16,7 @@
|
|
|
16
16
|
|
|
17
17
|
Dim FileName As Variant
|
|
18
18
|
|
|
19
|
-
FileName = Array(2,2)
|
|
19
|
+
FileName = Array(0,1,2)(0,1,2)
|
|
20
20
|
|
|
21
21
|
FileName(0,0) = "a\b\c"
|
|
22
22
|
|
|
@@ -78,7 +78,7 @@
|
|
|
78
78
|
|
|
79
79
|
Dim Tmp As Variant
|
|
80
80
|
|
|
81
|
-
Tmp = Array(2,2)
|
|
81
|
+
Tmp = Array(0,1,2)(0,1,2)
|
|
82
82
|
|
|
83
83
|
For i = 0 To 3
|
|
84
84
|
|
1
配列の宣言を修正
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -16,7 +16,7 @@
|
|
|
16
16
|
|
|
17
17
|
Dim FileName As Variant
|
|
18
18
|
|
|
19
|
-
FileName = Array(
|
|
19
|
+
FileName = Array(2,2)
|
|
20
20
|
|
|
21
21
|
FileName(0,0) = "a\b\c"
|
|
22
22
|
|
|
@@ -78,7 +78,7 @@
|
|
|
78
78
|
|
|
79
79
|
Dim Tmp As Variant
|
|
80
80
|
|
|
81
|
-
Tmp = Array(
|
|
81
|
+
Tmp = Array(2,2)
|
|
82
82
|
|
|
83
83
|
For i = 0 To 3
|
|
84
84
|
|