Option Strict OnImports System.GlobalizationPublic Module WeekdayNameFunction Public Sub Main() Dim birthday As Date = #07/28/1993# Console.WriteLine(WeekdayName(Weekday(birthday), True)) End SubEnd Module Wed