Uso delle Strutture tra Classi e Moduli - Cronologia

Vuott il 18:57, 3 nov 2024

2024-11-03T18:57:21Z

← Versione meno recente		Versione delle 12:57, 3 nov 2024
Riga 201:		Riga 201:
	==Passaggio per "valore" di un array di tipo ''Struttura'' da una Classe secondaria a quella principale==		==Passaggio per "valore" di un array di tipo ''Struttura'' da una Classe secondaria a quella principale==
	Nel seguente caso vedremo il passaggio per "valore" di un <U>array di tipo ''Struttura''</u> da una Classe ''secondaria'' a una Classe o Modulo ''principale''.		Nel seguente caso vedremo il passaggio per "valore" di un <U>array di tipo ''Struttura''</u> da una Classe ''secondaria'' a una Classe o Modulo ''principale''.
	<BR>La particolarità di questo esempio è che a differenza del codice, presente nel primo paragrafo sopra, dalla Classe o dal Modulo ''principale'' non avverrà alcun passaggio di un Oggetto di tipo ''Struttura'', ma verrà soltanto ricevuto dalla Classe ''secondaria''.		<BR>La particolarità di questo esempio è che a differenza del codice, presente nel primo paragrafo sopra, dalla Classe o dal Modulo ''principale'' <U>non</u> avverrà alcun passaggio di un Oggetto di tipo ''Struttura'', ma verrà soltanto ricevuto dalla Classe ''secondaria''.

	Nella Classe o nel Modulo <U>principale</u> avremo il seguente codice:		Nella Classe o nel Modulo <U>principale</u> avremo il seguente codice:

Vuott il 18:54, 3 nov 2024

2024-11-03T18:54:54Z

← Versione meno recente		Versione delle 12:54, 3 nov 2024
Riga 200:		Riga 200:

	==Passaggio per "valore" di un array di tipo ''Struttura'' da una Classe secondaria a quella principale==		==Passaggio per "valore" di un array di tipo ''Struttura'' da una Classe secondaria a quella principale==
	Nel seguente caso vedremo il passaggio per "valore" di un <U>array di tipo ''Struttura''</u> da una Classe secondaria a una Classe o Modulo principale.		Nel seguente caso vedremo il passaggio per "valore" di un <U>array di tipo ''Struttura''</u> da una Classe ''secondaria'' a una Classe o Modulo ''principale''.
	<BR>La particolarità di questo esempio è che a differenza del codice, presente nel primo paragrafo sopra, dalla Classe o dal Modulo principale non avverrà alcun passaggio di un Oggetto di tipo ''Struttura''.		<BR>La particolarità di questo esempio è che a differenza del codice, presente nel primo paragrafo sopra, dalla Classe o dal Modulo ''principale'' non avverrà alcun passaggio di un Oggetto di tipo ''Struttura'', ma verrà soltanto ricevuto dalla Classe ''secondaria''.

	Nella Classe o nel Modulo <U>principale</u> avremo il seguente codice:		Nella Classe o nel Modulo <U>principale</u> avremo il seguente codice:

Vuott il 18:52, 3 nov 2024

2024-11-03T18:52:42Z

← Versione meno recente		Versione delle 12:52, 3 nov 2024
Riga 197:		Riga 197:

	End		End


			==Passaggio per "valore" di un array di tipo ''Struttura'' da una Classe secondaria a quella principale==
			Nel seguente caso vedremo il passaggio per "valore" di un <U>array di tipo ''Struttura''</u> da una Classe secondaria a una Classe o Modulo principale.
			<BR>La particolarità di questo esempio è che a differenza del codice, presente nel primo paragrafo sopra, dalla Classe o dal Modulo principale non avverrà alcun passaggio di un Oggetto di tipo ''Struttura''.

			Nella Classe o nel Modulo <U>principale</u> avremo il seguente codice:
			Public Struct Struttura
			b As Byte
			c As Short
			End Struct


			Public Sub Main()

			Dim ss As Struttura[]
			Dim cl1 As New Class1

			ss = cl1.Funzione()

			<FONT Color=gray>' ''Verifica il risultato:''</font>
			For b As Byte = 0 To ss.Max
			Print ss[b].b
			Print ss[b].c
			Print
			Next

			End
			Nella Classe <U>secondaria</u> avremo:
			Public Struct Struttura
			b As Byte
			c As Short
			End Struct


			Public Sub Funzione() As Struttura[] <FONT Color=gray>' ''Ritorno per "valore" di un array del tipo della Struttura dichiarata''</font>

			Dim sstt As New Struttura[4]

			<FONT Color=gray>' ''Genera le singole istanze, contenute negli elementi dell'array di tipo Struttura, e popola di valori i loro membri:''</font>
			For b As Byte = 0 To sstt.Max
			sstt[b] = New Struttura
			sstt[b].b = b * 10
			sstt[b].c = b * 1000
			Next

			Return sstt

			End

