DateTimePickerの選択範囲日の設定

DateTimePickerで選択範囲の日を設定するには
DateTimePicker.MinDate
DateTimePicker.MaxDate
に日付を設定する。

次の点に注意すること
MinDate = 2015/02/01
MaxDate = 2015/02/04
として、2015/03/01～2015/03/03を設定しなおす場合
MinDateに2015/03/01を設定した時点でMaxDateより値が大きいとエラーになる。
なので、次のようなことをする

Private Sub SetRangeDate(ByRef dtp As DateTimePicker, ByVal minDate As Date, ByVal maxDate As Date)
    If DateTime.Compare(dtp.MinDate, maxDate) > 0 Then
        dtp.MinDate = minDate
        dtp.MaxDate = maxDate
    Else
        dtp.MaxDate = maxDate
        dtp.MinDate = minDate
    End If
End Sub