Question

VB中给数组元素赋初值

书上这个例子不明白

Dim iA(1 To 10) As Integer
For i =1 To 10
A(i)=0
Next i
这道题怎么理解啊，能不能把每一个步骤都讲的详细一点啊，才接触vb所以很多还不太懂 谢谢
还有利用Array函数 也完全看不懂 为什么出现‘’ ‘’，然后里面什么都没有
Dim a As Variant,b As Variant,1%
a=Array(1,2,3,4,5)
b=Array(''abc'',''def'',''67'')
For i=0To Ubound(a)
Picture1.print a(i);'''';
Next i
For i =0 To UBound(b)
Picture1.print b(i);'''';
Next i

Answer 1

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语句后面的分号表示打印后不加入其它内容，下一次紧接着输出其它的内容。

Answer 2

1、vb6定义数组时不需要人为初始化数组，它会自动把数值型数组的每个元素初始化为0，把字符串数组的每个元素初始化为空串。
2、如果你想象C语言一样初始化，只能对variant类型的数组以以下方式赋值：
Dim MyWeek
MyWeek = Array("Mon", "Tue", "Wed", "Thu", "Fri", "Sat", "Sun")
3、variant类型数组和字节数组以外的其它类型数组只能一个一个赋值，或用循环赋值。

Answer 3

    Dim A(1 To 10)  As Integer  '定义整形数组A，数组A包含A(1)-A(10)共10个元素。
                                '他的最小下标1（下界），最大下标10(上界)。
                                '可分别用lbound、ubound两个函数获取
                                
    For i = 1 To 10             '从A(1)-A(10)赋值0给这10个元素，可在A(i) = 0下面加print a(i) 打印出来
        A(i) = 0
        Print A(i)
    Next i
    

Dim a As Variant, b As Variant, i%
a = Array(1, 2, 3, 4, 5)
b = Array("abc", "def", "67")
For i = 0 To UBound(a)
    Picture1.Print a(i); '''';
Next i
For i = 0 To UBound(b)
    Picture1.Print b(i); '''';
Next i

'1% 应为i% ，意思是定义i 为 整形 ,同dim i as integer
'b=Array(''abc'',''def'',''67'') 中的''abc''应该为"abc",英文的双引号，下同
'UBound函数的作用上面说过了,不明白就去百度百科看
'Picture1.Print a(i)是在Picture1控件上打印出a(i）的值

有问题请追问，满意请采纳，新年快乐！加油！