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")