vb6 - 如何重置日期时间选择器

Question

使用 datetimepicker 默认最小日期和最大日期是

dtpicker1.mindate = cdate("01/01/2012")
dtpicker1.maxdate = cdate("31/01/2012")

我想在运行时更改 datetimepicker 中的最小日期和最大日期。

按钮 1

我再次通过了 mindate 和 maxdate 就像

dtpicker1.mindate = cdate("01/02/2012")
dtpicker1.maxdate = cdate("28/02/2012")

但它显示错误为“ A value was specified for the MinDate Property that is higher than current value of MaxDate.”

如何解决这个问题呢

Answer 1

有两种方法可以做到这一点:
1) 如果您默认 MinDate和 MaxDate总是 '01/01/2012'和 '31/01/2012'那么你需要定义MaxDate在定义之前 MinDate像这样:

dtpicker1.maxdate = cdate("28/02/2012")
dtpicker1.mindate = cdate("01/02/2012")

2) 如果您默认 MinDate和 MaxDate每次都改变然后第一次设置 MinDate低于您想要的 MaxDate和 MaxDate高于您想要的 MinDate然后你可以设置 MinDate和 MaxDate你想要这样的:

dtpicker1.mindate = cdate("01/01/1988")
dtpicker1.maxdate = cdate("31/12/2030")
dtpicker1.mindate = cdate("01/02/2012")
dtpicker1.maxdate = cdate("28/02/2012")