Imports System
Public Class MainClass
Shared Sub Main()
Dim dteData As Date
'Get the current date and time
dteData = Now
System.Console.WriteLine("Weekday name: " & dteData.ToString("dddd"))
System.Console.WriteLine("Month name: " & dteData.ToString("MMMM"))
End Sub
End Class