在VB中，Weekday函数用于获取指定日期的星期几。它的用法如下：
Weekday(date[, firstdayofweek])
其中，date是要获取星期的日期，可以是一个日期值或者一个表示日期的字符串；firstdayofweek是可选参数，用于指定每周的第一天是星期几。
Weekday函数返回一个整数值，代表指定日期的星期几。返回值的范围是1到7，其中1表示星期日，2表示星期一，以此类推，7表示星期六。
以下是几个示例：
示例1：获取当前日期的星期几 Dim today As Date today = Date.Today Dim weekday As Integer weekday = Weekday(today) MsgBox(“今天是星期” & weekday)
示例2：获取指定日期的星期几 Dim dateStr As String dateStr = “2022/01/01” Dim dateValue As Date dateValue = Date.Parse(dateStr) Dim weekday As Integer weekday = Weekday(dateValue) MsgBox(dateStr & " 是星期" & weekday)
示例3：指定每周的第一天为星期一 Dim dateStr As String dateStr = “2022/01/01” Dim dateValue As Date dateValue = Date.Parse(dateStr) Dim weekday As Integer weekday = Weekday(dateValue, vbMonday) MsgBox(dateStr & " 是星期" & weekday)
注意：在VB中，星期的起始值由系统的区域设置决定，如果没有指定firstdayofweek参数，则默认按照系统设置来计算星期。
