DTPicker und das CheckBox-Problem Hier erfahren Sie, wie sich die CheckBox im DTPicker-Control per Code aktivieren/deaktivieren lässt.
Autor:   Dieter Otter	Bewertung:     [ Jetzt bewerten ]	Views:  8.912
www.tools4vb.de	System:  Win9x, WinNT, Win2000, WinXP, Vista	Beispielprojekt auf CD

Geben Sie hier Ihre persönliche Bewertung ab! Anzahl Bewertungen bisher: 35 Bewertung insgesamt: nützlich Durchschnittliche Bewertung: 3.2 von 5 Sternen

sehr gut     gut     nützlich     mittelmäßig     mangelhaft

Wenn Sie das DateTimerPicker-Control (DTPicker) aus der Kollektion der Microsoft Windows Common Controls 2 verwenden, ist Ihnen sicherlich auch schon aufgefallen, dass sich über die Eigenschaft CheckBox links im Eingabefeld eine CheckBox anzeigen lässt.

Diese ist nur leider immer aktiviert. Es gibt scheinbar keine ersichtliche Eigenschaft, wie sich die CheckBox per VB-Code deaktivieren lässt.

Aber nur scheinbar, denn es geht dennoch. Hierzu muss man einfach nur der Value-Eigenschaft den Wert Empty zuweisen - und schon verschwindet das kleine Häkchen der CheckBox:

Private Sub Form_Load()
  ' CheckBox des DTPicker-Controls deaktivieren
  DTPicker1.Value = Empty
End Sub

Was aber, wenn nicht das aktuelle Datum, sondern irgendein Datum angezeigt werden soll?
Klar: Das erledigt man bekanntlich über die Value-Eigenschaft - also so:

' Datumvorgabe
DTPicker1.Value = CDate("1/1/2003")

Hmmm... jetzt wird zwar das neue Datum angezeigt - aber die CheckBox wird autom. wieder aktiviert

Lösung:
Nach dem Eintragen des Vorgabewertes einfach die Value-Eigenschaft wieder auf Empty setzen!

' Datumvorgabe
DTPicker1.Value = CDate("1/1/2003")
 
' CheckBox deaktivieren
DTPicker1.Value = Empty