Private Sub btnButton_Click(ByVal sender As System.Object, _
End Sub
    ByVal e As System.EventArgs) Handles btnButton.Click
Private Sub btnButton_Click(ByVal sender As System.Object, _
    txtNumberOfClicks.Text = txtNumberOfClicks.Text + 1
    ByVal e As System.EventArgs) Handles btnButton.Click
End Sub
Public Module Module1
    Public Sub Main()
       System.Console.WriteLine("Hello, World.")
       System.Console.ReadLine()
    End Sub
End Module