[vb6] l'oggetto date()

[raffaeu]

Ciao ho un form con questi campi:

txtDate, txtHour, txtDay

volevo uno script in grado di visualizzarmi a video nei campi sopraindicati, ora data e giorno presenti sulla macchina dove gira il progr.


esiste VBdate() in VB6 (scusate ma non lo conosco bene)

[Blackage]

Sul MSDN è spiegato abbastanza bene come fare, cmq ecco la parte che ti interessa dovrebbe essere (Now fornisce ora e data correnti):

Stampa di formati di data e ora

Per stampare i formati di data e ora, è necessario utilizzare la funzione Format con i simboli che rappresentano date e ore. Negli esempi riportati di seguito vengono utilizzate le funzioni Now e Format per identificare e formattare la data e l'ora correnti. Negli esempi si presume che le impostazioni internazionali nel Pannello di controllo di Windows siano "Italiano (standard)".

Sintassi di Format Risultato
Format(Now, "m/d/yy") 27/1/93
Format(Now, "dddd, mmmm dd, yyyy") mercoledì, 27 gennaio 1993
Format(Now, "d-mmm") 27-gen
Format(Now, "mmmm-yy") gennaio-93
Format(Now, "hh:mm AM/PM") 07.18 AM
Format(Now, "h:mm:ss a/p") 7.18.00 a
Format(Now, "d-mmmm h:mm") 3-gennaio 7.18

spero che basti... neanch'io ne so molto!

[raffaeu]

quindi scrivero'

Private Sub txtdate_Change()
txtdate.Text = Format(Now, "dddd, mmmm dd, yyyy")
End Sub


e...funzia, grazie mille, ah io msdn non ce l'ho...

[Johnny_Depp]

txtDate, txtHour, txtDay

volevo uno script in grado di visualizzarmi a video nei campi sopraindicati, ora data e giorno presenti sulla macchina dove gira il progr

txtTime=Time '<--ora di sistema competa
txtHour=hour(time) '<--ora
txtMinute=Minute(time) '<--minuti
txtSecond=Second(time) '<--secondi

txtDate=Date '<--data di sistema completa
txtDay=Day(Date) '<--giorno
txtMonth=Month(Date) '<--mese
txtYear=Year(Date) '<--anno

[raffaeu]

Hey grazie io conosco asp e in vbscript la data è proprio diversa sia come oggetto che come proprieta'...

umm qua ogni giorno bisogna studiarsi qualcosa!!

grazie ancora e buon lavoro