document.write('
Data hosted with ♥ by Pastebin.com - Download Raw - See Original
  1. Public Function copia() As ClassTablero
  2.   Dim tcopia As New ClassTablero
  3.   Dim a, b As Integer
  4.   For a = 0 To 6
  5.     For b = 0 To 6
  6.       tcopia.casillas[a, b] = hcasillas[a, b]
  7.     Next
  8.   Next
  9.   Return tcopia
  10. End
');