关于VB读取文件夹里的TXT文件后，单击鼠标就可以打开指定的txt. - VB6论坛

编程论坛 → 开发语言 → 『 VB6论坛』 → 关于VB读取文件夹里的TXT文件后，单击鼠标就可以打开指定的txt.

标题：关于VB读取文件夹里的TXT文件后，单击鼠标就可以打开指定的txt.

只看楼主

事业男儿

等　级：论坛游民
帖　子：308
专家分：14
注　册：2007-4-25
结帖率：81.69%

楼主

已结贴√ 问题点数：20 回复次数：3

关于VB读取文件夹里的TXT文件后，单击鼠标就可以打开指定的txt.

Private Sub Form_Activate()
    Dim sFile As String
sFile = Dir("f:\*.txt", 31)
    While sFile <> ""
        Print sFile
        sFile = Dir
    Wend
End Sub
上面是一个关于读取F盘里的txt文件的代码，怎么修改后才可以单击窗体上的某个文件就可以实现打开txt文件呢？

搜索更多相关主题的帖子: 鼠标　文件夹　

2012-05-21 16:43

wube

等　级：贵宾
威　望：23
帖　子：1817
专家分：3681
注　册：2011-3-24

第 2 楼

得分:20

"怎么修改后才可以单击窗体上的某个文件就可以实现打开txt文件呢？"
DriverListBox + DirListBox + FileBox + Shell
.....
OpenDailog
.....
BowerDailog(VB6要自己写) + FileBox + Shell
.....
List Control(MFC的VB6不知道有没有这东西)
.....
Win32 Function
.....
FSO
.....
API
.....
方法太多了...