Imports System

Public Module Module1

    Public Sub Main()

        Dim firstValue As Int32 = 5

        Dim secondValue As Int32 = 9

        Dim result As Int32 = SumFunction(firstValue, secondValue)

    End Sub

​

    Function SumFunction(ByVal value1 As Int32, ByVal value2 As Int32) As Int32

        value1 += value2

        value2 += value1

​

        Return value1 + value2

    End Function

End Module