質問編集履歴
2
質問の修正をしました
test
CHANGED
File without changes
|
test
CHANGED
@@ -1,42 +1,38 @@
|
|
1
|
-
Access2016のレポート上に、
|
1
|
+
Access2016のレポート上に、同じ名称で通番を振った4個テキストボックス(tb1、tb2、tb3、tb4)を配置しました。
|
2
2
|
|
3
3
|
このテキストボックスをFor文で初期化する方法が知りたいです。
|
4
4
|
|
5
5
|
|
6
6
|
|
7
|
-
例えば
|
7
|
+
例えば、フォーム上のテキストボックスでしたら
|
8
8
|
|
9
|
-
For cnt = 1 To
|
9
|
+
For cnt = 1 To 4
|
10
10
|
|
11
11
|
Me("tb" & cnt) = ""
|
12
12
|
|
13
13
|
Next
|
14
14
|
|
15
|
-
という
|
15
|
+
ということが出来ますが、それをレポート上のテキストボックスでやりたいです。
|
16
16
|
|
17
17
|
|
18
18
|
|
19
|
-
実現したい事としては
|
20
19
|
|
21
|
-
Reports("レポート名").[tb & Cnt] = ""
|
22
20
|
|
23
|
-
|
21
|
+
For cnt = 1 To 4
|
22
|
+
|
23
|
+
Reports("レポート名").[tb & Cnt] = ""
|
24
|
+
|
25
|
+
Next
|
24
26
|
|
25
27
|
|
26
28
|
|
27
|
-
|
29
|
+
と記述しましたが、エラーが出てしましました。
|
28
|
-
|
29
|
-
|
30
30
|
|
31
31
|
エラーについては、下記のとおりです。
|
32
32
|
|
33
33
|
For cnt = 1 To 4
|
34
34
|
|
35
|
-
Reports("レポート名").[tb
|
35
|
+
Reports("レポート名").[tb & Cnt] = "" ←エラー発生位置(For文の1回目)
|
36
|
-
|
37
|
-
Reports("レポート名").[tbB & Cnt] = ""
|
38
|
-
|
39
|
-
Reports("レポート名").[tbC & Cnt] = ""
|
40
36
|
|
41
37
|
Next
|
42
38
|
|
@@ -50,4 +46,10 @@
|
|
50
46
|
|
51
47
|
|
52
48
|
|
49
|
+
|
50
|
+
|
51
|
+
レポート上のテキストボックスも、フォーム上のテキストボックスと同じようにFor文で通番を回し、初期化する方法が知りたいです。
|
52
|
+
|
53
|
+
|
54
|
+
|
53
55
|
よろしくお願いいたします。
|
1
質問内容の追加
test
CHANGED
File without changes
|
test
CHANGED
@@ -24,4 +24,30 @@
|
|
24
24
|
|
25
25
|
|
26
26
|
|
27
|
+
↓↓↓下記、追加しました↓↓↓
|
28
|
+
|
29
|
+
|
30
|
+
|
31
|
+
エラーについては、下記のとおりです。
|
32
|
+
|
33
|
+
For cnt = 1 To 4
|
34
|
+
|
35
|
+
Reports("レポート名").[tbA & Cnt] = "" ←エラー発生位置(For文の1回目)
|
36
|
+
|
37
|
+
Reports("レポート名").[tbB & Cnt] = ""
|
38
|
+
|
39
|
+
Reports("レポート名").[tbC & Cnt] = ""
|
40
|
+
|
41
|
+
Next
|
42
|
+
|
43
|
+
|
44
|
+
|
45
|
+
ダイアログ
|
46
|
+
|
47
|
+
実行時エラー '2465':
|
48
|
+
|
49
|
+
指定した式で参照されている'|1'フィールドが見つかりません。
|
50
|
+
|
51
|
+
|
52
|
+
|
27
53
|
よろしくお願いいたします。
|