Oppure

Loading
25/06/08 15:23
super rambo
salve, vorrei fare in modo che quando si clicchi su un command in una label esca un numero che può essere 5, 10 o 15... avevo pensato alla funzione random facendo così:
Randomize
a = Int(Rnd * 6)
Label5 = a

però così nella label appare un numero a caso fino a cinque, c'e un modo per far si che il numero che appaia sia o 5 o 10 o 15?? non se se mi sono siegato... grazie!!
aaa
25/06/08 15:49
Overflow
ciao non so come si faccia. Si può usare anche questa soluzione.
Dim c(2) As Integer
c(0) = 5
c(1) = 10
c(2) = 15

Randomize

Label.Caption = CStr(c(CInt(Int((2 - 0 + 1) * Rnd() + 0))))


usare un array e fare generare un numero tra 0 e 2 che usi come indice dell'array.
Per generare numeri casuali credo sia meglio fare cosi:
Randomize
randomvalue = CInt(Int((upperbound - lowerbound + 1) * Rnd() + lowerbound))

dove upperbound è il numero più alto lowerbound è il num più basso del range di numeri da cui vuoi ottenere numeri a caso.

Ciao.
Ultima modifica effettuata da Overflow 25/06/08 15:49
aaa
25/06/08 15:51
super rambo
ciao, il primo metodo funziona quindi userò quello.. grazie!!
aaa