質問するログイン新規登録

質問編集履歴

2

エラーの出方が変化したため、現在の状況に書き換えました。

2016/03/10 05:20

投稿

nekomura
nekomura

スコア132

title CHANGED
File without changes
body CHANGED
@@ -8,19 +8,22 @@
8
8
 
9
9
  フォームにテキストボックスを2つ用意しています。
10
10
  このテキストボックス(invoiceFrom と invoiceTo)の
11
- どちらにも値が入っていなければ
11
+ どちらにも値が入っていなければ
12
12
  "hoge"
13
13
  とメッセージを出し、
14
14
 
15
- いずれかに値が入っていれば
15
+ いずれかに値が入っていれば
16
16
  "hogehoge"
17
17
  と出したいです。
18
18
 
19
19
  しかし下記コードを実行すると、
20
- 「コントロールがフォーカスを取得していないときに、コントロールのプロパティまたはメソッドを参照することはできません。」とメッセージが出ます。
21
- 自身で解決ができないため、どうぞよろしくお願いいたします。
20
+ 「nullの使い方不正す」とメッセージが出ます。
21
+ テキストボックス2つともに値が入っていれば、②は実行されるのですが、
22
+ テキストボックスに入力が無い場合の処理ができないので困っています。
22
23
 
24
+ いろいろと調べているのですが解決できず、どうぞよろしくお願いいたします。
23
25
 
26
+
24
27
  Private Sub データ取得_Click()
25
28
  On Error GoTo Err_データ取得_Click
26
29
 

1

誤字修正しました。

2016/03/10 05:20

投稿

nekomura
nekomura

スコア132

title CHANGED
@@ -1,1 +1,1 @@
1
- access vba コントロールがフォーカスを取得していない?エラー
1
+ access vba コントロールがフォーカスを取得していない?エラーで困っています
body CHANGED
@@ -4,12 +4,14 @@
4
4
  有識者の方々お知恵を貸してください。
5
5
 
6
6
 
7
- やりたいことは
7
+ やりたいことは下記です。
8
+
8
9
  フォームにテキストボックスを2つ用意しています。
9
- ※図参照ください このテキストボックス(invoiceFrom と invoiceTo)の
10
+ このテキストボックス(invoiceFrom と invoiceTo)の
10
11
  どちらにも値が入っていなければ
11
12
  "hoge"
12
- メッセージを出し、
13
+ メッセージを出し、
14
+
13
15
  いずれかに値が入っていれば
14
16
  "hogehoge"
15
17
  と出したいです。