Vuott il 19:05, 1 nov 2024

2024-11-01T19:05:19Z

@@ Riga 149: / Riga 149: @@
   <FONT color=gray>' ''Effettuiamo la verifica:''</font>
    With Module1
      Print .a[0].a
@@ Riga 172: / Riga 186: @@
   '''<FONT color=#B22222>Public</font>''' l2 As New Struttura
   '''<FONT color=#B22222>Public</font>''' l3 As New Struttura

Vuott il 18:53, 1 nov 2024

2024-11-01T18:53:35Z

← Versione meno recente		Versione delle 12:53, 1 nov 2024
Riga 135:		Riga 135:
	In quest'altro esempio avremo un Classe principale ed un ''Modulo'', nel quale saranno semplicemente dichiarate la ''Struttura'', le variabili del tipo della ''Struttura'' e la variabile ''vettoriale'' del tipo della ''Struttura''. <BR>Tale variabile vettoriale raccoglierà nei suoi elementi le predette singole variabili del tipo della ''Struttura'' dichiarata.		In quest'altro esempio avremo un Classe principale ed un ''Modulo'', nel quale saranno semplicemente dichiarate la ''Struttura'', le variabili del tipo della ''Struttura'' e la variabile ''vettoriale'' del tipo della ''Struttura''. <BR>Tale variabile vettoriale raccoglierà nei suoi elementi le predette singole variabili del tipo della ''Struttura'' dichiarata.

	Nella <U>Classe principale</u> avremo il ~~sguente~~ semplice codice:		Nella <U>Classe principale</u> avremo il seguente semplice codice:
	Public Sub Form_Open()		Public Sub Form_Open()

Vuott il 18:53, 1 nov 2024

2024-11-01T18:53:16Z

← Versione meno recente		Versione delle 12:53, 1 nov 2024
Riga 46:		Riga 46:
	End		End

	Nella <U>Classe secondaria</u>, chiamata ''Class2'', avremo il seguente codice:		Nella <U>Classe secondaria</u>, chiamata ad esempio ''Class2'', avremo il seguente codice:
	<FONT color=gray>' ''Dichiara una "Struttura" avente i medesimi membri della "Struttura" presente nella Classe principale.''		<FONT color=gray>' ''Dichiara una "Struttura" avente i medesimi membri della "Struttura" presente nella Classe principale.''
	' ''Sia tali membri che la "Struttura" stessa avranno i nomi uguali a quelli rispettivi della "Struttura" presente nella Classe principale.''</font>		' ''Sia tali membri che la "Struttura" stessa avranno i nomi uguali a quelli rispettivi della "Struttura" presente nella Classe principale.''</font>
Riga 117:		Riga 117:
	End		End

	Nella <U>Classe secondaria</u>, chiamata ''Class2'', avremo il seguente codice:		Nella <U>Classe secondaria</u>, chiamata ad esempio ''Class2'', avremo il seguente codice:
	Public Sub Prova()		Public Sub Prova()

Riga 133:		Riga 133:

	===2° esempio===		===2° esempio===
	In quest'altro esempio avremo un Classe principale ed un ''Modulo'', nel quale saranno semplicemente dichiarate la ''Struttura'', le variabili del tipo della ''Struttura'' e la variabile ''vettoriale'' del tipo della ''Struttura''. Tale variabile vettoriale raccoglierà nei suoi elementi le predette singole variabili del tipo della ''Struttura'' dichiarata.		In quest'altro esempio avremo un Classe principale ed un ''Modulo'', nel quale saranno semplicemente dichiarate la ''Struttura'', le variabili del tipo della ''Struttura'' e la variabile ''vettoriale'' del tipo della ''Struttura''. <BR>Tale variabile vettoriale raccoglierà nei suoi elementi le predette singole variabili del tipo della ''Struttura'' dichiarata.

	Nella <U>Classe principale</u> avremo il sguente semplice codice:		Nella <U>Classe principale</u> avremo il sguente semplice codice:

Vuott il 18:48, 1 nov 2024

2024-11-01T18:48:58Z

