文本框日期未按预期格式化

Question

我写了一个填充文本框值的vba代码 在vba代码中，我写了一些像这样的东西

dim  st_day as date
st_date  = format(date -7 , "m/dd/yyyy hh:mm")

我已使用textbox向me.textbox1发送此值 但是文本框显示的值为03/21/2014，但我期待的是文本框
应该显示是03/21/2014 00:00:00 AM。
你可以帮助我在哪里？

Answer 1

您是否已将st_Date声明为日期..如此，请将数据类型更改为variant ..

像这样...... 经过测试

Sub tetetse()
Dim st_Date As Variant

st_Date = Format(Date - 7, "m/dd/yyyy hh:mm:ss AM/PM")

End Sub