Access VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

794 / 9994

←次へ　｜　前へ→


	【12509】複数日時から、SQLクエリ作成、#の付け方

神田龍一 - 14/4/18(金) 22:11 -


	引用なし

	パスワード

こんにちは。初心者です。
過去ログを見たのですが、同じような質問が見当たりませんでしたので、質問します。
１．受注テーブルがあります。
受注日時、品番、数量、顧客名、
受注日時は、日付日時型です。
２．受注テーブルのデータの一部を、受注日時でひとつ又は複数選択し、SQLクエリを作成したいです。(最終的にはSQLクエリを元に印刷したいです)
３．受注日選択フォームにリストボックスを作り、受注テーブルのデータを並べ、ひとつ又は複数選択し、フォーム上のボタンを押して、SQLクエリを作成したいです。
リストボックスのコントロール名は"日時"です。
４．ボタンのイベントプロシージャの内容は下記です。
Dim db As Database
Dim QQQ As QueryDef
Set db = CurrentDb
Dim ctl As Control
Dim AAA As String
Dim sql As String

Set ctl = Me!日時
For Each varItm In ctl.ItemsSelected
AAA = AAA & "," & ctl.ItemData(varItm) & ""
Next varItm
AAA = Mid(AAA, 2)
sql = "SELECT 受注日時, 品番, 数量, 顧客名 FROM 受注テーブルHAVING (((受注日時) In (" & AAA & ")));"
Set QQQ = db.CreateQueryDef("選択リスト", sql)

５．結果は、クエリが作成出来ません。
日付の両側に#を付けたいのですが、書き方がわかりません。
教えていただけると嬉しいです。

131 hits

▼

【12509】複数日時から、SQLクエリ作成、#の付け方 神田龍一 14/4/18(金) 22:11