Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
7986 / 9994 ←次へ　｜　前へ→
【5189】Re:フォーム作成
質問  バリュー  - 05/6/1(水) 11:58 -
引用なし
パスワード
   ▼小僧 さん：
度々すみません。
返信誠にありがとうございます。


>>>Private Sub 検索実行ボタン_Click()
>という事で、検索実行ボタン（コマンドボタン）を
>クリックする事から始まるコードですので、
>検索実行ボタンの「クリック時」からのコードビルダーに
>記入をお願いします。

教えて頂いた上記の場所に、
早速下記のようにコードを投入してみました。

Private Sub 検索実行ボタン_Click()
'発行日が空だった場合は実行させません
　　If IsNull(Me.発行日) Then
　　　　MsgBox "発行日を入れて下さい"
　　　　Exit Sub
　　End If

'発行日が日付型でなかった場合は実行させません
　　If Not IsDate(Me.発行日) Then
　　　　MsgBox "発行日を正しく入力して下さい"
　　　　Exit Sub
　　End If

'発生場所・是正先・不具合のコンボボックスを空にします
　　Me.発生場所.Value = ""
　　Me.是正先.Value = ""
　　Me.不具合内容.Value = ""

'発生場所コンボの値集合ソースを設定します
　　Me.発生場所.RowSource = _
　　　　"SELECT 発生場所 FROM ta対策書マスタークレーム " _
　　　& "WHERE 発行日 Between #"

End Sub

実行させようとしたところ、
エラーメッセージがでました。

「実行時エラー'3315'
フィールド'ta対策書マスタークレーム．発生場所'には、
長さ０の文字列を格納できません」
とありました。

何がよろしくなかったでしょうか？
589 hits
▼ 【5135】フォーム作成 バリュー 05/5/27(金) 11:12 お礼
【5139】Re:フォーム作成 小僧 05/5/27(金) 14:47 発言
【5143】Re:フォーム作成 バリュー 05/5/27(金) 17:00 質問
【5144】Re:フォーム作成 小僧 05/5/27(金) 17:30 回答
【5152】Re:フォーム作成 バリュー 05/5/30(月) 9:53 質問
【5154】Re:フォーム作成 小僧 05/5/30(月) 10:38 回答
【5156】Re:フォーム作成 バリュー 05/5/30(月) 11:28 質問
【5157】Re:フォーム作成 小僧 05/5/30(月) 12:01 回答
【5158】Re:フォーム作成 バリュー 05/5/30(月) 13:51 質問
【5160】Re:フォーム作成 小僧 05/5/30(月) 14:32 回答
【5161】Re:フォーム作成 バリュー 05/5/30(月) 15:34 質問
【5162】Re:フォーム作成 小僧 05/5/30(月) 16:15 回答
【5163】Re:フォーム作成 バリュー 05/5/30(月) 16:41 質問
【5164】Re:フォーム作成 小僧 05/5/30(月) 17:16 回答
【5168】Re:フォーム作成 バリュー 05/5/31(火) 11:09 質問
【5170】Re:フォーム作成 小僧 05/5/31(火) 13:10 発言
【5174】Re:フォーム作成 バリュー 05/5/31(火) 14:05 質問
【5175】Re:フォーム作成 小僧 05/5/31(火) 14:24 発言
【5176】Re:フォーム作成 バリュー 05/5/31(火) 14:58 発言
【5178】Re:フォーム作成 小僧 05/5/31(火) 15:20 発言
【5179】Re:フォーム作成 バリュー 05/5/31(火) 16:14 質問
【5181】Re:フォーム作成 小僧 05/5/31(火) 17:01 回答
【5182】Re:フォーム作成 バリュー 05/5/31(火) 17:46 質問
【5184】Re:フォーム作成 小僧 05/6/1(水) 10:04 回答
【5187】Re:フォーム作成 バリュー 05/6/1(水) 11:02 質問
【5188】Re:フォーム作成 小僧 05/6/1(水) 11:09 回答
【5189】Re:フォーム作成 バリュー 05/6/1(水) 11:58 質問≪
【5190】Re:フォーム作成 小僧 05/6/1(水) 13:07 回答
【5192】Re:フォーム作成 バリュー 05/6/1(水) 13:45 質問
【5193】Re:フォーム作成 小僧 05/6/1(水) 13:54 回答
【5195】Re:フォーム作成 バリュー 05/6/1(水) 14:34 質問
【5197】Re:フォーム作成 小僧 05/6/1(水) 15:27 回答
【5202】Re:フォーム作成 バリュー 05/6/1(水) 16:58 質問
【5204】Re:フォーム作成 小僧 05/6/1(水) 17:31 回答
【5209】Re:フォーム作成 バリュー 05/6/2(木) 9:58 質問
【5210】Re:フォーム作成 小僧 05/6/2(木) 10:39 回答
【5211】Re:フォーム作成 バリュー 05/6/2(木) 11:02 質問
【5215】Re:フォーム作成 小僧 05/6/2(木) 12:50 回答
【5217】Re:フォーム作成 バリュー 05/6/2(木) 13:35 質問
【5218】Re:フォーム作成 小僧 05/6/2(木) 13:49 回答
【5224】Re:フォーム作成 バリュー 05/6/3(金) 9:23 質問
【5226】Re:フォーム作成 小僧 05/6/3(金) 10:30 回答
【5231】Re:フォーム作成 バリュー 05/6/3(金) 12:21 質問
【5232】Re:フォーム作成 バリュー 05/6/3(金) 13:11 発言
【5233】Re:フォーム作成 小僧 05/6/3(金) 13:18 回答
【5237】Re:フォーム作成 バリュー 05/6/3(金) 14:16 お礼
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
7986 / 9994 ←次へ　｜　前へ→
ページ：  ┃  記事番号：
1078263
(SS)C-BOARD v3.8 is Free