VB6 Datumsformat

Question

hallo,

ich möchte in meinem Tool gerne das Datum in der amerikanischen Formatierung anzeigen lassen
z.B. 2006-12-24

und nicht in der europäischen
z.B. 24.12.2006


ich habe bis jetzt zum Test eingegeben:


Private Sub Label1_Click()

Label1.Caption = Date

End Sub


wenn man auf das label klickt erscheint das Datum.

Wie kann ich da das Ami Datumsformat bekommen?

Answer 1

Hallo credo,

VB6 bietet komfortable Möglichkeiten zur Formatierung.

strDatum = Format(Now, "yyyy-mm-dd")
strDatum = Format(Now, "yyyymmdd")
strDatumZeit = Format(Now, "yyyy-mm-dd hh:nn:ss")

Now ist eine VB6 Standardfunktion. Du kann aber jeden Variantwert nutzen.

dim varDatum as variant, strDatum as string
varDatum = cvdate("24.12.2000")
strDatum = Format(varDatum, "yyyy-mm-dd")

Gruß
xmatrix