我在消息框中显示我的数组输出时遇到问题

Question

我试图显示已在VBA Excel中定义为字符串的数组的输出。但是，我没有得到我想要的输出。这是我的代码：

Sub myArray()
    Dim dayArray(0 To 6) As String
        i = dayArray(i)
        dayArray(0) = "Sunday"
        dayArray(1) = "Monday"
        dayArray(2) = "Tuesday"
        dayArray(3) = "Wednesday"
        dayArray(4) = "Thursday"
        dayArray(5) = "Friday"
        dayArray(6) = "Saturday"
    For i = 0 To 6
        MsgBox "Today is "
    Next
End Sub

我试图根据字符串输出星期几。我怎样才能确保我把这一天当作消息框？

Answer 1

只是为了结束这个问题：

Sub myArray()
    Dim dayArray(0 To 6) As String

    dayArray(0) = "Sunday"
    dayArray(1) = "Monday"
    dayArray(2) = "Tuesday"
    dayArray(3) = "Wednesday"
    dayArray(4) = "Thursday"
    dayArray(5) = "Friday"
    dayArray(6) = "Saturday"

    Dim i as Long
    For i = 0 To 6
        MsgBox "Today is " & dayArray(i)
    Next
End Sub