' Visual Basic 2008 9.0 .NET Examples - Arguments - ByVal and ByRef - Procedures and Functions : 
Module Example3
    Sub Main()
        ShowMenuError()
        '
        Example2.ShowError("message 1")
        '
        Dim someMessage As String = "message 2"
        Example2.ShowError(someMessage)
        '
        Example2.ShowError("message" & " " & "3")
        '
        Example2.ShowError(Console.ReadLine())
        '
        Console.ReadLine()
    End Sub
End Module
' Visit www.studyvb.com for more examples.  Copyright 2003-2008 De Wolf.