Imports System
Imports Microsoft.VisualBasic
Class Sample
Public Shared Sub Main()
Console.WriteLine(Console.Title)
Console.ReadKey(True)
Console.Title = "The title has changed!"
Console.WriteLine(Console.Title)
Console.ReadKey(True)
End Sub 'Main
End Class 'Sample