フオームにテキストボックスを配置しています cbo日付、cbo日付１ cbo日付は、「2021年1月」形式で年月を表示
フオームにテキストボックスを配置しています cbo日付、cbo日付１ cbo日付は、「2021年1月」形式で年月を表示 cbo日付1は、「2021年3月」形式で年月を表示 テキストボックス名、期首日、期末日を配置 cbo日付の年月を元に期首日に2021/01/01のように、日を１日として表示 cbo日付1の年月を元に期末日に2021/03/31のように、日を末日として表示 したいのですが、コントロールソースに記述したいと思います。 cbo日付1は、2021年2月、2021年4月の場合もあります。 ご指導お願いします。
Microsoft Access | Visual Basic・49閲覧・500
ベストアンサー
cbo日付とcbo日付1のデータ型が書いてないので、日付型でも文字型でも、どちらでも大丈夫な式です。 [ 期首日のコントロールソース] =IIf(IsDate(Nz([cbo日付])),DateSerial(Year(Nz([cbo日付])),Month(Nz([cbo日付])),1),"") [ 期末日のコントロールソース] =IIf(IsDate(Nz([cbo日付1])),DateSerial(Year(Nz([cbo日付1])),Month(Nz([cbo日付1]))+1,0),"")
アルルカン様ありがとうございます。 以前教授されていた、回答が消えてしまいました。 AfterUpdateのコードだと思いますが。 再度表示いただけますか。 といいますのが。 コントロールソースに貼るコードが、どうも動かないようです。 cbo日付(コンボボックス）を説明します。 値集合ソースはQ年月です。列数は3 フイールドは以下です 年月/nengetu/Gnengetu 202001/2021年01月/令和3年01月 202002/2021年02月/令和3年02月 202003/2021年03月/令和3年03月 以降１２月迄続きます。 cbo日付にはnengetuフイールドを表示しています。 よろしくい願いします。
質問者からのお礼コメント
アルルカン様 ありがとうございます
お礼日時：3/4 9:31
