请用vba语言完成以下功能：使用变量和枚举类型，使得弹窗显示星期一至星期日

在VBA（Visual Basic for Applications）中，你可以创建一个枚举类型（Enum）来表示一周中的每一天，并使用变量结合UserForm或MsgBox来显示它们。以下是简单的步骤：

首先，定义枚举类型（Enum）：

Enum WeekDays
    Monday = 1
    Tuesday = 2
    Wednesday = 3
    Thursday = 4
    Friday = 5
    Saturday = 6
    Sunday = 7
End Enum

然后，你可以创建一个变量存储当前的星期，并在需要的时候使用它：

Dim currentDay As WeekDays
currentDay = WeekDays.Monday ' 可以根据实际更改这行

' 使用Enum值创建一个字符串数组来展示星期名
Dim daysOfWeek(WeekDays.Sunday) As String
daysOfWeek(WeekDays.Monday) = "星期一"
' ... (依此类推，直到周日)

' 显示星期
MsgBox "今天是：" & daysOfWeek(currentDay)

最后，在UserForm上添加控件如Label，通过属性设置其文本为对应的星期名称也可以达到同样的效果。