Распечатать массив в VBA, используя функцию MsgBox

Question

Я обычно не использую VBA, но просто пытаюсь дважды сравнить некоторые значения с чем-то, поэтому я был бы очень признателен за помощь.

Я пытаюсь создать и напечатать массив, используя функцию MsgBox.Массив создается и заполняется внутри цикла for, который выполняет некоторые вычисления.

Dim NormalLeafDoseVals(0 To 30) As Double
        Dim i As Long
        NormalLeafDoseVals(i) = dCurrRdgI
        i = i + 1

Поэтому каждый раз, когда происходит вычисление, я хочу добавить новое значение в этот массив с именем NormalLeafDoseVals.Затем, после цикла for, я хочу увидеть весь массив, поэтому я поставил:

MsgBox ("Normalised Leaf Dose Values: " & NormalLeafDoseVals())

И появившееся сообщение об ошибке говорит «Несоответствие типов» и выделяет амперсанд перед NormalLeafDoseVals ().

Помощь будет высоко ценится.

Answer 1

Я изменил объявление на Variant и использовал функцию соединения:

Dim NormalLeafDoseVals(0 To 30) As Variant
    Dim i As Long
    NormalLeafDoseVals(i) = dCurrRdgI
    i = i + 1
MsgBox ("Middle Leaf Dose Value: " & dLeaf20RdgI & Chr$(13) & "Normalised Leaf Dose Values: " & vbLf & Join(NormalLeafDoseVals, vbLf))