Public Class Form1
    Inherits System.Windows.Forms.Form

    'Here is two different ways to use procedures...

    Dim mySum1 As Integer
    Dim mySum2 As Integer
    Dim X As Integer

    'Part I''''''''''''''''''''''''''''''
    'uses a procedure without arguments
    Private Sub myProc1()
        mySum1 = X + 5              'add X with 5 and set answer in mySum1
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles Button1.Click
        X = 5                       'set X = 5
        myProc1()                   'then call our procedure myProc1
        TextBox1.Text = mySum1      'write mySum1
    End Sub
    'END Part I''''''''''''''''''''''''''

    'Part II'''''''''''''''''''''''''''''
    'uses a procedure with arguments
    Private Sub myProc2(ByVal Y As Integer)
        mySum2 = Y + 5
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles Button2.Click
        myProc2(5)                  'call our procedure myProc2 with inparameter 5
        TextBox2.Text = mySum2      'write mySum2
    End Sub
    'END Part II'''''''''''''''''''''''''

End Class