VB中有关时间的问题

来源：百度知道 编辑：UC知道 时间：2024/06/08 14:37:01
我想给一个变量t赋值为一个精确到秒的时间变量，如2008-09-16 01:20:34这个时间，我应该用什么函数？我直接用t="2008-09-16 01:20:34"结果是不行的，前面用date函数也不行，date函数只能精确到天。求高手解答，先谢了!
我不是要当前系统时间，我要的是一个特定的其他时间，精确到秒。
我不是要当前系统时间啊！

1、DATE型变量及其相关函数。
在内部，一个Date占8个字节的内存，你可以方便地用它来存储日期和时间。给Date变量赋值是很容易的。但请保证输入顺序与系统默认的时间表示顺序相同。例如：
Dim d As Date
d = ＃5/23/99 11:45:34 AM＃
DateSerial函数可以把年、月、日的数字组合成一个Date值。TimeSerial函数可把小时、分、秒的数字组合成一个Date值。且两函数可以叠加。
d = DateSerial(1999, 5, 23) ＋ TimeSerial(11, 45, 34)
而DateValue 和TimeValue 函数则可将代表日期和时间的字符串转化为Date型，并且也可以叠加。
d = DateValue(“1999/ 5/ 23”) ＋ TimeValue(“11: 45: 34”)
Format函数可按预定的格式显示或打印一个Date变量。如：
Print Format(d, “general date”) `99－5－23 11:45:34
Print Format(d, “long date”) `1999年5月23日
Print Format(d, “medium date”） `99－05－23
Print Format(d, “short date”) `99－5－23
Print Format(d, “long time”) `11:45:34
Print Format(d, “medium time”) `11:45 AM
Print Format(d,“short time”) `11:45
Format函数也允许你自己规定显示格式。如：
Print Format(d, “mmmm”) `may 产生日期中月份的英文
以以上日期为例，如想显示其中的一部分信息可使用以下函数：
Print Month(d) `5
Print Day(