Dim dtTime As Date
Dim dtDate As DatedtTime=CDate("XX:XX:XX")
dtDate=CDate("YYYY-MM-DD")Time=dtTime
Date=dtDate其中 XX 表示时:分:秒
YYYY-MM-DD 是日期
Dim dtDate As DatedtTime=CDate("XX:XX:XX")
dtDate=CDate("YYYY-MM-DD")Time=dtTime
Date=dtDate其中 XX 表示时:分:秒
YYYY-MM-DD 是日期
Time=CDate("XX:XX:XX")
Date=CDate("YYYY-MM-DD")