' This example demonstrates the Console.Title property.
Imports System
Imports Microsoft.VisualBasic
Class Sample
Public Shared Sub Main()
Console.WriteLine("The current console title is: ""{0}""", Console.Title)
Console.WriteLine(" (Press any key to change the console title.)")
Console.ReadKey(True)
Console.Title = "The title has changed!"
Console.WriteLine("Note that the new console title is ""{0}""" & vbCrLf & _
" (Press any key to quit.)", Console.Title)
Console.ReadKey(True)
End Sub 'Main
End Class 'Sample
'
'This example produces the following results:
'
'>myTitle
'The current console title is: "Command Prompt - myTitle"
' (Press any key to change the console title.)
'Note that the new console title is "The title has changed!"
' (Press any key to quit.)
'