- ベストアンサー
各月の末日を取得する方法を教えてください
VB+Access97を使って開発しております。 データベースの年月フィールドには西暦と月が格納されており、 そのデータをもとにその月の末日を取得したいのですが 取得方法を教えてください。 例:DBの年月フィールドの中身→そこから取得したい年月(末)日 2001/01→2001/01/31 2001/02→2001/02/28 2001/03→2001/03/31 ・ ・ ・ ・
- みんなの回答 (2)
- 専門家の回答
質問者が選んだベストアンサー
- ベストアンサー
noname#1296
回答No.2
VBで使えるかどうかわかりませんが、Accessでしたら Dateserial(年,月 + 1,0)で月末の日付を取得できます。 年月フィールドはテキスト型でしょうか? DateSerial(CInt(Mid(年月,1,4)),CInt(Mid(年月,6,2))+1,0) という感じでどうしょう。
その他の回答 (1)
- takarin_
- ベストアンサー率40% (2/5)
回答No.1
私もそれで悩んだことがあります。 一番簡単な解決手段は、月末を求めたい月の翌月1日を作り 出します。(当然、年と月の繰り上げ処理を行って) 次にDate変数に代入するか、Date関数を用いて、その日 から1日引いた日を求めれば完成です。