vb现在时间加秒数计算下个时间现在时间(格式如:8点18分39秒),加上一个秒数变量s,怎样计算出结果?
来源:学生作业帮助网 编辑:六六作业网 时间:2024/11/25 21:27:14
vb现在时间加秒数计算下个时间现在时间(格式如:8点18分39秒),加上一个秒数变量s,怎样计算出结果?vb现在时间加秒数计算下个时间现在时间(格式如:8点18分39秒),加上一个秒数变量s,怎样计算
vb现在时间加秒数计算下个时间现在时间(格式如:8点18分39秒),加上一个秒数变量s,怎样计算出结果?
vb现在时间加秒数计算下个时间
现在时间(格式如:8点18分39秒),加上一个秒数变量s,怎样计算出结果?
vb现在时间加秒数计算下个时间现在时间(格式如:8点18分39秒),加上一个秒数变量s,怎样计算出结果?
Private Sub Command1_Click()
Dim d As Date
d = "8:18:39"
Dim s As Integer
s = 33
d = DateAdd("s", s, d)
MsgBox Format(d, "h点n分s秒") '把日期格式化为 *点 *分 *秒
End Sub
DateAdd函数对日期变量进行加减.
第一个参数是加减的单位,(s表示秒;h:时; n:分; y:年; m:月; d:日)
第二个参数加上一个整形数,如是负值就是减.
第三个日期参数