lotería carrusel de programación vb
Subcomando privado1_Click()
Texto3(0) = ""
Texto3(1) = ""
Texto3(2) = ""
Texto3(3) = ""
Texto3(4) = ""
.Text3(5) = ""
Texto3(6 ) = ""
Texto3(7) = ""
Texto3(8) = ""
Aleatorizar
Para a = 0 a 2
Para n = 10 a 130
x = Int( Rnd * n) - 30 'Generar entero aleatorio