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