我目前正在读取文件的数据并将其拆分为 2 个数组(名称和年龄)。我将它们都创建为未知大小的数组。这是因为我可能会向数据文件添加行,但是如果我以这种方式(e.g.name())将它们变暗,则会发生错误。但是,我不确定在这种情况下如何使用ReDim。
Dim o As Integer
Dim name() as string
Dim age() as integer
r = New System.IO.StreamReader("C:Usersfilesnames.txt")
While r.Peek() <> -1
v = r.ReadLine()
temperary = v.Split(".")
name(o) = temp(0)
age(o) = temp(1)
o = o + 1
End While
r.Close()
Catch ex As Exception
Me.Close()
End Try
你不需要ReDim
,使用List(Of String)
,如果你最终需要一个数组,请使用ToArray
:
Dim names As New List(Of String)
Dim ages As New List(Of String)
r = New System.IO.StreamReader("C:Usersfilesnames.txt")
While r.Peek() <> -1
v = r.ReadLine()
temp = v.Split(".")
names.Add(temp(0))
ages.Add(temp(1))
o = o + 1
End While
' if you need arrays use names.ToArray() and/or ages.ToArray()
但是我会改用List(Of User)
,其中User
是您必须创建的类,该类至少具有两个属性Name
和Age
。