Uso dello ''Spinner'' - Cronologia

Vuott il 23:51, 13 dic 2024

2024-12-13T23:51:50Z

← Versione meno recente		Versione delle 17:51, 13 dic 2024
Riga 10:		Riga 10:
	===Esempi pratici===		===Esempi pratici===
	Mostramo di seguito un semplice esempio didattico dell'uso dell'oggetto ''Spinner'', con il quale si farà soltanto incrementare la percentuale, indicata nello ''Spinner'', mediante un ''Timer''. Si porrà sul ''Form'' l'icona del Controllo ''Spinner'', nonché quella dell'Oggetto speciale ''Timer''. Poi si imposterà il seguente codice:		Mostramo di seguito un semplice esempio didattico dell'uso dell'oggetto ''Spinner'', con il quale si farà soltanto incrementare la percentuale, indicata nello ''Spinner'', mediante un ''Timer''. Si porrà sul ''Form'' l'icona del Controllo ''Spinner'', nonché quella dell'Oggetto speciale ''Timer''. Poi si imposterà il seguente codice:
			Private Timer1 As Timer
	Private s As Single		Private s As Single

Riga 21:		Riga 22:
	End With		End With

	With Timer1		With Timer1 = New Timer As "Timer1"
	.Delay = 100		.Delay = 100
	.Start()		.Start()

Vuott il 17:56, 13 giu 2023

2023-06-13T17:56:29Z

← Versione meno recente		Versione delle 11:56, 13 giu 2023
Riga 3:		Riga 3:
	Lo ''Spinner'' può essere utilizzato senza o con l'indicazione in rappresentazione percentuale del tempo sin a quel momento passato rispetto al termine del processo. Ovviamente potrà anche indicare, ad esempio, la quantità di byte caricati sino a quel momento rispetto alla totale dimensione da caricare.		Lo ''Spinner'' può essere utilizzato senza o con l'indicazione in rappresentazione percentuale del tempo sin a quel momento passato rispetto al termine del processo. Ovviamente potrà anche indicare, ad esempio, la quantità di byte caricati sino a quel momento rispetto alla totale dimensione da caricare.

	Per ottenere anche l'indicazione della percentuale bisognerà porre a ''~~vero~~'' la ~~proprietà ''~~.Label'' dello ''Spinner'':		Per ottenere anche l'indicazione della percentuale bisognerà porre a ''Vero'' la Proprietà ".Label" dello ''Spinner'':
	Spinner1.Label = <FONT color=#B22222>True</font>		Spinner1.Label = <FONT color=#B22222>True</font>
	e impostare il valore della percentuale con un valore in virgola mobile, ad esempio:		e impostare il valore della percentuale con un valore in virgola mobile, ad esempio:
Riga 9:		Riga 9:

	===Esempi pratici===		===Esempi pratici===
	Mostramo di seguito un semplice esempio didattico dell'uso dell'oggetto ''Spinner'', con il quale si farà soltanto incrementare la percentuale, indicata nello ''Spinner'', mediante un ''Timer''. Si porrà sul ''Form'' l'icona ~~dell'oggetto~~ ''Spinner'', nonché quella dell'~~oggetto~~ speciale ''Timer''. Poi si imposterà il seguente codice:		Mostramo di seguito un semplice esempio didattico dell'uso dell'oggetto ''Spinner'', con il quale si farà soltanto incrementare la percentuale, indicata nello ''Spinner'', mediante un ''Timer''. Si porrà sul ''Form'' l'icona del Controllo ''Spinner'', nonché quella dell'Oggetto speciale ''Timer''. Poi si imposterà il seguente codice:
	Private s As Single		Private s As Single


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

	With Spinner1		With Spinner1
Riga 26:		Riga 26:
	End With		End With

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

	~~'''~~Public~~'''~~ Sub Timer1_Timer()		Public Sub Timer1_Timer()

	If s > 1 Then		If s > 1 Then
Riga 43:		Riga 43:
	s += 0.01		s += 0.01

	~~'''~~End~~'''~~		End
	In quest'altro esempio verrà utilizzata la funzione ''Wait'' al posto del ''Timer'', e l'~~oggetto~~ ''Spinner'' sarà avviato al di fuori dell'apertura del ''Form'' principale del programma, ma cliccando su un tasto:		In quest'altro esempio verrà utilizzata la funzione ''Wait'' al posto del ''Timer'', e l'Oggetto ''Spinner'' sarà avviato al di fuori dell'apertura del ''Form'' principale del programma, ma cliccando su un tasto:
	~~'''~~Public~~'''~~ Sub Button1_Click()		Public Sub Button1_Click()

	Dim b As Byte		Dim b As Byte
