Question

vb.net如何将一个字符串中的字符一一对应的赋值给数组

Answer 1

dim a() as string
dim s as string="abcdefghijkl1234567890"
redim a(len(s))
for i=1 to len(s)
    a(i)=mid(s,i,1)
next i