Vb.net 文本文件未将信息加载到列表框中

我试图将文本文件中的内容放入

列表框

，但无法使其正常工作。不过，它可以与文本框配合使用

Private Sub btnLoad_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnLoad.Click      
Dim filename As String  
        Dim recipereader As StreamReader  
        ofdLoad.ShowDialog()      
        filename = ofdLoad.FileName
        If filename <> "" Then  
            recipereader = File.OpenText(filename)  
            ListBox1.Text = recipereader.ReadToEnd  
            recipereader.Close()  
        End If  
    End Sub  
End Class

Private Sub btnLoad\u Click（ByVal sender作为System.Object，ByVal e作为System.EventArgs）处理btnLoad。Click
将文件名设置为字符串
Dim RecipereReader作为StreamReader
ofdLoad.ShowDialog（）
filename=ofdLoad.filename
如果文件名为“”，则
recipereader=File.OpenText（文件名）
ListBox1.Text=recipereader.ReadToEnd
RecipereReader.Close（）
如果结束
端接头
末级

---

我缺少什么？

文本指的是完全不同的内容，但要将项目添加到列表框中，您必须使用：

Listbox.items.add（您的项目）

将

ListBox1.Text=recipereader.ReadToEnd

更改为

ListBox1.Items.Add（recipereader.ReadToEnd）

。请记住，这将在一个列表框项目中添加所有文本