質問編集履歴

2

質問の修正をしました

2020/06/05 03:29

投稿

mm_teratail
mm_teratail

スコア7

test CHANGED
File without changes
test CHANGED
@@ -1,42 +1,38 @@
1
- Access2016のレポート上に、10個テキストボックス(tb1tb10)を配置しました。
1
+ Access2016のレポート上に、同じ名称で通番を振った4個テキストボックス(tb1tb2、tb3、tb4)を配置しました。
2
2
 
3
3
  このテキストボックスをFor文で初期化する方法が知りたいです。
4
4
 
5
5
 
6
6
 
7
- 例えば
7
+ 例えば、フォーム上のテキストボックスでしたら
8
8
 
9
- For cnt = 1 To 10
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("レポート名").[tbA & Cnt] = "" ←エラー発生位置(For文の1回目)
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

質問内容の追加

2020/06/05 03:29

投稿

mm_teratail
mm_teratail

スコア7

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
  よろしくお願いいたします。