PDA

Visualizza la versione completa : [VB] List Box...


Drocchia
11-05-2002, 19:02
Ciao a tutti...
ragazzi sapete come fare ad estrarre una riga a caso di una ListBox??

Mi spiego meglio io ho una list box con i seguenti valir per riga
1
2
3
4
5
6
spingendo un button voglio che in una txt venga uno dei 6 vaori scelti a caso!!

Come si fa??

retiario
11-05-2002, 19:43
1) calcolare un indice da 1 a 6 con la funzione random
2) Text1.Text = List1.Text(numero random)

PUNTO
11-05-2002, 23:20
Se hai una ListBox con solamente 6 numeri puoi usare la funzione Chr dopo aver estratto un numero casuale risparmiando la ListBox.

Numero = Int(6 * Rnd + 1)
Text1.Text = Chr(Numero + 48)

Altrimenti usa la proprietÓ List:

Numero = Int(6 * Rnd + 1)
Text1.Text = List1.List(Numero - 1)


Ciao

Loading