1. 給數(shù)組元素賦初值
(1) 利用循環(huán)結構
例:Dim iA(1 To 10) As Integer
For i=1 To 10
A(i)=0
Next i
(2) 利用Array函數(shù)
例: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.數(shù)組的輸入
(1) 通過InputBox函數(shù)輸入適合輸入少量數(shù)據(jù)。
例: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) 通過文本框控件輸入
對大批量的數(shù)據(jù)輸入,采用文本框和函數(shù)split()\join()進行處理,效率更高。
(1) 利用循環(huán)結構
例:Dim iA(1 To 10) As Integer
For i=1 To 10
A(i)=0
Next i
(2) 利用Array函數(shù)
例: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.數(shù)組的輸入
(1) 通過InputBox函數(shù)輸入適合輸入少量數(shù)據(jù)。
例: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) 通過文本框控件輸入
對大批量的數(shù)據(jù)輸入,采用文本框和函數(shù)split()\join()進行處理,效率更高。