VB 文件列表控件问题

可以和普通列表框一样操作的..当你的File1得到显示的有文件的话,可以使用下面的代码读取并添加到list1中.

For i = 0 To File1.ListCount - 1
List1.AddItem (File1.List(i))
Next

试试以下代码:
点击文件列表框中的任一文件名,即可在msgbox中显示.

Private Sub File1_Click()
MsgBox File1.List(File1.ListIndex)
End Sub