Differenze tra le versioni di "Strutture: dichiarazione ed uso"
Da Gambas-it.org - Wikipedia.
Riga 15: | Riga 15: | ||
− | + | variabValor as Byte ''<Font Color= #006400>' questa variabile mi serve poi per l'Inputbox''</font> | |
− | |||
Versione delle 04:18, 30 mar 2012
Dichiariamo una Struttura con dei campi, che dovranno essere riempiti con dei valori. Tale Struttura avrà un proprio nome e farà da modello alle particolari variabili strutture che saranno effettivamente utilizzare per contenere valori.
PUBLIC Struct NomeStruttura ' definisco i campi della Struttura "astratta" ' Questa Struttura si riserverà, occupandola, 9 byte di memoria in tutto: valore1 As Integer ' dal byte n° 0 al n° 3 valore2 As Integer ' dal byte n° 4 al n° 7 valore3 as Byte ' il byte n° 8 END Struct ' creo una struttura "reale" composta a perfetta immagine di quella astratta: nuovaStruttura As New NomeStruttura variabValor as Byte ' questa variabile mi serve poi per l'Inputbox Public Sub Form_Open() variabValor = inputbox("Immetto un valore per \"riempire\" il campo \"variabile\" di \"nuovaStruttura\": valore3 .") ' attribuisco il valore a ciascun campo variabile della struttura ' (qui i valori sono due "costanti" ed uno "variabile"): nuovaStruttura.valore1 = 3 nuovaStruttura.valore2 = 6 nuovaStruttura.valore3 = variabValor End Public Sub Button1_Click() ' quindi opero con i valori contenuti da "nuovaStruttura" With nuovaStruttura Print .valore1 Print .valore2 Print .valore3 End With End