我怎么能简单地调查给定数组中的项目数。我用了这个代码，但是有点费力
myArr=Array("frog", "cat", "bat", "rat", "horse")
for i=0 to UBound(myArr)
' Msgbox i +1 & ".item: " & myArr(i)
next
Msgbox i & " items in this array:" & vbcrlf & Join(myArr)
谢谢