Buenas, a todos. Estoy intentando hacer un programa que genere numeros aleatorios.
De momento e conseguido que genere numeros aleatorios con el codigo expuesto en este post y ahora me interesaria que el programa comparara los numeros y dijera cual es el primer numero que sale repetido mas veces, cual es el segundo numero que sale mas veces despues del primero y cual es el 3r numero repetido que sale mas veces.
de momento esto es lo mas aproximado.
Private Sub Command1_Click()
Dim num As Integer
Math.Randomize
num = ((36 - 0) * Rnd)
Text1.Text = num
List1.AddItem Text1.Text
End Sub
Cuando genera los numeros los apunta en el listbox, la cuestion seria que sacara los 3 resultados de los numeros que mas veces se repiten en 3 texbox distintos por ejemplo,
No hace falta decir que he buscado por el tito google y por todas partes y no e encontrado nada, gracias de antemano wink.
De momento e conseguido que genere numeros aleatorios con el codigo expuesto en este post y ahora me interesaria que el programa comparara los numeros y dijera cual es el primer numero que sale repetido mas veces, cual es el segundo numero que sale mas veces despues del primero y cual es el 3r numero repetido que sale mas veces.
de momento esto es lo mas aproximado.
Private Sub Command1_Click()
Dim num As Integer
Math.Randomize
num = ((36 - 0) * Rnd)
Text1.Text = num
List1.AddItem Text1.Text
End Sub
Cuando genera los numeros los apunta en el listbox, la cuestion seria que sacara los 3 resultados de los numeros que mas veces se repiten en 3 texbox distintos por ejemplo,
No hace falta decir que he buscado por el tito google y por todas partes y no e encontrado nada, gracias de antemano wink.