Convertire i secondi in formato ore:minuti:secondi - Cronologia

Vuott il 14:22, 1 nov 2024

2024-11-01T14:22:53Z

← Versione meno recente		Versione delle 08:22, 1 nov 2024
Riga 86:		Riga 86:

	==Uso di alcune funzioni esterne del API di ''libglib-2.0''==		==Uso di alcune funzioni esterne del API di ''libglib-2.0''==
	E' possibile, volendo, utilizzare alcune funzioni esterne del API di ''libglib-2.0''.		E' possibile, volendo, utilizzare alcune funzioni esterne del API di "''libglib-2.0:0.8000.5'' ".

	Mostriamo un semplice esempio, nel quale si convertirà il valore pari a 3250 secondi nel formato ''ore:minuti:secondi'':		Mostriamo un semplice esempio, nel quale si convertirà il valore pari a 3250 secondi nel formato ''ore:minuti:secondi'':
	Library "libglib-2.0:0.8000.2"		Library "libglib-2.0:0.8000.5"

	Public Struct GTimeVal		Public Struct GTimeVal

Vuott il 14:46, 1 lug 2024

2024-07-01T14:46:24Z

← Versione meno recente		Versione delle 08:46, 1 lug 2024
Riga 2:		Riga 2:


	==Uso della funzione ''Date( )''==		==Uso della funzione "Date()"==
	Come è noto, la funzione ''Date( )'' restituisce un valore temporale di tipo ''Date'' dai dati passati ad uno o più dei suoi parametri. In particolare, nel caso considerato da questa pagina, se i secondi sono superiori al valore "60", bisognerà passare il loro valore all'ultimo parametro della funzione ''Date( )'', quello dei millisecondi ~~ovviamnete~~ moltiplicando detto valore per mille.		Come è noto, la funzione "Date()" restituisce un valore temporale di tipo ''Date'' dai dati passati ad uno o più dei suoi parametri. In particolare, nel caso considerato da questa pagina, se i secondi sono superiori al valore "60", bisognerà passare il loro valore all'ultimo parametro della funzione "Date()", quello dei millisecondi ovviamente moltiplicando detto valore per mille.
	<BR>Il risultato va opportunamente convertito in stringa mediante la funzione ''CStr( )''.		<BR>Il risultato va opportunamente convertito in stringa mediante la funzione "CStr()".

	Esempio pratico:		Esempio pratico:
	~~'''~~Public~~'''~~ Sub Main()		Public Sub Main()

	Dim secondi As Integer		Dim secondi As Integer
