2015-01-16 143 views
0

所以我试图从文本文件填充数组。我使用的是Visual Basic(一年以来我一直没有涉及,并且高中课程的知识水平非常有限)。我正在阅读文本,并且试图将其从各种其他资源中放入数组中,除了数组没有被真正读取。文本文件中的最后一个值是存储的值,我不确定如何修复它。下面是代码我迄今:从文本文件填充数组

Dim sr As New StreamReader("text file location")  
Dim words(292) As String 
Dim text as String = "" 
Dim i As Integer = 0 
    Do Until sr.Peek = -1 
     text = sr.ReadLine() 
     words(i) = text 
     lstWords.Items.Add(words(i)) 
    Loop 

我是新来的StackOverflow的社区,并会喜欢任何人一些帮助,是谁能够给它!先谢谢你!

回答

1

你这样做很难。试试这个:

Dim words() As String = File.ReadAllLines("text file location") 

而且因为你加载一个列表框:

lstWords.Items.AddRange(File.ReadAllLines("text file location")) 
+0

真棒,太感谢你了!我将如何参考数组中的单词之一?如果我正在循环某些内容,它会不会仅仅是单词(i)? – EvjFrank

+0

'单词(i)'会起作用。如果你使用第二个选项,'lstWords.Items(i)' –

+0

你是一个拯救生命的人,非常感谢你。我必须逐个遍历列表框中的每个单词,我是否必须通过计时器来设置它?我现在已经安装好了,除了在循环中从头到尾快速完成。任何想法为什么? – EvjFrank