Question

【VB】如何通过单击目录列表框中的文件夹得到该文件夹的名称？该属性是什么？

Answer 1

//这个程序实现的是选中的文件夹的名字在文本框中显示出来
//显示文件夹，Dir1是文件路径控件的名字，Text1是文本框名字
Private Sub Dir1_Change()
Text1.Text = Dir(Dir1.Path, vbDirectory)
End Sub
//切换盘符,Drive1是切换盘符的控件名字
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub

Answer 2

Private Sub Dir1_Click()
Text1.Text = Dir1.List(Dir1.ListIndex)
End Sub