Buonasera, ho riscontrato un problema nella scrittura del codice per eseguire la media dei dati in una listbox e visualizzare appunto la media in una label. Qualcuno può aiutarmi? grazie mille
Buonasera, ho riscontrato un problema nella scrittura del codice per eseguire la media dei dati in una listbox e visualizzare appunto la media in una label. Qualcuno può aiutarmi? grazie mille
Ecco il codice che ho scritto:
*Variabili
dim numero as single Dim media as single Private sub btnmedie_click(.....) Dim somma as single Somma = 0 Numero = val(lsbvinfo.items) Somma = somma + numero Media = somma/ numero Lblmvinfo = media End classMolto probabilmente è proprio sbagliato il codice.
Puo dirmi lei come scriverebbe un codice per fare la media con elementi che stanno al interno di una listbox?
Scusi per la poca abilità.
Ultima modifica di AntonioG; 07-03-2021 19:53 Motivo: Tag CODE
Il codice va inserito tra tag CODE. Leggi il regolamento del forum.
Comunque, il codice che hai scritto non ha alcun senso ... cerca di chiarire perché così non si capisce nulla.
Sai cosa è una media di n numeri e come si calcola?
Una ListBox contiene una lista, un elenco di elementi. Devi scorrerli tutti ciclicamente per ottenere una somma.
Una Sub non può terminare con End Class.
La "media" è il valore che si ottiene dividendo la somma di un determinato gruppo di numeri per il numero di elementi che lo compongono.
ma questa è matematica, e dovresti conoscere.
Nel tuo caso devi sfruttare le proprietà della ListBox
LIstBox List1.List che è appunto la lista di tutti i numeri
List1.Listcount -1 (la numerazione parte da zero) che è il numero di elementi .
Come ti ha detto Brontolo li devi scorrerli tutti ciclicamente ( For....Next ) per ottenere la somma
che dividerai per il numero di elementi ottenendo la media.