怎么将字符串：1529.004,1559.952,0.000,0.000,0.000,0.000,0.000,0.000,0.000,0.000,0.000,0.000
转换为浮点型数组？

列如：dim a() as float

预期效果：a(0) = 1529.004
          a(1) = 1559.952
          .
          .

dim a() as single,b() as string,c as string,i as integer
c="1529.004,1559.952,0.000,0.000,0.000,0.000,0.000,0.000,0.000,0.000,0.000,0.000"
b=split(c,",")
redim a(ubound(b))
for i=0 to ubound(b)
  a(i)=val(b(i))
next

搞定，多谢版主