num_aleatorio=((lim_superior-lim_inferior)*rnd)
Ejemplo de num aleatorio del 1 al 10:
Código:
Private Sub Command1_Click()
Dim num As Integer
Math.Randomize
num = ((10 - 0) * Rnd)
Text1.Text = num
End Sub
ASI DE SENCILLO NO OS KOMAIS MAS EL kOKO!!
bueno espero q os sirva de ayuda.