回答編集履歴
1
指摘事項の追加
test
CHANGED
|
@@ -10,15 +10,19 @@
|
|
|
10
10
|
|
|
11
11
|
|
|
12
12
|
|
|
13
|
-
Form
|
|
13
|
+
まず、AccessのコマンドボタンはMSForms.CommandButtonとは別なので、Access.CommandButtonと書く必要があります。
|
|
14
14
|
|
|
15
15
|
|
|
16
16
|
|
|
17
|
-
|
|
17
|
+
次に、Form_inisialyzはスペルミスかと思いますが、もともとアクセスフォームにInitializeイベントやTerminateイベントはありません。書くならLoadイベント、Unloadイベントです。
|
|
18
18
|
|
|
19
19
|
|
|
20
20
|
|
|
21
|
+
次に、Terminateイベントに書いているSet NumBtn = Nothingですが、NumBtnは配列かと思いますので、個別にNothingするか「Erase NumBtn」とする必要があります。
|
|
22
|
+
|
|
23
|
+
|
|
24
|
+
|
|
21
|
-
|
|
25
|
+
最後に、NumBtn(i).MyItem Controls("b" & i) はプロパティへの値セットなので、イコールで代入する必要があります。さらにオブジェクト型プロパティなので、Setが必要です。
|
|
22
26
|
|
|
23
27
|
|
|
24
28
|
|