一个文本框，一个FileListBox，
在文本框内输入一个文件夹的路径，FileListBox里就会显示该文件夹内的文件，若文本框内输入的路径不正确、不存在、或不是路径，则FileListBox内无内容
VB高手来看看这个程序怎么写
答案:3 悬赏:0 手机版
解决时间 2021-08-24 02:05
- 提问者网友：寂寞撕碎了回忆
- 2021-08-23 03:02
最佳答案
- 五星知识达人网友：酒安江南
- 2021-08-23 04:38
Private Sub Command1_Click()
On Error GoTo 1
File1.FileName = "*.*"
File1.Path = Text1.Text
Exit Sub
1: File1.FileName = "*.adfsaf" '清除内容-.-
End Sub
On Error GoTo 1
File1.FileName = "*.*"
File1.Path = Text1.Text
Exit Sub
1: File1.FileName = "*.adfsaf" '清除内容-.-
End Sub
全部回答
- 1楼网友：七十二街
- 2021-08-23 06:48
用UltraEdit打开
- 2楼网友：廢物販賣機
- 2021-08-23 05:49
Private Sub Text1_Change()
File1.Path = Text1.Text
End Sub
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