如何把某个目录下的所有文件列表显示在文件管理控件中，双击可以对应打开 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

如何把某个目录下的所有文件列表显示在文件管理控件中，双击可以对应打开

麻烦老师指导下谢谢！

FileManager1没有绑定任何字段哦

当前窗体为：

此主题相关图片如下：1.png

当前代码如下：

Dim wenjian As WinForm.TextBox = e.Form.Controls("目标位置")

'选择目录

Dim dlg As New FolderBrowserDialog

If dlg.ShowDialog = DialogResult.Ok Then

wenjian.text= dlg.SelectedPath

Dim fl As WinForm.FileManager = e.Form.Controls("FileManager1")

For Each File As String In FileSys.GetFiles(wenjian.text)

fl.AddFile(File)

End If

运行效果如下：

此主题相关图片如下：2.png

[此贴子已经被作者于2021/7/9 16:25:21编辑过]

主题：如何把某个目录下的所有文件列表 显示在文件管理控件中，双击可以对应打开