[求助]关于动态数组的赋值问题

hchm

    大家新年好！有一个问题向大家请教。

   我想画一条多段线，线外形为W形（只是W的弯折次数不固定，假设次数i=7，起点0，0；振幅为5）。

Dim  wzcs  As Double'弯折次数

wzcs =7

Dim ddx(1, 3 * wzcs) As Double'多段线数组

创建数组来表示每一个点的坐标，怎样给这个动态数组的每一维赋值？

请给个例子，谢谢！