查看赋值的数组

mengjianyong

各位大神，最近在学习VBA，遇到一些菜鸟问题，烦大神给指点下迷津。

我定义了个动态数组，数组大小以A列非空单元的数组的最大索引，把A列的数据给数组赋值，
接着我想查看 数组的数据，想确认下赋值是否成功，该用哪个命令呢？

Sub ex()

Dim a
a = Application.WorksheetFunction.CountA(Range("a:a"))

Dim arr()
ReDim arr(1 To a)

Dim i As Integer
For i = 1 To a Step 1
     arr(i) = Cells(i, 1)
Next i

MsgBox arr(5)
Debug.Print arr(5)

End Sub

mengjianyong

除了 把数组写出来，还有其他办法 直接查看么？

shiruiqiang

本地窗口 f8

mengjianyong

shiruiqiang 发表于 2023-7-4 19:41
本地窗口 f8

我打开了本地窗口，貌似里面没有内容显示，
运行了代码，本地窗口没有看到内容。

shiruiqiang

taller

沈默00

跳到下一句的时候就可以查看了，本地窗口是我们这样菜鸟必须经历的初级阶段

边缘码农

在Next i 这一句下面加一句stop