Data Type VB.Net Tutorial

  1. Home
  2. VB.Net Tutorial
  3. Data Type
  4. Pass Integer to a function by value
Module Module1
    Sub NoChangeToParameter(ByVal A As Integer)
        A = 1001
        Console.WriteLine("Value of A in subroutine " & A)
    End Sub
    Sub Main()
        Dim Number As Integer = 100
        Console.WriteLine("Number before function call: " & Number)
        NoChangeToParameter(Number)
        Console.WriteLine("Number before function call: " & Number)
    End Sub
End Module
Number before function call: 100
Value of A in subroutine 1001
Number before function call: 100