allora in questo caso dovresti fare così
scrivere la parolina magica randomize ....mettiamo il caso che tu vuoi assegnare alla label un valore random o casuale....
Dim risultato As Integer
Private Sub Cmd_Click()
Randomize
lbl.Caption = (Int(Rnd(10) * 10))
end sub
int serve a farti dare un numero intero perche il randomize da numeri con la virgola....il primo dieci ti genera numeri tra 0 e dieci(ancora con la virgola) mentre il secondo dieci,moltoplica il numero con la virgola per dieci in modo che sia un numero intero il valore della label...