VB6:如何从日期类型中删除时间部分

Question

我有一个 Date还包含时间的变量:

Dim dt As Date
dt = "8/3/2016 7:10:40 AM"

--> 以某种方式删除时间，结果应该是:

dt = "8/3/2016"

怎么去掉时间？

Answer 1

对于另一个日期类型变量:

dt = DateValue(dt)

或者

dt = CDate(Int(dt))

或者对于字符串:

strdt = format$(dt, "m/d/yyyy")