VB6 - “时间格式”日期选择器传递无效日期（低于 1900 年 1 月 1 日）答案

【问题标题】：VB6 - "Time-Formatted" Datepicker passes invalid date (below 1/1/1900)VB6 - “时间格式”日期选择器传递无效日期（低于 1900 年 1 月 1 日）
【发布时间】：2014-03-17 11:31:22
【问题描述】：

我有一个具有以下属性的 VB6 日期选择器：

格式类型 - 时间
最小日期 - 1900 年 1 月 1 日
值 - 12:00:00 AM

我这样初始化它：

dtpTimeVal = TimeValue("00:00:00")

但是，当我获得时间选择器的日期值时，它返回值 12/30/1899。

我在这里缺少任何属性或初始化逻辑吗？

【问题讨论】：

你期待什么？尝试Debug.Print Year(TimeValue("00:00:00")), Month(TimeValue("00:00:00")), Day(TimeValue("00:00:00")) 进行解释。更多历史信息：blogs.msdn.com/b/oldnewthing/archive/2010/03/12/9977245.aspx
@wqw 谢谢，这是有道理的。如果你想回答这个问题，我可以将此问题标记为已关闭

标签： datetime time vb6 datepicker datetimepicker

【解决方案1】：

你设置格式的地方可能有一些错误

以下作品：

Private Sub Form_Load()
  DTPicker1.Format = dtpTime
  DTPicker1.Value = "00:00:00"
End Sub

如果我删除格式行，我会得到和你一样的结果

【讨论】：

我在 UI 设计器中设置格式，它是窗口的属性之一。您是否尝试过获取日期选择器的年份？