Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Public Function jugadasPosibles() As Integer[]
- Dim columna As Integer
- Dim listaJugadas As New Integer[]
- For columna = 0 To 6 '
- If Me.casillas[0, columna] = 0 Then
- listaJugadas.Add(columna)
- Endif
- Next
- Return listaJugadas
- End
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement