怎樣將文本中的內容添加到列表框(ListBox)中

Open "e:\Test.txt" For Output As #1  '盘符依您的而定
  Dim  LineStr As String   Do Until EOF(1)
   Line Input #1, LineStr
   list1.additem linestr             
   Loop
Close #1您自己试试吧！！！！！！