コード中のXとIが変数宣言されていないようなので、Variant型になっているのでは?このXをどうやって表示すると時刻が表示されるのでしょうか?とりあえずフォーマットでどうなりますか?Dim X As StringX = Format(Rs.Fields("年月日"),"yyyy/mm/dd hh:nn:ss")MsgBox X