Riga 63:		Riga 63:
	End With		End With

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

Vuott il 01:26, 29 dic 2021

2021-12-29T01:26:12Z

← Versione meno recente		Versione delle 19:26, 28 dic 2021
Riga 1:		Riga 1:
	Lo '''''Spinner''''' è un ~~oggetto~~ grafico GUI avente aspetto circolare che ruota in continuazione di 360° e che rappresenta un'attesa che termini un processo.		Lo '''Spinner''' è un Oggetto grafico GUI avente aspetto circolare che ruota in continuazione di 360° e che rappresenta un'attesa che termini un processo.


	Lo ''Spinner'' può essere utilizzato senza o con l'indicazione in rappresentazione percentuale del tempo sin a quel momento passato rispetto al termine del processo. Ovviamente potrà anche indicare, ad esempio, la quantità di byte caricati sino a quel momento rispetto alla totale dimensione da caricare.		Lo ''Spinner'' può essere utilizzato senza o con l'indicazione in rappresentazione percentuale del tempo sin a quel momento passato rispetto al termine del processo. Ovviamente potrà anche indicare, ad esempio, la quantità di byte caricati sino a quel momento rispetto alla totale dimensione da caricare.
Riga 7:		Riga 6:
	Spinner1.Label = <FONT color=#B22222>True</font>		Spinner1.Label = <FONT color=#B22222>True</font>
	e impostare il valore della percentuale con un valore in virgola mobile, ad esempio:		e impostare il valore della percentuale con un valore in virgola mobile, ad esempio:
	Spinner1.Value = <FONT color=#B22222>0.33</font> <FONT color=gray>' ''Verrà mostrato: 33%''</font>		Spinner1.Value = <FONT color=#B22222>0.33</font> <FONT color=gray>' ''Verrà mostrato: <B>33%</b>''</font>


	===Esempi pratici===		===Esempi pratici===
Riga 29:		Riga 27:

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


	'''Public''' Sub Timer1_Timer()		'''Public''' Sub Timer1_Timer()

Riga 47:		Riga 44:

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


	In quest'altro esempio verrà utilizzata la funzione ''Wait'' al posto del ''Timer'', e l'oggetto ''Spinner'' sarà avviato al di fuori dell'apertura del ''Form'' principale del programma, ma cliccando su un tasto:		In quest'altro esempio verrà utilizzata la funzione ''Wait'' al posto del ''Timer'', e l'oggetto ''Spinner'' sarà avviato al di fuori dell'apertura del ''Form'' principale del programma, ma cliccando su un tasto:
	'''Public''' Sub Button1_Click()		'''Public''' Sub Button1_Click()
Riga 62:		Riga 57:
	.Value = s		.Value = s
	s += 0.01		s += 0.01
	Wait 0.01		<FONT Color=#B22222>Wait</font> 0.01
	Next		Next
	.Stop		.Stop

Vuott il 21:22, 3 apr 2021

2021-04-03T21:22:06Z

← Versione meno recente		Versione delle 15:22, 3 apr 2021
Riga 50:		Riga 50:

	In quest'altro esempio verrà utilizzata la funzione ''Wait'' al posto del ''Timer'', e l'oggetto ''Spinner'' sarà avviato al di fuori dell'apertura del ''Form'' principale del programma, ma cliccando su un tasto:		In quest'altro esempio verrà utilizzata la funzione ''Wait'' al posto del ''Timer'', e l'oggetto ''Spinner'' sarà avviato al di fuori dell'apertura del ''Form'' principale del programma, ma cliccando su un tasto:
	~~'''Public''' Sub Form_Open()~~

	~~Spinner1.Stop~~

	~~'''End'''~~


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

Vuott il 21:19, 3 apr 2021

2021-04-03T21:19:10Z

← Versione meno recente		Versione delle 15:19, 3 apr 2021
Riga 17:		Riga 17:
	'''Public''' Sub Form_Open()		'''Public''' Sub Form_Open()

	With Spinner1		With Spinner1
	.Label = True		.Label = True
	.Value = 0		.Value = 0
	End With		.Start
			End With

	With Timer1		With Timer1
	.Delay = 100		.Delay = 100
	.Start()		.Start()
	End With		End With

	'''End'''		'''End'''
Riga 32:		Riga 33:
	'''Public''' Sub Timer1_Timer()		'''Public''' Sub Timer1_Timer()

	If s > 1 Then		If s > 1 Then
	With Spinner1		With Spinner1
	.Stop()		.Stop()
	.Delete()		.Delete()
	End With		End With
	Timer1.Stop()		Timer1.Stop()
	Return		Return
	Endif		Endif

	Spinner1.Value = s		Spinner1.Value = s

	s += 0.01		s += 0.01

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



	In quest'altro esempio verrà utilizzata la funzione ''Wait'' al posto del ''Timer'', e l'oggetto ''Spinner'' sarà avviato al di fuori dell'apertura del ''Form'' principale del programma, ma cliccando su un tasto:		In quest'altro esempio verrà utilizzata la funzione ''Wait'' al posto del ''Timer'', e l'oggetto ''Spinner'' sarà avviato al di fuori dell'apertura del ''Form'' principale del programma, ma cliccando su un tasto:
	''' Public''' Sub Form_Open()		'''Public''' Sub Form_Open()

	Spinner1.Stop		Spinner1.Stop

	End'''		'''End'''


