VB.net数组赋初值！

dim a as string

创新互联是专业的望花网站建设公司，望花接单;提供网站建设、成都做网站,网页设计,网站设计,建网站,PHP网站建设等专业做网站服务;采用PHP框架,可快速的进行望花网站开发网页制作和功能扩展;专业做搜索引擎喜爱的网站,专业的做网站团队,希望更多企业前来合作!

dim b() as string

dim i as integer

a="abc"

redim b(4)

for i=0 to 4

b(i)=a

next

vb如何为数组赋初值

2种方法

1. 直接赋值，此法只适合和小数组

Dim myArray() as Integer ={1,2,3,4,5}

或Dim myArray(5)as integer

myArray(0)=1

myArray(1)=2

myArray(2)=3

myArray(3)=3

myArray(4)=5

myArray(5)=6

2.最常用的for next循环赋值

Dim myArray()as integer

For intCount as Integer= 0 to 5

myArray(intCount)=你要赋值的东西

Next

如果你要每个都不同那就这样：

Dim myArray()as integer

Dim FuZhi as integer

For Fuzhi as 0 to 5

For intCount as Integer= 0 to 5

myArray(intCount)=fuzhi

Next intCount

Next fuzhi

VB中给数组元素赋初值

For i =1 To 10

A(i)=0

Next i

就是先让i等于1，，然后执行A(1)=0，遇到Next i，就自动给i加1，i 变成2，回到上面，未超过10，就再执行A(2)=0，如此这般，一直执行到A(10)=0，自动给i加1，i 变成11，再回到上面，已超过10，就不再执行循环体。继续执行Next i这个语句后面的语句（如果还有的话）。

至于Picture1.print a(i);'''';，这是在打印a(i)后不换行，再打印一个" "，这里面不是什么也没有，而是有一个空格。printf语句后面的分号表示打印后不加入其它内容，下一次紧接着输出其它的内容。