[olm]

Hallo entweder bin ich zu dumm oder ich weiß auch nicht.


Ich will ganz einfach die Windows Systemzeit ändern.

Wie mache ich das? mit Date bekomme ich ja die aktuelle Systemzeit angezeigt.


Danke für die Antworten

[olm]

Also das Datum setzen habe ich mittlerweile hinbekommen:

DateAndTime.Today = CDate(DateTimePicker1.Text)



Jetzt habe ich aber noch was anderes.

Ich will über einen Knopf den nächsten Tag anwählen.

sprich Datum+1 wie kann ich das machen?


Danke für die Antworten

[tobiasndw]

Public Function NaechsterTag(ByVal Year As Integer, _
   ByVal Month As Integer, ByVal Tag As Integer) As Variant
		
		NaechsterTag = DateSerial(Year, Month, Tag + 1)
		
End Function
	
Private Sub Form_Load()

	MsgBox (NaechsterTag(2007, 4, 2))
	
End Sub

Die Funktion merkt auch automatisch wenn ein neuer Monat beginnt. Also falls du sagst 31.12.2007 +1tag, dann kommt der 1.1.2008 raus.

Dieser Beitrag wurde von tobiasndw bearbeitet: 02. April 2007 - 18:10

[ThunderKiller]

Zitat (olm: 30.03.2007, 13:35)

Also das Datum setzen habe ich mittlerweile hinbekommen:

DateAndTime.Today = CDate(DateTimePicker1.Text)
Jetzt habe ich aber noch was anderes.

Ich will über einen Knopf den nächsten Tag anwählen.

sprich Datum+1 wie kann ich das machen?
Danke für die Antworten

wo bekomm ich denn das dateandtime her?

[tobiasndw]

"DateAndTime" gibts in Visual Basic.Net.

"olm" hat aber auch nicht dazu geschrieben welche VB Version er meint.

[ThunderKiller]

aso habs grad mit vb6 ausprobiert