中易网

vb 列举一个文件夹下所有.txt文件名称

答案:2  悬赏:30  
解决时间 2021-02-21 04:23
vb 列举一个文件夹下所有.txt文件名称
最佳答案
Private Sub Form_Load()
Dim strFile As String
List1.Clear
strFile = Dir("E:/编程代码/*.txt")
Do Until strFile = ""
List1.AddItem strFile
strFile = Dir
Loop
End Sub
全部回答
在窗体的LOAD事件中加载一个文件控件: Private Sub Form_Load() File1.Path = App.Path & "\指定文件夹" '指定一个文件夹 File1.Pattern = "*.TXT" '指定文件类型 End Sub
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
如果有一辆马车,车上拉着公主和王子,请问这
兄弟串吧在什么地方啊,我要过去处理事情
旺季的菜作文怎么写呢?老师真麻烦
小学四年级450字作文《值得赞扬的人》
郑州陈寨什么时候拆,买的陈寨村里的房,没有房
老王寨山这个地址在什么地方,我要处理点事
到哪里买海龙鲈鱼料
猫咪不吃不喝一直吐还不拉不尿还嗯嗯叫很难受
煌亭茶楼地址在什么地方,想过去办事
连云港海鑫建筑装饰工程有限公司地址在什么地
请问内核级木马是什么东东啊?说详细点,我是
dnf小号怎么打艾肯
昆明买衣服地方
天天发超市(南三段)我想知道这个在什么地方
为什么我的唱吧作品分享到空间和微博上后都无
推荐资讯
如何将图片转换为图标文件
苦瓜水的做法,苦瓜水怎么做好吃,苦瓜水的家
超越砂锅麻辣烫武川店地址在什么地方,想过去
老五全羊馆地址有知道的么?有点事想过去
我有条4个多月的黑背犬,吃、喝、精神面貌、
西小楼村这个地址在什么地方,我要处理点事
28岁了,想转做技术,不想做业务了,很迷茫
美团用户名忘了怎么办?
世硕电子自离多了会不会拉黑
全国有多少余俊辰
函数atoi()有什么用处,他的头文件是什么?它
芸字和华字的个性签名
手机登qq时,显示手机磁盘不足,清理后重新登
刺客的套装怎么选啊?