如何读取txt数据到 ListView1里

Question

如何读取txt数据到 ListView1里?我想把下面的文本读取到ListView1里(ListView1为2列),txt里的数据如下:baba    //爸爸
mama    //妈妈
yeye    //爷爷
nainai  //奶奶然后第一列读取上面的拼音,,第二列读取"//"后面的文字,多少行要看txt里的数据.....代码要怎么写?谢谢了..

Answer 1

Private Sub Form_Load()
ListView1.View = lvwReport
For i = 1 To 5
ListView1.ColumnHeaders.Add , , "第" & i & "列"
Next
Open "C:\1.txt" For Input As #1
Do Until EOF(1)
Line Input #1, nextline
j = j + 1
S = Split(nextline, "//")
ListView1.ListItems.Add , , Trim(S(0))
ListView1.ListItems(j).ListSubItems.Add , , Trim(S(1))
   Loop
 Close #1
End Sub