日期变量变成数值时的注意项 val函数 cdbl函数在此用法上的不同点

日期变量变成数值时的注意项 val函数 cdbl函数在此用法上的不同点
Sub test()
Dim v
Dim dA As Date
dA = “2019-1-2 12:13:14”
v = Val(dA) '结果是2019
v = CDbl(dA) '结果是 43938.4201388889
'以下用da来代表一个标准型的日期变量
'然后如果只需要取da的日期部分, 则使用int即可, 如果需要取da的时间部分, 则da-int(da)就OK
End Sub