文件列表框中文件的内容为什么不在文本框中显示？
以下这段代码所完成的驱动器，目录和文件列表框操作中文件列表框中的内容为什么不能在text1中显示呢？（控件都加了）Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub
Private Sub File1_Click()
ChDrive Drive1.Drive
ChDir Dir1.Path
Text1.Text = ""
Open File1.FileName For Input As #1
b = ""
Do Until EOF(1)
Line Input #1, nextline
b = b & nextline & Chr(13) & Chr(10)
Loop
Close #1
Text1.Text = b
End Sub
谢谢帮助！
