Generazione schema 4x4

[EnKay]

Il software non mi da errori, quindi spero di averne fatti meno possibile.

Mi dite se il mio codice può andare bene, intanto, per avere i numeri casuali nelle caselle?

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim Schema(4, 4) As Byte

        Dim i As Byte
        Dim j As Byte
        Dim r As Integer
        i = 0
        For i = 0 To 3
            j = 0
            For j = 0 To 3
                Randomize()
                r = CInt(Int((4 * Rnd()) + 1))
                Schema(i, j) = r
                j = j + 1
            Next
            i = i + 1
        Next

    End Sub

Come faccio a effettuare il controllo, che eviti due numeri uguali in una riga e in una colonna?

Come faccio a visualizzare la griglia 4x4 nel form?