Fun-Soft - Programmierforum

Autor

Thread - Seiten: > 1 <

000
08.12.2003, 14:33 Uhr
~Cptboeing
Gast

Hallo Leute,

ich beschäftige mich gerade mit dem aktuellen Datum. Zu meinem Problem. Ich exportiere Daten in eine txt Datei. Dabei soll die txt Datei das aktuelle Datum in amerikanischer Form haben. Hier mal ein Beispiel:
"dasistnureintest20031208000000.txt".
Dazu hab ich auch ein Code geschrieben:

Visual Basic:

Public Sub aktuellesAmerikanischesDatumWirdErzeugt()

    'Variablen
    Dim jahr As Integer
    Dim monat As String
    Dim tag As String
    Dim gesamtDatum


    jahr = Year(Now)
    monat = Month(Date)
    tag = Day(Date)


    If (Mid(monat, 1) < 2) Then
    monat = "0" & Month(Date)
    Else
    monat = monat
    End If

    If (Mid(tag, 1) < 2) Then
    tag = "0" & Day(Date)
    MsgBox (tag)
    End If
    Else
    tag = tag
    End If

    gesamtDatum = jahr & monat & tag
    MsgBox (gesamtDatum)


End Sub

Als Ergebnis bekomme ich dann: 2003128. Aber brauche den Tag zweistellig. Also 08.
Wie mach ich das? Kann mir bitte jemand helfen?

Danke und Gruss
Olli :-)

[edit Pablo]
von [ Code ] --> [ vb ]
[/cpp]

Dieser Post wurde am 08.12.2003 um 15:16 Uhr von Pablo Yanez Trujillo editiert.

Profil || Private Message || Suche

Download || Zitatantwort || Editieren || Löschen || IP

001
08.12.2003, 15:18 Uhr
Pablo
Supertux
(Operator)

Jetzt habe ich das nicht im Kopf, muss heute abend nachshauen. Abe du musst dein String formatieren, es gibt eine Funktion dafür, jetzt fällt mich aber nicht ein, welche. Such unetr die MSDN nach string format oder so. Ich werde versuchen, sie herauszufinden.
--
A! Elbereth Gilthoniel!
silivren penna míriel
o menel aglar elenath,
Gilthoniel, A! Elbereth!

Profil || Private Message || Suche

Download || Zitatantwort || Editieren || Löschen || IP

Seiten: > 1 < [ Visual Basic 6.0 / VBA ]

ThWBoard 2.73 FloSoft-Edition
© by Paul Baecher & Felix Gonschorek (www.thwboard.de)

Anpassungen des Forums
© by Flo-Soft (www.flo-soft.de)

Sie sind Besucher: