■ 現在のこのページの役立ち度:
表示されない場合こちらのリンクからもご覧になれます。
■ このページの役立ち度を評価する:
役立ち度を評価してください。
(1(左):あまり役立たない - 5(右):大変役立った):
■ ページの共有:
[ サイト内検索 ]
カスタム検索
#17255-0日付の表示について匿名172552000-12-20(水) 17:19
     #17257-0RE#17255:日付の表示についてtyun2000-12-20(水) 17:58
     #17258-0RE#17257:日付の表示についてtyun2000-12-20(水) 18:00
     #17260-0RE#17255:日付の表示について魔界の仮面弁士2000-12-20(水) 22:33
#17255-0
日付の表示について
”200012200000”←2000年12月20日午前00時00分というデータを
Format関数を利用してDate型に変換したところ、
”00/12/20”となってしまいました。”00/12/20 00:00”と表示させたい
のですが、お力をお貸しください。

dim TempTimeDate as String
Dim TimeDate as Date

TempTimeDate = "200012200000"
TempTime1 = Format(TempTimeDate, "0000/00/00 00:00")
TimeDate = Format(TempTime1, "yyyy/mm/dd hh:nn")
#17257-0
RE#17255:日付の表示について
> ”200012200000”←2000年12月20日午前00時00分というデータを
> Format関数を利用してDate型に変換したところ、
> ”00/12/20”となってしまいました。”00/12/20 00:00”と表示させたい
> のですが、お力をお貸しください。
> 
> dim TempTimeDate as String
> Dim TimeDate as Date
> 
> TempTimeDate = "200012200000"
> TempTime1 = Format(TempTimeDate, "0000/00/00 00:00")
> TimeDate = Format(TempTime1, "yyyy/mm/dd hh:nn")

TimeData(Data型)に格納するというのではないですが、ラベルなどへ表示するだけなら
Format(Now, "yyyy / mm / dd") & " " & Time$
で”00/12/20 00:00”の形になります。
あとはMid関数とかで後半4桁抜き出して時間と日付けを別々に処理するとか。
こんな答えしかできなくてすいません。
#17258-0
RE#17257:日付の表示について
> TimeData(Data型)に格納するというのではないですが、ラベルなどへ表示するだけなら
すいません、”Date”ですね。スペルミスです。すいません。
#17260-0
RE#17255:日付の表示について
> ”00/12/20”となってしまいました。”00/12/20 00:00”と表示させたい
> のですが、お力をお貸しください。
時刻が00:00:00なDate型を「暗黙の型変換」によって文字列変換した場合、
時刻部は出力されません。
また、変換される内容も、コントロールパネルに依存したものになってしまいます。

Date型にした後、あらためてFormat関数を使って整形するようにしましょう。
このページと関連する記事:
#296-1日付と時刻の処理2002-05-21(火) 01:20
#18812-0グリニッジ標準時を Format 関数で表示形式を整える2000-03-29(水) 21:30
#14905-0Time関数について2001-03-07(水) 15:24
#317-2「now」から日付のみ取り出す2003-05-14(水) 21:05
#1966-0時間の計算のしかた1999-09-19(日) 21:45
#27704-0Format関数の使い方2000-08-10(木) 11:40
#21408-0時刻の加算・減算2002-07-03(水) 16:38
#19987-0任意時刻をValiant(Date)型変数に変換する方法2001-04-02(月) 18:23
#30491-0Format関数2000-09-22(金) 15:48
#6813-0時間の計算。2000-03-21(火) 17:31
お探しの情報は見つかりましたか?お困りの問題は解決しましたか?
サイト内検索, 似た記事検索で見つからなくてもあきらめずに掲示板で質問してみましょう。
VB初心者友の会があなたのお役に立てれば幸いです。また、本ページの投稿者の方々にこの場を借りて感謝致します。
本ページは過去ログを集めて自動構成しています。よろしければこのページに関するフィードバックをお願いします。
(※ 構成の誤り、広告等の不適切な記事、リンク切れ、読めないページの報告など)