Riga 14:		Riga 14:
	secondi = 12345		secondi = 12345

	s = CStr(~~Date~~(~~0, 0, 0,~~ 0, 0, 0, secondi * 1000))		s = CStr(Time(0, 0, 0, secondi * 1000))

	Print s		Print s

	~~'''~~End~~'''~~		End


	==Uso della funzione "Time()"==		==Uso della funzione "Time()"==
	Più brevemente si potrà usare la funzione "Time()": <SUP>[[[#Note\|~~Nota~~ 1]]]</sup>		Più brevemente si potrà usare la funzione "Time()": <SUP>[[[#Note\|nota 1]]]</sup>
	~~'''~~Public~~'''~~ Sub Main()		Public Sub Main()

	Dim secondi As Integer		Dim secondi As Integer
Riga 33:		Riga 34:
	Print s		Print s

	~~'''~~End~~'''~~		End

	~~==Uso della funzione ''Format( )''==~~
	~~Quest'altra modalità prevede l'uso della funzione ''Format( )''.~~
	<BR>Nel secondo parametro di tale funzione va specificato il formato desiderato della rappresentazione oraria, come ad esempio "''hh:nn:ss''". <SUP>[[[#Note\|Nota 2]]]</sup> <SUP>[[[#Note\|Nota 3]]]</sup>

			==Uso della funzione "Format()"==
			Quest'altra modalità prevede l'uso della funzione "Format()".
			<BR>Nel secondo parametro di tale funzione va specificato il formato desiderato della rappresentazione oraria, come ad esempio "''hh:nn:ss''". <SUP>[[[#Note\|nota 2]]]</sup> <SUP>[[[#Note\|nota 3]]]</sup>

	La sintassi è la seguente:		La sintassi è la seguente:
	Format(Time(''ore'', ''minuti'', ''secondi'')), "hh:nn:ss") As String		Format(Time(''ore'', ''minuti'', ''secondi'')), "hh:nn:ss") As String
	Nel seguente esempio verranno mostrati i secondi passati dall'apertura del programma alla pressione sul ''Button'':		Nel seguente esempio verranno mostrati i secondi passati dall'apertura del programma alla pressione sul ''Button'':
	~~'''~~Private~~'''~~ dt1 As Date		Private dt1 As Date


	~~'''~~Public~~'''~~ Sub Form_Open()		Public Sub Form_Open()

	dt1 = Time(Now)		dt1 = Time(Now)

	~~'''~~End~~'''~~		End


	~~'''~~Public~~'''~~ Sub Button1_Click()		Public Sub Button1_Click()

	Dim dt2 As Date		Dim dt2 As Date

	dt2 = Time(Now)		dt2 = Time(Now)
Riga 62:		Riga 63:
	Print Format(Time(0, 0, DateDiff(dt1, dt2, gb.Second)), "hh:nn:ss")		Print Format(Time(0, 0, DateDiff(dt1, dt2, gb.Second)), "hh:nn:ss")

	~~'''~~End~~'''~~		End


	==Uso dell'operatore ''Mod''==		==Uso dell'operatore ''Mod''==
	Con l'operatore ''[http://gambaswiki.org/wiki/lang/mod?l=it Mod]'' è possibile convertire i secondi in ''ore'', ''minuti'' e restanti ''secondi''.		Con l'operatore ''[http://gambaswiki.org/wiki/lang/mod?l=it Mod]'' è possibile convertire i secondi in ''ore'', ''minuti'' e restanti ''secondi''.


	Mostriamo un esempio:		Mostriamo un esempio:
	~~'''~~Public~~'''~~ Sub Main()		Public Sub Main()

	Dim ore, minuti, secondi As Integer		Dim ore, minuti, secondi As Integer

	secondi = 12345		secondi = 12345
Riga 82:		Riga 82:
	Print ore; ":"; minuti; ":"; secondi		Print ore; ":"; minuti; ":"; secondi

	~~'''~~End~~'''~~		End


Riga 89:		Riga 89:

	Mostriamo un semplice esempio, nel quale si convertirà il valore pari a 3250 secondi nel formato ''ore:minuti:secondi'':		Mostriamo un semplice esempio, nel quale si convertirà il valore pari a 3250 secondi nel formato ''ore:minuti:secondi'':
	Library "libglib-2.0"		Library "libglib-2.0:0.8000.2"

	Public Struct GTimeVal		Public Struct GTimeVal
Riga 105:		Riga 105:


	~~'''~~Public~~'''~~ Sub Main()		Public Sub Main()

	Dim GTv As New GTimeVal		Dim GTv As New GTimeVal
	Dim dt As Pointer		Dim dt As Pointer

	GTv.tv_sec = 3250		GTv.tv_sec = 3250
Riga 116:		Riga 116:
	Print g_date_time_format(dt, "%kh %Mmin %Ssec")		Print g_date_time_format(dt, "%kh %Mmin %Ssec")

	~~'''~~End~~'''~~		End



	=Note=		=Note=
	[1] Al riguardo vedere anche la seguente pagina della Wiki: ~~https://www.gambas~~-~~it.org/wiki/index.php?title=Ottenere_una_data_e-o_l%27orario_comprensivo_dei_millisecondi~~		[1] Al riguardo vedere anche la seguente pagina della Wiki: [[Ottenere una data e-o l'orario comprensivo dei millisecondi]]

	[2] Ovviamente si potrà ottenere anche il formato stringa: ''ore/minuti/secondi''.		[2] Ovviamente si potrà ottenere anche il formato stringa: ''ore/minuti/secondi''.

	[3] Al riguardo vedere anche la seguente pagina della Wiki: ~~http://www.gambas-it.org/wiki/index.php?title=Formattare_%22hh~~:nn:ss~~%22_dai_soli_secondi~~		[3] Al riguardo vedere anche la seguente pagina della Wiki: [[Formattare "hh:nn:ss" dai soli secondi]]

Vuott il 02:07, 17 dic 2020

2020-12-17T02:07:37Z

← Versione meno recente		Versione delle 20:07, 16 dic 2020
Riga 4:		Riga 4:
	==Uso della funzione ''Date( )''==		==Uso della funzione ''Date( )''==
	Come è noto, la funzione ''Date( )'' restituisce un valore temporale di tipo ''Date'' dai dati passati ad uno o più dei suoi parametri. In particolare, nel caso considerato da questa pagina, se i secondi sono superiori al valore "60", bisognerà passare il loro valore all'ultimo parametro della funzione ''Date( )'', quello dei millisecondi ovviamnete moltiplicando detto valore per mille.		Come è noto, la funzione ''Date( )'' restituisce un valore temporale di tipo ''Date'' dai dati passati ad uno o più dei suoi parametri. In particolare, nel caso considerato da questa pagina, se i secondi sono superiori al valore "60", bisognerà passare il loro valore all'ultimo parametro della funzione ''Date( )'', quello dei millisecondi ovviamnete moltiplicando detto valore per mille.
	<BR>Il risultato va opportunamente convertito in stringa mediante la funzione ''~~Str~~( )''.		<BR>Il risultato va opportunamente convertito in stringa mediante la funzione ''CStr( )''.

	Esempio pratico:		Esempio pratico:
Riga 12:		Riga 12:
	Dim s As String		Dim s As String

	secondi = 12345		secondi = 12345

	s = ~~Str~~(Date(0, 0, 0, 0, 0, 0, secondi * 1000))		s = CStr(Date(0, 0, 0, 0, 0, 0, secondi * 1000))

	Print s		Print s

	'''End'''		'''End'''
Riga 27:		Riga 27:
	Dim s As String		Dim s As String

	secondi = 12345		secondi = 12345

	s = ~~Str~~(Time(0, 0, 0, secondi * 1000))		s = CStr(Time(0, 0, 0, secondi * 1000))

	Print s		Print s

	'''End'''		'''End'''

Vuott il 02:00, 17 dic 2020

2020-12-17T02:00:59Z

← Versione meno recente		Versione delle 20:00, 16 dic 2020
Riga 20:		Riga 20:
	'''End'''		'''End'''

			==Uso della funzione "Time()"==
			Più brevemente si potrà usare la funzione "Time()": <SUP>[[[#Note\|Nota 1]]]</sup>
			'''Public''' Sub Main()

			Dim secondi As Integer
			Dim s As String

			secondi = 12345

			s = Str(Time(0, 0, 0, secondi * 1000))

			Print s

			'''End'''

	==Uso della funzione ''Format( )''==		==Uso della funzione ''Format( )''==
	Quest'altra modalità prevede l'uso della funzione ''Format( )''.		Quest'altra modalità prevede l'uso della funzione ''Format( )''.
	<BR>Nel secondo parametro di tale funzione va specificato il formato desiderato della rappresentazione oraria, come ad esempio "''hh:nn:ss''". <SUP>[[[#Note\|Nota 1]]]</sup> <SUP>[[[#Note\|Nota 2]]]</sup>		<BR>Nel secondo parametro di tale funzione va specificato il formato desiderato della rappresentazione oraria, come ad esempio "''hh:nn:ss''". <SUP>[[[#Note\|Nota 2]]]</sup> <SUP>[[[#Note\|Nota 3]]]</sup>


Riga 45:		Riga 59:
	dt2 = Time(Now)		dt2 = Time(Now)

	<FONT color=gray>' ''Viene calcolata la differenza fra i due tempi e viene espressa in secondi;''		<FONT color=gray>' ''Viene calcolata la differenza fra i due tempi e viene espressa in secondi; poi quel risultato viene convertito nel formato stringa impostato:''</font>
	~~' ''~~poi quel risultato viene convertito nel formato stringa impostato:''</font>
	Print Format(Time(0, 0, DateDiff(dt1, dt2, gb.Second)), "hh:nn:ss")		Print Format(Time(0, 0, DateDiff(dt1, dt2, gb.Second)), "hh:nn:ss")

Riga 107:		Riga 120:


			=Note=
			[1] Al riguardo vedere anche la seguente pagina della Wiki: https://www.gambas-it.org/wiki/index.php?title=Ottenere_una_data_e-o_l%27orario_comprensivo_dei_millisecondi

	~~=Note=~~		[2] Ovviamente si potrà ottenere anche il formato stringa: ''ore/minuti/secondi''.
	[1] Ovviamente si potrà ottenere anche il formato stringa: ''ore/minuti/secondi''.

	[2] Al riguardo vedere anche la seguente pagina della Wiki: http://www.gambas-it.org/wiki/index.php?title=Formattare_%22hh:nn:ss%22_dai_soli_secondi		[3] Al riguardo vedere anche la seguente pagina della Wiki: http://www.gambas-it.org/wiki/index.php?title=Formattare_%22hh:nn:ss%22_dai_soli_secondi

Vuott il 21:48, 3 lug 2018

2018-07-03T21:48:06Z

← Versione meno recente		Versione delle 15:48, 3 lug 2018
Riga 68:		Riga 68:

	Print ore; ":"; minuti; ":"; secondi		Print ore; ":"; minuti; ":"; secondi

			'''End'''


			==Uso di alcune funzioni esterne del API di ''libglib-2.0''==
			E' possibile, volendo, utilizzare alcune funzioni esterne del API di ''libglib-2.0''.

			Mostriamo un semplice esempio, nel quale si convertirà il valore pari a 3250 secondi nel formato ''ore:minuti:secondi'':
			Library "libglib-2.0"

			Public Struct GTimeVal
			tv_sec As Long
			tv_usec As Long
			End Struct

			<FONT Color=gray>' ''GDateTime * g_date_time_new_from_timeval_utc (const GTimeVal *tv)''
			' ''Creates a GDateTime corresponding to the given GTimeVal tv in UTC.''</font>
			Private Extern g_date_time_new_from_timeval_utc(tv As GTimeVal) As Pointer

			<FONT Color=gray>' ''gchar * g_date_time_format (GDateTime datetime, const gchar format)''
			' ''Creates a newly allocated string representing the requested format.''</font>
			Private Extern g_date_time_format(datetime As GTimeVal, gformat As String) As String


			'''Public''' Sub Main()

			Dim GTv As New GTimeVal
			Dim dt As Pointer

			GTv.tv_sec = 3250

			dt = g_date_time_new_from_timeval_utc(GTv)

			Print g_date_time_format(dt, "%kh %Mmin %Ssec")

	'''End'''		'''End'''

Vuott il 09:21, 20 gen 2017

2017-01-20T09:21:28Z

← Versione meno recente		Versione delle 03:21, 20 gen 2017
Riga 23:		Riga 23:
	==Uso della funzione ''Format( )''==		==Uso della funzione ''Format( )''==
	Quest'altra modalità prevede l'uso della funzione ''Format( )''.		Quest'altra modalità prevede l'uso della funzione ''Format( )''.
	<BR>Nel secondo parametro di tale funzione va specificato il formato desiderato della rappresentazione oraria, come ad esempio "''hh:nn:ss''". <SUP>[[[#Note\|Nota 1]]]</sup>		<BR>Nel secondo parametro di tale funzione va specificato il formato desiderato della rappresentazione oraria, come ad esempio "''hh:nn:ss''". <SUP>[[[#Note\|Nota 1]]]</sup> <SUP>[[[#Note\|Nota 2]]]</sup>


Riga 76:		Riga 76:
	=Note=		=Note=
	[1] Ovviamente si potrà ottenere anche il formato stringa: ''ore/minuti/secondi''.		[1] Ovviamente si potrà ottenere anche il formato stringa: ''ore/minuti/secondi''.

			[2] Al riguardo vedere anche la seguente pagina della Wiki: http://www.gambas-it.org/wiki/index.php?title=Formattare_%22hh:nn:ss%22_dai_soli_secondi

Vuott il 22:49, 19 gen 2017

2017-01-19T22:49:48Z

← Versione meno recente		Versione delle 16:49, 19 gen 2017
Riga 1:		Riga 1:
	Il caso è quello in cui, avendo un valore che rappresenta i ''secondi'', si vuole ottenere una conversione nel formato stringa ''ore:minuti:secondi''. ~~<SUP>[[[#Note\|Nota 1]]]</sup>~~		Il caso è quello in cui, avendo un valore che rappresenta i ''secondi'', si vuole ottenere una conversione nel formato stringa ''ore:minuti:secondi''.


Riga 23:		Riga 23:
	==Uso della funzione ''Format( )''==		==Uso della funzione ''Format( )''==
	Quest'altra modalità prevede l'uso della funzione ''Format( )''.		Quest'altra modalità prevede l'uso della funzione ''Format( )''.
	<BR>Nel secondo parametro di tale funzione va specificato il formato desiderato della rappresentazione oraria, come ad esempio "''hh:nn:ss''".		<BR>Nel secondo parametro di tale funzione va specificato il formato desiderato della rappresentazione oraria, come ad esempio "''hh:nn:ss''". <SUP>[[[#Note\|Nota 1]]]</sup>

Vuott il 22:49, 19 gen 2017

2017-01-19T22:49:17Z

@@ Riga 1: / Riga 1: @@
-Il caso è quello in cui, avendo un valore che rappresentano i secondi di un tempo, si vuole ottenere una conversione nel formato stringa ''ore:minuti:secondi".  |[[#Note|1]]|
+Il caso è quello in cui, avendo un valore che rappresenta i ''secondi'', si vuole ottenere una conversione nel formato stringa ''ore:minuti:secondi''.  <SUP>&#91;[[#Note|Nota 1]]&#93;</sup>
 La sintassi è la seguente:
   Format(Time(''ore'', ''minuti'', ''secondi'')), "hh:nn:ss") As String
 Nel seguente esempio verranno mostrati i secondi passati dall'apertura del programma alla pressione sul ''Button'':
   '''Private''' dt1 As Date
@@ Riga 22: / Riga 45: @@
     dt2 = Time(Now)
-  <FONT color=#006400>' ''Viene calcolata la differenza fra i due tempi e viene espressa in secondi;''
+  <FONT color=gray>' ''Viene calcolata la differenza fra i due tempi e viene espressa in secondi;''
   ' ''poi quel risultato viene convertito nel formato stringa impostato:''</font>
     Print Format(Time(0, 0, DateDiff(dt1, dt2, gb.Second)), "hh:nn:ss")
   '''End'''

Vuott il 08:33, 1 apr 2014

2014-04-01T08:33:53Z

← Versione meno recente		Versione delle 02:33, 1 apr 2014
Riga 2:		Riga 2:

	La sintassi è la seguente:		La sintassi è la seguente:
	Format(Time(''ore'', ''minuti'', ''secondi'')), "hh:nn:ss")		Format(Time(''ore'', ''minuti'', ''secondi'')), "hh:nn:ss") As String

Vuott il 23:56, 17 feb 2013

2013-02-17T23:56:15Z

← Versione meno recente		Versione delle 17:56, 17 feb 2013
Riga 16:		Riga 16:


	'''Public Sub Button1_Click()		'''Public''' Sub Button1_Click()

	Dim dt2 As Date		Dim dt2 As Date