[VB] systeem datum/tijd formaat achterhalen

[The_Butler]

Ik zou graag willen weten hoe een VB programma er achter kan komen welke datum en tijd insellingen worden gebruikt op het systeem.

01-02-02 kan namelijk heel veel betekenissen hebben als je niet weet waar de getallen voor staan.

Ik heb in de help gezocht naar een functie om het huidige datum formaat in te lezen (in letter code zoals beschreven in de vba help), maar niks gevonden.

Mischien kan een van jullie me op weg helpen?

[Sponge]

Check:

? format$(now, "dd/mm/yyyy")
01-05-2002

Dan geef je zelf het formaat op. Als je het echt wilt weten vanaf de instellingen moet je naar de "local settings" kijken.. ik heb ooit code daarvoor gezien, ff kijken.

Got it:
http://www.mvps.org/vbnet/index.html?code/locale/index.html

Hoop dat je daar wat aan hebt

[muba]

Normaal is VB mm-dd-yyyy, Amerikaanse notitie dus. Heb nog nooit anders meegemaakt.
Wil je zeker ook weten hoe je het om kan bouwen?

code:

dim nldate, jaar, maand, dag as string
maand = left$(date$, 2)
dag = mid$(date$, 3, 2)
jaar = right$(date$, 4)
nldate = dag + "-" + maand + "-" + jaar

Dit pas ik al toe sinds 1996/1997, toen ik mijn eerste eigen computer had en begon met programmeren in BASIC. Sindsdien heb ik in BASIC deze code eigenlijk nooit veranderd... ja ohja in PowerBASIC had ik nooit die dim en deed ik alles gewoon met maand$, dag$, jaar$, nldate$ en zonder te declareren dus... maar dit heb ik later afgeleerd.

[Sponge]

dim nldate, jaar, maand, dag as string

Je declareert de eerste drie variabelen als varianten = erg traag. Check m'n sig

[muba]

Neej toch? Als je het op deze manier doet wordt toch alles een string?

Nouja, dan maar zo:

code:

dim nldate as string, dag as string, maand as string, jaar as string

Maar volgens mij wordt op mijn methode alles string hoor.

[The_Butler]

Maar als ik het goed begrijp kan ik niet "zien" welk formaat datum het systeem gebruikt. Als ik bijvoorbeeld een veld in een form heb voor de datum dan kan dat opeens te klein zijn als iemand de datum settings veranderd naar een lange maand notatie.

het liefste zou ik dus bij het begin van mijn programma willen zien welk formaat datum het systeem gebruikt, "mm-dd-yyyy" of "dd-m-yy" etc...

Ik kan in theorie wel een stuk code schrijven waarin ik NOW$ ga analyseren en kijken hoe de datum eruit ziet maar ik kan me niet voorstellen dat er hier geen handig commando voor is...

[Sponge]

Butler: Check m'n link in m'n eerste reply.. daar kun je het toch mee zien? OP VBNet staan nog veel meer voorbeelden (zoek gewoon op "local" en je vindt echt alles wat je wilt )

--

Dim nldate, dag, maand, jaar As String
Debug.Print VarType(nldate)
Debug.Print VarType(dag)
Debug.Print VarType(maand)
Debug.Print VarType(jaar)

=

0
0
0
8

0 = Empty
8 = String

[The_Butler]

je hebt gelijk, ik had ff niet verder gekeken dan mijn neus lang was, bedankt voor de geboden hulp en ik lees die pagina ff door.

tnx!

[Verwijderd]

Tof, ik heb er ook wat opgestoken !