"2002", 75 "英语" "2003", 92 "体育" "2004", 66 Type bs aa As String * 2 bb As String * 4 cc As Integer End Type Private Sub command1_Click(Dim xs As bs Dim fl As Integer fl = FreeFile Open "d:\data.txt" For Input As fl Do While Not EOF(fl) Input fl, xs.aa, xs .bb, xs.cc List1.AddItem xs.bb List1.AddItem xs.aa List1.AddItem xs.cc Loop Print EOF(fl) Close End Sub 问:在列表框中第一行、第三行、第四行的内容是【 】、【 】、【 】。窗体上打印出的是【 】。