如何限制DTPickers可用日期?

时间:2017-07-15 04:43:43

标签: vb6

我的视觉基本形式有这两个DTpicker: Date Picker screenshot

用户从上面的DTPicker中选择一个日期后,我想让它下面的第二个DTPicker限制选择。

例如,如果我从上层DTPicker中选择一个日期,假设是12/07/2017,那么它下面的那个将限制在2017年7月13日及以上(限于第一个DTPicker之后的第二天,以及)。我怎样才能做到这一点?

1 个答案:

答案 0 :(得分:4)

根据DTPicker1中选择的日期设置下一个DTPicker的MinDate属性:

Private Sub DTPicker1_Change()
    DTPicker2.MinDate = DateAdd("d", 1, DTPicker1.Value)

    ' You can also automatically select the first day allowed
    DTPicker2.Value = DTPicker2.MinDate
End Sub