In Visual Basic.Net die Datumsvariable Typ speichert sowohl das Datum und die Zeit mit einer Genauigkeit von weniger als einer Millisekunde . Manchmal ist dies schwer zu merken , da der Datentyp wird einfach ein Datum genannt . Der andere Fallstrick zu erinnern ist , dass die. Net Framework nicht immer konsequent, wenn Speichern von Datums -und manchmal auch die Zeit des Tages , wenn es logisch erscheint , dass nur das Datum gespeichert werden soll . Glücklicherweise kann man einfach vergleichen einen Termin mit VB.NET , indem Sie ein paar einfache Schritte . Things You
Microsoft Visual Basic Express 2010
Visual Studio 2010, 2008 oder 2005
brauchen anzeigen Weitere Anweisungen
1
Öffnen Sie Visual Studio oder VB Express . Erstellen Sie eine neue Visual Basic Windows-Formular -Projekt. Klicken Sie auf " Datei " gefolgt von " Neu." Die " New Project" -Fenster erscheint. Wählen Sie " Visual Basic , Windows " in der Baumansicht , und wählen Sie dann " Windows Form -Projekt. " Nennen Sie das Projekt " DateTest " und klicken Sie auf OK. Nach einer kurzen Wartezeit wird der Formular-Designer -Fenster angezeigt.
2
Klicken Sie auf die " Toolbox "-Symbol in der Symbolleiste , und dann warten, bis die Toolbox zu öffnen . Ziehen Sie ein " DateTimePicker " auf das Formular. Am Tag der rechten Maustaste , und wählen Sie "Eigenschaften". Nennen Sie es " dtDate ", " . 100 " ändern Sie die "Format" -Eigenschaft auf " Short" und "Breite" -Eigenschaft auf Klicken Sie auf die "Escape" -Taste, um das Fenster "Eigenschaften" zu schließen.
3
Ziehen Sie eine Schaltfläche aus der Toolbox auf das Formular. Nennen Sie es " btnView ", und ändern Sie die Eigenschaft "Text" auf "Ansicht ". Doppelklicken Sie auf die Taste, um einen Ereignishandler zu erstellen , und fügen Sie dann den folgenden Code an die Prozedur : Private Sub
btnView_Click (ByVal sender As System.Object , ByVal e As System.EventArgs ) Handles btnView.Click
MsgBox ( dtDate.Value.ToString )
End Sub
4
Klicken Sie auf die Taste "F5" , um das Programm auszuführen. Wenn das Formular angezeigt wird, klicken Sie auf die Schaltfläche "Anzeigen" ohne Änderung des Datums . Beachten Sie, wie sowohl das Datum und die Zeit, obwohl nur das Datum angezeigt erschien in der " DateTimePicker . "
5
Schließen Sie das Programm , indem Sie auf das "X" in der oberen rechten Ecke , und dann wieder auf Design-Ansicht . Ziehen Sie ein weiteres Button aus der Toolbox auf das Formular . Rufen Sie den Button " btnToday ", und ändern Sie den Text -Eigenschaft auf " Heute ". Doppelklicken Sie auf den "Heute " -Taste, um einen anderen Event-Handler zu erstellen , und fügen Sie dann den folgenden Code: Private Sub
btnToday_Click (ByVal sender As System.Object , ByVal e As System.EventArgs ) Handles btnToday.Click
Dim msg As String = " Das eingegebene Datum ( "
Msg & = Date.Today.ToShortDateString
msg & = " ) ist "
dtDate.Value < Date.Today Dann
Msg & = "kleiner als"
ElseIf dtDate.Value = Date.Today Dann
msg & = " Spiele "
ElseIf dtDate.Value > Date.Today Dann
msg & = "größer als"
End If
msg & = " Heute ( "
msg = & Date.Today.ToShortDateString
msg & = " ) "
MsgBox ( msg )
End Sub
6
Klicken Sie auf " F5 ", um das Programm zu starten , und klicken Sie dann auf den "Heute " -Taste, wenn das Formular angezeigt wird . Beachten Sie, wie die Nachricht, die erscheint , sagt , dass das Datum (heute ) eingetragen ist größer als heute. Auch dies ist durch die Zeit , die von der " DateTimePicker " Kontrolle zugesetzt, verursacht . Befestigen Sie das Programm , indem Sie die Vergleiche wie folgt zu lesen :
Wenn dtDate.Value.Date < Date.Today Dann
7
Klicken Sie auf " F5" ein weiteres Mal , um die beginnen Programm , und klicken Sie dann auf den "Heute "-Taste , um zu sehen , dass die Daten übereinstimmen.