关于array的问题，晕死了

Question

大家不要问为什么这样做，因为不这样做这个数据写不进去c=array(".asp,C:\WINNT\System32\inetsrv\asp.dll,1,GET,HEAD,POST,TRACE",".asa,C:\WINNT\System32\inetsrv\asp.dll,1,GET,HEAD,POST,TRACE")这样是能写进去的现在我有一个数组，其中包括许多数据必须写到c里面去，如果c中预定义的是两个数，那么也只能修改2个数，现在的这个数组可能有n个，怎么写进去了
只能用array()才可以啊
大家求命

Answer 1

Dim c() As String
Dim i As Integer
Redim c(10) '重新分配數組
For i = Lbound(c) To Ubound(c)
    c(i) = string(5,chr$(asc("a")+1))
Next