Gamble: Higher or Lower?

I guess some people know this little game...

Code:

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       
        Dim spin As String = Int(Rnd() * 12)
        Label9.Text = Label1.Text
        Label1.Text = spin

        If Label9.Text > Label1.Text Then
            Label6.Text += Int(1)
        Else
            Label5.Text += Int(1)
        End If
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
       
        Dim spin As String = Int(Rnd() * 12)
        Label9.Text = Label1.Text
        Label1.Text = spin

        If Label9.Text < Label1.Text Then
            Label6.Text += Int(1)
        Else
            Label5.Text += Int(1)
        End If
    End Sub
End Class

You may need to alter the label name, for example, instead of Label1.Text, MyLabel.Text

This topic shouldn't be in Game Development, if it was a complete how to on making a game, it would be in tutorials, you should put all the program files up for download.

MOVED TO CODE VAULT