VB经典扑克。使用模数检测获胜手牌

Question

我需要在vb中创建一个扑克游戏作为我班级的工作，每个套件都使用mod13来评估获胜的牌......但我迷失在这里。我只是无法得到如何使用modulo。

我真的需要提示如何做到这一点。 （这是我到目前为止编码的内容......）

Public Class Form1
    Dim Cards(4) As PictureBox
    Dim Hand(4) As Integer
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Creat_poker()
    End Sub


    Private Sub Creat_Poker_interface()
        Dim i As Integer
        For i = 0 To pic.GetUpperBound(0)
            Cards(i) = New PictureBox

            With Cards(i)
                .Visible = True
                .Width = 130
                .Height = 200
                .Left = 20 + (i * 160)
                .Top = 20
                .BorderStyle = BorderStyle.Fixed3D
                .SizeMode = PictureBoxSizeMode.StretchImage

            End With
            Me.Controls.Add(pic(i))


            AddHandler Cards(i).Click, AddressOf CardsSelection

        Next
    End Sub



    Private Sub cmdNewGame_Click(sender As Object, e As EventArgs) Handles cmdNewGame.Click
        Dim i As Integer
        Dim hasard As New Random
        For i = 0 To main.GetUpperBound(0)
            Hand(i) = hasard.Next(52)

        Next

        For i = 0 To main.GetUpperBound(0)
            Cards(i).Image = imaCards.Images(Hand(i))
        Next

    End Sub
End Class