'读文件
Dim mysr As StreamReader
Dim strline As String
Dim mystr As String()
Dim jg(10, 10) As String
mysr = New StreamReader("e:\mydata.txt", System.Text.Encoding.Default)
While (Not mysr.EndOfStream)
strline = mysr.ReadLine()
mystr = strline.Split(New Char() {":", ","})
inputnums.Add(mystr)
End While
'取值,取arraylist中的存放的字符串数组
For temp1 = 0 To inputnums.Count - 1
For temp2 = 1 To TryCast(inputnums.Item(temp1), String()).GetUpperBound(0)
'inputnums.Item(temp1)(temp2)为每行字符串数组的每个元素
Next
Next
arraylist可以理解为一个容器,在上面,我们读入一个文本文件,文本文件中每行以:和,分隔每个元素
我们每读入一行,就把这一行做为字符串的一维数组加入arraylist中,arraylist的add方法可以加入任何元素,包括数组引用、字符串、对象等等