vb.net Weekday实例代码

下面是一个使用 VB.NET 中的 Weekday 函数的示例代码：

Dim dateValue As DateTime = #9/1/2021#
Dim weekdayValue As Integer = Weekday(dateValue)

Select Case weekdayValue
    Case 1
        Console.WriteLine("Sunday")
    Case 2
        Console.WriteLine("Monday")
    Case 3
        Console.WriteLine("Tuesday")
    Case 4
        Console.WriteLine("Wednesday")
    Case 5
        Console.WriteLine("Thursday")
    Case 6
        Console.WriteLine("Friday")
    Case 7
        Console.WriteLine("Saturday")
End Select

在此示例中，我们创建了一个 DateTime 对象 dateValue，并将其设置为 2021 年 9 月 1 日。然后，我们使用 Weekday 函数来获取日期的星期几，并将结果存储在 weekdayValue 变量中。最后，我们使用 Select Case 语句将星期几转换为对应的字符串，并将其输出到控制台。在此示例中，输出将是 "Wednesday"，因为 2021 年 9 月 1 日是星期三。