VB如何将记事本的内容写入列表框中

VB怎么将记事本的内容写入列表框中
我想把记事本中的每行字符串作为列表框中每一项的内容，有没有高手指点下！

[解决办法]

VB code

Private Sub Form_Load()Dim i Open "c:\1.txt" For Input As #1Do Until EOF(1)Line Input #1, nextlineList1.AddItem nextline  Loop Close #1End Sub