Problamas con Random
Publicado por Julio Ramirez (9 intervenciones) el 12/10/2003 21:49:59
Dim X, Y As Integer
Dim CorX, CorY As New System.Random()
saludos tengo el siguiente problema...
tengo dos random que busca codenasa en los numeros dados
uno busca para X y el otro para Y
eso son para que me mueva aleatoreamente un boton me funciona perfecto pero quiero que me busque de 16 en 16 solamente
cmo lo muestro acontinuacion
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
X = CorX.Next(40, 89) 'que busque de 16 en 16 eje.que me escoja uno de estos: 40,56,72,88
Y = CorY.Next(56, 104) 'que busque de 16 en 16 eje. que me escoja uno de estos: 56,72,88,104
Button18.Location = New Point(X, Y)
Gracias
Dim CorX, CorY As New System.Random()
saludos tengo el siguiente problema...
tengo dos random que busca codenasa en los numeros dados
uno busca para X y el otro para Y
eso son para que me mueva aleatoreamente un boton me funciona perfecto pero quiero que me busque de 16 en 16 solamente
cmo lo muestro acontinuacion
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
X = CorX.Next(40, 89) 'que busque de 16 en 16 eje.que me escoja uno de estos: 40,56,72,88
Y = CorY.Next(56, 104) 'que busque de 16 en 16 eje. que me escoja uno de estos: 56,72,88,104
Button18.Location = New Point(X, Y)
Gracias
Valora esta pregunta
0