vba - Excel VBA-使用来自数组的数据获取空白消息框

我将得到一个数组的空白消息框，该框应自动具有并显示以下值：

00:00:00

01:00:00

02:00:00
等等...

这是我的代码

Dim i As Integer
i = 0

Dim sampleArr(0 To 24) As Variant
Dim a As Integer
a = 0

Do Until i > 23

    sampleArr(a) = i & ":00:00"
    a = a + 1
    i = i + 1

    MsgBox sampleArr(a)
Loop

请告诉我这段代码有什么问题

最佳答案

在增加Msgbox和a之前，先放置i。

MsgBox sampleArr(a)
a = a + 1
i = i + 1