Riga 61:		Riga 61:
	Dim b As Byte		Dim b As Byte
	Dim s As Single		Dim s As Single

	With Spinner1		With Spinner1
	.Label = True		.Label = True
	.Value = 0		.Value = 0
	.Start		.Start
	~~End With~~		For b = 0 To 100
			.Value = s
	For b = 0 To 100		s += 0.01
	~~Spinner1~~.Value = s		Wait 0.01
	s += 0.01		Next
	Wait 0.01		.Stop
	Next		.Delete
			End With
	~~With Spinner1~~
	.Stop
	.Delete
	End With

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

Vuott il 23:29, 6 dic 2015

2015-12-06T23:29:29Z

← Versione meno recente		Versione delle 17:29, 6 dic 2015
Riga 44:		Riga 44:

	s += 0.01		s += 0.01

			'''End'''



			In quest'altro esempio verrà utilizzata la funzione ''Wait'' al posto del ''Timer'', e l'oggetto ''Spinner'' sarà avviato al di fuori dell'apertura del ''Form'' principale del programma, ma cliccando su un tasto:
			''' Public''' Sub Form_Open()

			Spinner1.Stop

			End'''


			'''Public''' Sub Button1_Click()

			Dim b As Byte
			Dim s As Single

			With Spinner1
			.Label = True
			.Value = 0
			.Start
			End With

			For b = 0 To 100
			Spinner1.Value = s
			s += 0.01
			Wait 0.01
			Next

			With Spinner1
			.Stop
			.Delete
			End With

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

Vuott il 23:06, 6 dic 2015

2015-12-06T23:06:28Z

← Versione meno recente		Versione delle 17:06, 6 dic 2015
Riga 12:		Riga 12:
	===Esempi pratici===		===Esempi pratici===
	Mostramo di seguito un semplice esempio didattico dell'uso dell'oggetto ''Spinner'', con il quale si farà soltanto incrementare la percentuale, indicata nello ''Spinner'', mediante un ''Timer''. Si porrà sul ''Form'' l'icona dell'oggetto ''Spinner'', nonché quella dell'oggetto speciale ''Timer''. Poi si imposterà il seguente codice:		Mostramo di seguito un semplice esempio didattico dell'uso dell'oggetto ''Spinner'', con il quale si farà soltanto incrementare la percentuale, indicata nello ''Spinner'', mediante un ''Timer''. Si porrà sul ''Form'' l'icona dell'oggetto ''Spinner'', nonché quella dell'oggetto speciale ''Timer''. Poi si imposterà il seguente codice:
			Private s As Single


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

Riga 38:		Riga 41:
	Endif		Endif

	Spinner1.Value += 0.01		Spinner1.Value = s

			s += 0.01

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

Vuott il 23:04, 6 dic 2015

2015-12-06T23:04:24Z

← Versione meno recente		Versione delle 17:04, 6 dic 2015
Riga 12:		Riga 12:
	===Esempi pratici===		===Esempi pratici===
	Mostramo di seguito un semplice esempio didattico dell'uso dell'oggetto ''Spinner'', con il quale si farà soltanto incrementare la percentuale, indicata nello ''Spinner'', mediante un ''Timer''. Si porrà sul ''Form'' l'icona dell'oggetto ''Spinner'', nonché quella dell'oggetto speciale ''Timer''. Poi si imposterà il seguente codice:		Mostramo di seguito un semplice esempio didattico dell'uso dell'oggetto ''Spinner'', con il quale si farà soltanto incrementare la percentuale, indicata nello ''Spinner'', mediante un ''Timer''. Si porrà sul ''Form'' l'icona dell'oggetto ''Spinner'', nonché quella dell'oggetto speciale ''Timer''. Poi si imposterà il seguente codice:
	~~'''Private''' s As Single~~


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

	~~Dim b As Byte~~

	With Spinner1		With Spinner1
	.Label = True		.Label = True
	.Value = 2		.Value = 0
	End With		End With

	Timer1.Start()		With Timer1
			.Delay = 100
			.Start()
			End With

	'''End'''		'''End'''
Riga 39:		Riga 37:
	Return		Return
	Endif		Endif

	~~Timer1.Delay = 100~~		Spinner1.Value += 0.01
	Spinner1.Value ~~= s~~
	s += 0.01

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

Vuott il 12:47, 3 gen 2014

2014-01-03T12:47:12Z

← Versione meno recente		Versione delle 06:47, 3 gen 2014
Riga 4:		Riga 4:
	Lo ''Spinner'' può essere utilizzato senza o con l'indicazione in rappresentazione percentuale del tempo sin a quel momento passato rispetto al termine del processo. Ovviamente potrà anche indicare, ad esempio, la quantità di byte caricati sino a quel momento rispetto alla totale dimensione da caricare.		Lo ''Spinner'' può essere utilizzato senza o con l'indicazione in rappresentazione percentuale del tempo sin a quel momento passato rispetto al termine del processo. Ovviamente potrà anche indicare, ad esempio, la quantità di byte caricati sino a quel momento rispetto alla totale dimensione da caricare.

	Per ottenere anche l'indicazione della percentuale bisognerà porre a ''vero'' la proprietà ''.Label'' dello ''Spinner''		Per ottenere anche l'indicazione della percentuale bisognerà porre a ''vero'' la proprietà ''.Label'' dello ''Spinner'':
	Spinner1.Label = <FONT color=#B22222>True</font>		Spinner1.Label = <FONT color=#B22222>True</font>
	e impostare il valore della percentuale con un valore in virgola mobile, ad esempio:		e impostare il valore della percentuale con un valore in virgola mobile, ad esempio:

Vuott: Creata pagina con 'Lo '''''Spinner''''' è un oggetto grafico GUI avente aspetto circolare che ruota in continuazione di 360° e che rappresenta un'attesa che termini un processo. Lo ''Spinner...'

2014-01-03T12:46:39Z

Creata pagina con 'Lo '''''Spinner''''' è un oggetto grafico GUI avente aspetto circolare che ruota in continuazione di 360° e che rappresenta un'attesa che termini un processo. Lo ''Spinner...'

Nuova pagina

Lo '''''Spinner''''' è un oggetto grafico GUI avente aspetto circolare che ruota in continuazione di 360° e che rappresenta un'attesa che termini un processo.

Lo ''Spinner'' può essere utilizzato senza o con l'indicazione in rappresentazione percentuale del tempo sin a quel momento passato rispetto al termine del processo. Ovviamente potrà anche indicare, ad esempio, la quantità di byte caricati sino a quel momento rispetto alla totale dimensione da caricare.

Per ottenere anche l'indicazione della percentuale bisognerà porre a ''vero'' la proprietà ''.Label'' dello ''Spinner''
Spinner1.Label = True
e impostare il valore della percentuale con un valore in virgola mobile, ad esempio:
Spinner1.Value = 0.33 ' ''Verrà mostrato: 33%''

===Esempi pratici===
Mostramo di seguito un semplice esempio didattico dell'uso dell'oggetto ''Spinner'', con il quale si farà soltanto incrementare la percentuale, indicata nello ''Spinner'', mediante un ''Timer''. Si porrà sul ''Form'' l'icona dell'oggetto ''Spinner'', nonché quella dell'oggetto speciale ''Timer''. Poi si imposterà il seguente codice:
'''Private''' s As Single

'''Public''' Sub Form_Open()

Dim b As Byte

With Spinner1
.Label = True
.Value = 2
End With

Timer1.Start()

'''End'''

'''Public''' Sub Timer1_Timer()

If s > 1 Then
With Spinner1
.Stop()
.Delete()
End With
Timer1.Stop()
Return
Endif

Timer1.Delay = 100
Spinner1.Value = s
s += 0.01

'''End'''