HOLA!!!
Otra forma de cambiar de jugador a cada turno es asi:
GRACIAS POR LEER!!!
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!!!