5.4    数组的基本操作

1．   给数组元素赋初值

　　（1） 利用循环结构

　　　　例：Dim  iA（1 To 10） As Integer
　　　　　　 For i=1 To 10
　　　　　　　　　A(i)=0
　　　　　　 Next i

　　（2） 利用Array函数

　　　　例：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

2．数组的输入

　(1) 通过InputBox函数输入适合输入少量数据。

　　　例：Dim  sB（3,4） As singer
　　　　　　 For i=0 To 3
　　　　　　 For j=0 To 4
　　　　　　　 SB(i,j) =InputBox("输入" & i & j & "的值")
　　　　　　　 Next j
　　　　　　 Next i

　(2) 通过文本框控件输入

  　　对大批量的数据输入，采用文本框和函数split()/join()进行处理，效率更高。