һ Date ͵ Variantָʱ֡ʱ䡣

TimeSerial(hour,minute, second)

hour 
ֵΪ 0 (12:00 A.M.)  23 (11:00 P.M.) ֵֵʽ 
minute 
ֵʽ 
second 
ֵʽ 
˵
Ҫָһʱ̣ 11:59:59TimeSerial ĲȡֵӦڿɽܵķΧڣҲ˵СʱӦ 0-23 ֮䣬ֺӦ 0-59 ֮䡣ǣʹֵʽΪÿָʱ䣬һʽĳʱ֮ǰ֮ʱֻ

ʾʹþʱıʽTimeSerial ǰ 612-6Сʱǰ 15 -15  5:45:00 A.M. 

Dim MyTime1
MyTime1 = TimeSerial(12 - 6, -15, 0) '  5:45:00 AM.
κһȡֵɽܵķΧʱȷؽλһϴʱ䵥λС磬ָ 75 ӣʱ䱻ͳһСʱʮӡǣκһֵ -32768  32767 ķΧͻᵼ´ʹֱָʱͨʽʱ䳬ɽܵڷΧҲᵼ´

Ҫ
汾 1
