VB6
日付を文字列に変換する
以下の例ではすべてシステム日付(=Now)を変換している。
実際に使用する際にはNowの代わりに任意の日付型の値を指定することができる。
1."2004/08/05" のように変換する例
Text1.Text = Format(Now, "YYYY/MM/DD")
2."2004/8/5" のように変換する例
Text1.Text = Format(Now, "YYYY/M/D")
3."2004年08月05日" のように変換する例
Text1.Text = Format(Now, "YYYY年MM月DD日")
4."04/08/05" のように変換する例
Text1.Text = Format(Now, "YY/MM/DD")
5."20040805" のように変換する例
Text1.Text = Format(Now, "YYYYMMDD")
6."H16/08/05" のように変換する例
Text1.Text = Format(Now, "GEE/MM/DD")
メモ:明治元年(1868年10月23日)より前の日付は正確に変換できません。
7."平16年8月5日" のように変換する例
Text1.Text = Format(Now, "GGE年M月D日")
メモ:明治元年(1868年10月23日)より前の日付は正確に変換できません。
8."平成16年8月5日" のように変換する例
Text1.Text = Format(Now, "GGGE年M月D日")
メモ:明治元年(1868年10月23日)より前の日付は正確に変換できません。
9."08.05.2004" のように変換する例
Text1.Text = Format(Now, "MM.DD.YYYY")
10."200408" のように変換する例
Text1.Text = Format(Now, "YYYYMM")
11.コントロールパネルの「地域と言語のオプション」の「短い形式」に変換する例
Text1.Text = CStr(Now)
メモ:この例の変換結果は「短い形式」の設定内容によって異なります。