← Versione meno recente		Versione delle 12:48, 1 nov 2024
Riga 93:		Riga 93:
	'''End''' Struct		'''End''' Struct

	<FONT color=gray>' ''Quindi dichiariamo come ''Globale'' (Publica)'' ed istanziamo''		<FONT color=gray>' ''Quindi dichiariamo come ''Globale'' (Publica)'' ed istanziamo la relativa variabile del tipo della precedente Struttura:''</font>
	~~' ''~~la relativa variabile del tipo della precedente Struttura:''</font>
	'''<FONT color=#B22222>Public</font>''' variabilis As New Structura		'''<FONT color=#B22222>Public</font>''' variabilis As New Structura

Vuott il 18:48, 1 nov 2024

2024-11-01T18:48:05Z

← Versione meno recente		Versione delle 12:48, 1 nov 2024
Riga 100:		Riga 100:
	Public Sub Form_Open()		Public Sub Form_Open()

	<FONT color=gray>' ''~~Assegnamo~~ i valori agli elementi che formano la Struttura:''</font>		<FONT color=gray>' ''Assegniamo i valori agli elementi che formano la Struttura:''</font>
	With variabilis		With variabilis
	.a = 2		.a = 2
Riga 108:		Riga 108:
	<FONT color=gray>' ''Chiamiamo una routine della Classe secondaria:''</font>		<FONT color=gray>' ''Chiamiamo una routine della Classe secondaria:''</font>
	cl2.Prova()		cl2.Prova()

			Print
			<FONT color=gray>' ''Verifichiamo i valori dei due membri della Struttura, come modificati nella Classe secondaria:''</font>
			With variabilis
			Print .a
			Print .b
			End With

	End		End
Riga 118:		Riga 125:
	Print "Elemento a = "; .a		Print "Elemento a = "; .a
	Print "Elemento b = "; .b		Print "Elemento b = "; .b
			<FONT color=gray>' ''Modifichiamo i valori dei due membri della Struttura dichiarata nella Classe principale:''</font>
			.a = 111
			.b = 111111
	End With		End With

Vuott il 18:41, 1 nov 2024

2024-11-01T18:41:13Z

← Versione meno recente		Versione delle 12:41, 1 nov 2024
Riga 57:		Riga 57:
	' ''Detta variabile può avere un nome anche diverso dalla variabile di tipo "Struttura" presente nella Classe principale.''		' ''Detta variabile può avere un nome anche diverso dalla variabile di tipo "Struttura" presente nella Classe principale.''
	' ''E' previsto, inoltre, in questo esempio che sarà restituita per "indirizzo" alla funzione chiamante:'':</font>		' ''E' previsto, inoltre, in questo esempio che sarà restituita per "indirizzo" alla funzione chiamante:'':</font>
	Public Sub Prova(<FONT color=~~purple~~>var</font> As <FONT color=#B22222>Structura</font>)		Public Sub Prova(<FONT color=green>var</font> As <FONT color=#B22222>Structura</font>)

	With <FONT color=~~purple~~>var</font>		With <FONT color=green>var</font>
	<FONT color=gray>' ''Vede i valori ora contenuti negli elementi della variabile di tipo "Struttura":''</font>		<FONT color=gray>' ''Vede i valori ora contenuti negli elementi della variabile di tipo "Struttura":''</font>
	Print "Elemento 'a' ricevuto dalla Classe principale = "; .a		Print "Elemento 'a' ricevuto dalla Classe principale = "; .a

Vuott il 18:40, 1 nov 2024

2024-11-01T18:40:19Z

← Versione meno recente		Versione delle 12:40, 1 nov 2024
Riga 101:		Riga 101:

	<FONT color=gray>' ''Assegnamo i valori agli elementi che formano la Struttura:''</font>		<FONT color=gray>' ''Assegnamo i valori agli elementi che formano la Struttura:''</font>
	With variabilis		With variabilis
	.a = 2		.a = 2
	.b = 1000		.b = 1000
	End With		End With

	<FONT color=gray>' ''Chiamiamo una routine della Classe secondaria:''</font>		<FONT color=gray>' ''Chiamiamo una routine della Classe secondaria:''</font>
	cl2.Prova()		cl2.Prova()

	End		End
Riga 115:		Riga 115:

	<FONT color=gray>' ''Richiamiamo ed utilizziamo la Struttura dichiarata nella Classe principale:''</font>		<FONT color=gray>' ''Richiamiamo ed utilizziamo la Struttura dichiarata nella Classe principale:''</font>
	With FMain.variabilis		With FMain.variabilis
	Print "Elemento a = "; .a		Print "Elemento a = "; .a
	Print "Elemento b = "; .b		Print "Elemento b = "; .b
	End With		End With

	End		End