Test Foro de elhacker.net SMF 2.1

Programación => .NET (C#, VB.NET, ASP) => Programación General => Programación Visual Basic => Mensaje iniciado por: marrison en 25 Abril 2013, 16:29 PM

Título: duda; if variable = par?
Publicado por: marrison en 25 Abril 2013, 16:29 PM
Hola buenas, estoy desarrollando un programa en vb, y quiero poner un marcador del "juego" al final, y cada turno cambia de jugador, y tengo una duda:

Habia pensado llamar una variable (numjug) por llamarla de algun modo, que al principio fuese 0, y al final de cada turno aumente en 1, asi habria un bucle, si numjug es par le toca al jugador 1, si no lo es le toca al jugador 2, habia pensado en eso para ir cambiando de jugador, si eran dos habia pensado un bucle con los dos jugadores ya escritos y que se repitiese, pero si quiero añadir mas jugadores me parece mas facil mi idea, ya que asi es automatico el bucle, pero no se como hacerlo para poner la sentencia del if, es decir, como pongo
Código (vb) [Seleccionar]
If numjug = par Then..?? como puedo hacerlo?

O si hay otra forma mas sencilla de cambiar de jugador cada turno... pero esa es la primera que se me ha ocurrido.... alguna idea mejor?

Y luego como añadir al formulario del marcador un punto al jugador desde el otro formulario, que eso se me atasca...

Decir que tiene que ser en Visual Basic 3.0 porque es para clase, no puede ser en 6...

Título: Re: duda; if variable = par?
Publicado por: 79137913 en 25 Abril 2013, 16:49 PM
HOLA!!!

Código (vb) [Seleccionar]
If Variable Mod 2 = 0 then
'Aca es par
Else
'Aca es impar
End If

If Variable and 1 then
'aca es Impar
Else
'Aca es par
End If

If (Variable/2) = int (Variable/2) then 'este solo si la variable es single o double
'Aca es par
Else
'Aca es impar
End if


Otra forma de cambiar de jugador a cada turno es asi:
Código (vb) [Seleccionar]

Dim turno as boolean ' esto lo declaras afuera del procedimiento

If Turno then
'turno de jugador 1
' si turno es = true entonces
else
'turno de jugador 2
' si turno es = false entonces
end if
turno = not (turno) 'Si turno es true lo hace false y si es false lo hace true


GRACIAS POR LEER!!!
Título: Re: duda; if variable = par?
Publicado por: marrison en 26 Abril 2013, 17:44 PM
gracias, ya lo consegui terminar! muchas gracias :D
Título: Re: duda; if variable = par?
Publicado por: 79137913 en 26 Abril 2013, 19:26 PM
HOLA!!!

Seria interesante que postearas el codigo en otro tema asi todos pueden ver lo que creaste!

GRACIAS POR LEER!!!
Título: Re: duda; if variable = par?
Publicado por: marrison en 28 Abril 2013, 10:51 AM
Cita de: 79137913 en 26 Abril 2013, 19:26 PM
HOLA!!!

Seria interesante que postearas el codigo en otro tema asi todos pueden ver lo que creaste!

GRACIAS POR LEER!!!

claro, en que termine de arreglar bugs, añadir mejoras y eso lo pongo :) aunque en realidad es una chorrada.. jajaja