' FunctionTrace Example

' Construct the program trace and predict the output.

Imports System.Console
Public Module Module1

    Public Sub Main()
        Dim a As Integer = 1

        WriteLine(F(a + 2) + 1)
        WriteLine(F(a + 1) + 2)
        ReadLine()
    End Sub

    Public Function F(ByVal n As Integer) As Integer
        Dim s As Integer = 5
        Dim t As Integer = 7

        t += s * n + 1
        Return s + t
    End Function
End Module