some more code

Public Class Form1
    Dim x As Integer
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Dim x, y As Single
        x = 3.1
        y = 8
        ' Debug.Print(FormatNumber(x, 2))
        Debug.Print(String.Format("Your number, {0}, is {1}. Thanks for playing. Again, that number was {0,-15}.", FormatCurrency(x, 2), y))
    End Sub

    Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Button1.ImageIndex = 1

    End Sub

    Private Sub Button12_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button12.Click

        Button12.ImageIndex = Button12.Tag
    End Sub

    Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
        Button6.Visible = False
    End Sub
End Class