DatumZeitString

13/09/2008 - 18:08 von Gunthard Pupke | Report spam
hallo,
ich glaube ich sehe den Wald vor lauter Bàumen nicht.

ich möchte von einem String (yyyymmddhhmmss), der das Datum und die
Uhrzeit enthàlt

"20090924000214"

40 Sekunden subtrahieren.
Danke für jeden Tip.
Gunthard
 

Lesen sie die antworten

#1 Peter Götz
13/09/2008 - 19:37 | Warnen spam
Hallo Gunthard,

ich glaube ich sehe den Wald vor lauter Bàumen nicht.



Dann brauchst Du eine Motorsàge. ;-)

ich möchte von einem String (yyyymmddhhmmss),
der das Datum und die Uhrzeit enthàlt

"20090924000214"

40 Sekunden subtrahieren.



Mit ParseExact() oder TryParseExact() kannst Du
aus dem String einen Wert vom Typ Date machen
und von diesem dann Deine 40 Sekunden abziehen.

Das würde dann etwa so aussehen:


Dim strBuffer As String = "20090924000214"

Dim C As Globalization.CultureInfo = _
Globalization.CultureInfo.InvariantCulture
Dim D0 As Date
Dim D1 As Date
Dim Fmt0 As String = "yyyyMMddHHmmss"
Dim Fmt1 As String = "dd.MM.yyyy HH:mm:ss"

If Date.TryParseExact _
(strBuffer, Fmt0, C, _
Globalization.DateTimeStyles.None, D0 _
) Then

' D0 enthàlt jetzt das Datum als Wert vom Typ Date.

D1 = D.AddSeconds(-40)

MsgBox(D.ToString(Fmt1) & _
ControlChars.CrLf & _
D1.ToString(Fmt0), _
MsgBoxStyle.Information)
Else
MsgBox("ungültiges Format!", _
MsgBoxStyle.Exclamation)
End If

Gruß aus St.Georgen
Peter Götz
www.gssg.de (mit VB-Tipps u. Beispielprogrammen)

Ähnliche fragen