VB 提示下标越界

--------------------编程问答-------------------- 不好调试，是不是你的调用DrawAmplitudes的代码本身的问题 --------------------编程问答-------------------- 你的data()数组根本就没有初始化过 --------------------编程问答--------------------

引用 2 楼  的回复:

你的data()数组根本就没有初始化过

ReDim data(12345) --------------------编程问答-------------------- For k = k To k + lngPoints - 1
改成：
For k = x To x + lngPoints - 1

补充：VB ,  基础类