Access VBA質問箱 IV

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

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


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

538 / 9994

←次へ　｜　前へ→


	【12767】Re:複数条件での抽出

木葉 - 15/3/25(水) 11:19 -


	引用なし

	パスワード

▼かるびの様：

お返事ありがとうございます。

>　strFilter中の日付に関する条件式は、
>　　　日付 >= #2015/3/24# 　
>のようになっていなければいけないのですが、
>「2015年3月24日」などとなっていたり、「2015/03」（日にちなし）となっていたりしませんか。
>
「AND 日付 <= #2015/03/24#」と表示されました。
ということは正常・・？

>　私なら、
>Private Sub txt開始日_BeforeUpdate(Cancel As Integer)
>　　If IsDate(Nz(txt開始日.Value,"")) = False Then
>　　　　Msgbox "おかしな日付です。"
>　　　　Cancel = True
>　　End
>End Sub
>とします。
>　12755のレスでは、cmdFilter_Clickイベントでメッセージを出すコードを紹介したところですが、
>入力チェックをするなら、BeforeUpdateで行うのが常道です。

勉強になります。
こちらも試してみたのですが、普通の日付を入力しても「おかしな日付です。」と表示されてしまいました。
前にも書いた通り、テキストボックスには書式設定を日付（Ｓ）にしています。
なので、「3/25」と入力すれば自動で「2015/3/25」と表示されるようにしていますが、それに原因があったりしますか？
また、「2015/3/25」や「2015/03/25」と入力してもおかしな日付と表示されてしまいました…。

入力規則ですが、自分で提案しておいて何ですが、苦手なものでやはり避けたい気持ちでいっぱいです…

1,378 hits

▼

【12728】複数条件での抽出 木葉 15/3/13(金) 15:40