Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Data Estesa nel formato gg/mm/aaaa

Come posso fare a verificare da procedura che la data estesa di sistema sia
settata su gg/mm/aaaa
--
Grazie
Gabriele F.
gfio...@NOSPAMbresciaonline.it.it
Eliminare NOSPAM per scrivermi

 ha scritto nel messaggio
news:dXQF6.181110$lj4.5...@news6.giganews.com...


 wrote in message
news:dXQF6.181110$lj4.5...@news6.giganews.com...


 ha scritto nel messaggio
news:g_QF6.1176$Hp1....@news2.tin.it...


 Come posso fare a verificare da procedura che la data estesa di sistema
sia settata su gg/mm/aaaa
API a parte... potresti anche fare cosi` ;-) :
Option Explicit
Private Function SystemFormatIsDDMMYYYY( _
) As Boolean
  Const c_dtmDate As Date = #1/1/2001#
  SystemFormatIsDDMMYYYY _
    = Format$(c_dtmDate, "Short Date") _
    = Format$(c_dtmDate, "dd/mm/yyyy")
End Function
Private Sub Main( _
)
  Debug.Print SystemFormatIsDDMMYYYY
End Sub
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

> Maurizio Borrelli:

  Oops!... Scusa. Correggi in:
    Const c_dtmDate As Date = #1/13/2001#


settata su gg/mm/aaaa
Devi usare l'ape
    GetLocaleInfo()
Ciao

Ciao
--------------------------------
Inviato via 
http://usenet.iol.it
 

Da: 
http://members.xoom.it/CesareRizzi
Funzione GetLocaleInfo
Declare
Function GetLocaleInfo Lib "kernel32" Alias _ "GetLocaleInfoA" (ByVal
Locale As Long, ByVal LCType As Long, _ ByVal lpLCData As String, ByVal
cchData As Long) As Long
La funzione GetLocaleInfo, consente di ottenere
i valori di determinate impostazioni.
Queste impostazioni sono
normalmente accessibili dal pannello di controllo in "Impostazioni
internazionali".
La funzione consente quindi di reperire importanti
valori quali il formato della data, dell'ora, della lingua e del paese
selezionato.
Parametri :
 
Le seguenti costanti, sono da passare
al parametro LCType per ottenere il valore desiderato :
Const
LOCALE_ITIME = &H23 ' indicatore formato di ora
Const LOCALE_STIMEFORMAT =
&H1003 ' stringa formato ora
Const LOCALE_STIME = &H1E ' separatore di ora
Const LOCALE_STHOUSAND = &HF ' separatore delle migliaia
Const
LOCALE_SSHORTDATE = &H1F ' stringa formato data breve
Const
LOCALE_SPOSITIVESIGN = &H50 ' segno positivo
Const LOCALE_SNEGATIVESIGN =
&H51 ' segno negativo
Const LOCALE_SNATIVELANGNAME = &H4 ' nome nativo
della lingua
Const LOCALE_SNATIVEDIGITS = &H13 ' ascii nativo da 0 a 9
Const LOCALE_SNATIVECTRYNAME = &H8 ' nome nativo del paese
Const
LOCALE_SMONTHOUSANDSEP = &H17 ' separatore delle migliaia della valuta
Const LOCALE_SMONTHNAME9 = &H40 ' nome lungo per settembre
Const
LOCALE_SMONTHNAME8 = &H3F ' nome lungo per agosto
Const LOCALE_SMONTHNAME7
= &H3E ' nome lungo per luglio
Const LOCALE_SMONTHNAME6 = &H3D ' nome
lungo per giugno
Const LOCALE_SMONTHNAME5 = &H3C ' nome lungo per maggio
Const LOCALE_SMONTHNAME4 = &H3B ' nome lungo per aprile
Const
LOCALE_SMONTHNAME3 = &H3A ' nome lungo per marzo
Const LOCALE_SMONTHNAME2
= &H39 ' nome lungo per febbraio
Const LOCALE_SMONTHNAME12 = &H43 ' nome
lungo per dicembre
Const LOCALE_SMONTHNAME11 = &H42 ' nome lungo per
novembre
Const LOCALE_SMONTHNAME10 = &H41 ' nome lungo per ottobre
Const
LOCALE_SMONTHNAME1 = &H38 ' nome lungo per gennaio
Const
LOCALE_SMONGROUPING = &H18 ' raggruppamento valuta
Const
LOCALE_SMONDECIMALSEP = &H16 ' separatore decimale valuta
Const
LOCALE_SLONGDATE = &H20 ' stringa formato data lungo
Const LOCALE_SLIST =
&HC ' separatore elenchi
Const LOCALE_SLANGUAGE = &H2 ' nome localizzato
della lingua
Const LOCALE_SINTLSYMBOL = &H15 ' simbolo internazionale
valuta
Const LOCALE_SGROUPING = &H10 ' raggruppamento cifre
Const
LOCALE_SENGLANGUAGE = &H1001 ' nome in inglese della lingua
Const
LOCALE_SENGCOUNTRY = &H1002 ' nome inglese del paese
Const LOCALE_SDECIMAL
= &HE ' separatore decimale
Const LOCALE_SDAYNAME7 = &H30 ' nome lungo per
domenica
Const LOCALE_SDAYNAME6 = &H2F ' nome lungo per sabato
Const
LOCALE_SDAYNAME5 = &H2E ' nome lungo per venerdì
Const LOCALE_SDAYNAME4 =
&H2D ' nome lungo per giovedì
Const LOCALE_SDAYNAME3 = &H2C ' nome lungo
per mercoledì
Const LOCALE_SDAYNAME2 = &H2B ' nome lungo per martedì
Const LOCALE_SDAYNAME1 = &H2A ' nome lungo per lunedì
Const LOCALE_SDATE =
&H1D ' separatore di data
Const LOCALE_SCURRENCY = &H14 ' simbolo locale
valuta
Const LOCALE_SCOUNTRY = &H6 ' nome localizzato del paese
Const
LOCALE_SABBREVMONTHNAME9 = &H4C ' nome abbreviato per settembre
Const
LOCALE_SABBREVMONTHNAME8 = &H4B ' nome abbreviato per agosto
Const
LOCALE_SABBREVMONTHNAME7 = &H4A ' nome abbreviato per luglio
Const
LOCALE_SABBREVMONTHNAME6 = &H49 ' nome abbreviato per giugno
Const
LOCALE_SABBREVMONTHNAME5 = &H48 ' nome abbreviato per maggio
Const
LOCALE_SABBREVMONTHNAME4 = &H47 ' nome abbreviato per aprile
Const
LOCALE_SABBREVMONTHNAME3 = &H46 ' nome abbreviato per marzo
Const
LOCALE_SABBREVMONTHNAME2 = &H45 ' nome abbreviato per febbraio
Const
LOCALE_SABBREVMONTHNAME13 = &H100F
Const LOCALE_SABBREVMONTHNAME12 = &H4F
' nome abbreviato per dicembre
Const LOCALE_SABBREVMONTHNAME11 = &H4E '
nome abbreviato per novembre
Const LOCALE_SABBREVMONTHNAME10 = &H4D ' nome
abbreviato per ottobre
Const LOCALE_SABBREVMONTHNAME1 = &H44 ' nome
abbreviato per gennaio
Const LOCALE_SABBREVLANGNAME = &H3 ' nome della
lingua abbreviato
Const LOCALE_SABBREVDAYNAME7 = &H37 ' nome abbreviato
per domenica
Const LOCALE_SABBREVDAYNAME6 = &H36 ' nome abbreviato per
sabato
Const LOCALE_SABBREVDAYNAME5 = &H35 ' nome abbreviato per venerdì
Const LOCALE_SABBREVDAYNAME4 = &H34 ' nome abbreviato per giovedì
Const
LOCALE_SABBREVDAYNAME3 = &H33 ' nome abbreviato per mercoledì
Const
LOCALE_SABBREVDAYNAME2 = &H32 ' nome abbreviato per martedì
Const
LOCALE_SABBREVDAYNAME1 = &H31 ' nome abbreviato per lunedì
Const
LOCALE_SABBREVCTRYNAME = &H7 ' nome abbreviato del paese
Const
LOCALE_S2359 = &H29 ' identificatore PM
Const LOCALE_S1159 = &H28 '
identificatore AM
Const LOCALE_NOUSEROVERRIDE = &H80000000 ' non utilizza
impostazioni utente
Const LOCALE_ITLZERO = &H25 ' zero iniziali nei campi
di ora
Const LOCALE_IPOSSYMPRECEDES = &H54 ' simb valuta precede importo
positivo
Const LOCALE_IPOSSIGNPOSN = &H52 ' posizione segno positivo
Const LOCALE_IPOSSEPBYSPACE = &H55 ' simb valuta sep. da spazio da imp.
positivo
Const LOCALE_INEGSYMPRECEDES = &H56 ' simb valuta precede importo
negativo
Const LOCALE_INEGSIGNPOSN = &H53 ' posizione segno negativo
Const LOCALE_INEGSEPBYSPACE = &H57 ' simb valuta sep. da spazio da imp.
negativo
Const LOCALE_INEGCURR = &H1C ' modalità valuta negativa
Const
LOCALE_IMONLZERO = &H27 ' zero iniziali nei campi del mese
Const
LOCALE_IMEASURE = &HD ' 0 = metrico, 1 = US
Const LOCALE_ILZERO = &H12 '
zero iniziali per i decimali
Const LOCALE_ILDATE = &H22 ' ordinamento
formato data lungo
Const LOCALE_ILANGUAGE = &H1 ' ID lingua
Const
LOCALE_IINTLCURRDIGITS = &H1A ' # cifre valuta internazionale
Const
LOCALE_IDIGITS = &H11 ' numero di cifre decimali
Const
LOCALE_IDEFAULTLANGUAGE = &H9 ' ID di lingua predefinito
Const
LOCALE_IDEFAULTCOUNTRY = &HA ' codice di paese predefinito
Const
LOCALE_IDEFAULTCODEPAGE = &HB ' tabella codici predefinita
Const
LOCALE_IDAYLZERO = &H26 ' zero iniziali nei campi del giorno
Const
LOCALE_IDATE = &H21 ' ordinamento formato data breve
Const
LOCALE_ICURRENCY = &H1B ' modalità valuta positiva
Const
LOCALE_ICURRDIGITS = &H19 ' # cifre valuta locale
Const LOCALE_ICOUNTRY =
&H5 ' codice di paese
Const LOCALE_ICENTURY = &H24 ' indicatore formato
secolo


Grazie Timoty č proprio quello che cercavo.
...leggo e applico.
Ciao Gabriele F.