说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

VB如何用Dir()函数来列出C下所有TMP文件并且用文本框输出

HTML文档下载 WORD文档下载 PDF文档下载
VB如何用Dir()函数来列出C下所有TMP文件并且用文本框输出
问题: 如何用Dir()函数列出C:\下所有*.TMP文件,并且用文本框输出?
  答:下面是一个列出指定目录下所有符合要求的文件名的函数:
  Public Function AutoListFiles(ByVal sDirName As String,ByVal FileFilter As String ) As Boolean
  On Error GoTo RF_ERROR
  Dim sName As String, sFile As String, sExt As String
  Dim sDirList() As String, iDirNum As Integer, i As Integer
  ′首先枚举所有文件
  sFile = Dir(sDirName + FileFilter, vbNormal + vbArchive + vbHidden)
  Do While Len(sFile) >0
  sFile = UCase(Trim(sFile))
  ′在此处可以将 sFile 加入到一个 Text 控件...
  sFile = Dir ′下一个文件
  Loop
  iDirNum = 0
  sName = Dir(sDirName + ″*.*″, vbDirectory + vbNormal)
  Do While Len(sName) >0
  If sName <> ″.″ And sName <> ″..″ Then
  iDirNum = iDirNum + 1
  ReDim Preserve sDirList(1 To iDirNum)
  sDirList(iDirNum) = sDirName + sName + ″\″
  End If
  sName = Dir ′下一个目录
  Loop
  For i = 1 To iDirNum
  AutoListFiles sDirList(i) ′递归调用
  Next
  End If
  RF_EXIT:
  AutoListFiles = True
  Exit Function
  RF_ERROR:
  MsgBox Err.Description, vbCritical, ″″
  Resume RF_EXIT
  End Function
  调用上述函数的示例:
  AutoListFiles(″C:\″,″*.TMP″)
  之所以采用上述先处理文件,再处理子目录,一是思路较清晰,另外也有模仿 Prolog 语言中的“尾递归”的想法,当然,VB中是不支持尾递归的。

云通讯平台打造本土Twilio 被逼无奈?传微软或明年秋发布iOS和Android版Office 欧洲各国政府将向大众开放公共数据 访联想云存储罗予晋:优化MooseFS,共建生态系统 磊友创始人赵霏:关于HTML5与Flash争执之我见 国际混乱C语言代码大赛优胜作品详解之“A clock in one line” 揭秘程序员大脑编程的七大“误区” 从Java到ObjC语言的桥梁:谷歌J2ObjC 0.7版本亮相 数据库管理系统ParElastic:打破常规 扩展云端MySQL 谷歌苹果专利纠纷意在战略无意和解 美法官为其苦恼 Facebook收购神秘移动软件创业公司Osmeta 修改驱动,使用Erlang+VoltDB实现每秒87.7万事务 横评美国IaaS“8匹狼”:AWS、GCE、Azure、Rackspace、SoftLayer、Dell、HP、Joyent 独立游戏精神释放的舞台:IGF China 2013作品火热征集中 三款热门入门级在线编程教程对比 微软modern.IE:网站兼容性测试利器 Localytics:AngularJS代替Backbone 代码减少一半 史上增长最快的SaaS服务Optimizely:13亿访客,10万次测试 IDF上的云计算故事 移动周报:百万年薪、微信疑云,老罗小马本周很忙 一个创业失败者的自述:我是如何搞砸一款产品 收入百万美元:一个放弃上大学的程序员 Cocos2D配Box2D:逆天小白程序员作iOS游戏 招聘移动开发,老板必问的10个问题 黑客用智能手机劫持和控制民航飞机 几小时即可使互联网瘫痪的黑客 现已加入谷歌 Tsar开源:淘宝内部大量使用的系统监控工具 五款超实用的开源SVG工具 微信收费事件背后被广泛忽略的技术细节 UIDesigner 3.0架构设计总结 黑客怒了:政府花930万美金仅做一款App 如何设置一个用户的权限只能访问一个数据库?该用户同时不能有删除、创建数据表的权限? 请问:Java触发的问题(急) 关于ASP的安全和稳定性碰到的一些问题,想和高手们讨论一下 Mysql 的replication sqlanywhere6 建的单机数据库,为什么配完odbc后连接总提示连接错误? 改行了散分散分散分散分散分散分 主板关闭USB设备后不能在启用,是什么问题啊?各位高手望赐教! 关于 request的问题 救救小弟! 用javamail发信为何连不上服务器 请大家评论一下这样的团队有无发展可能 如何加密Access数据库,加密后如何使用?谢谢 关于richtextbox问题 打印问题? 关于SetTransform的问题 还我的硬盘空间——老鸟帮帮我!! XP上使用vc6.0有问题 php程序只能放在linux主机的根目录下吗? 关于程序打包 listbox問題 请教文件 坏了,我的D盘怎么自动产生了一个fc2tr文本 结帖错误 php下的xml问题? 内部网TCP/IP失效问题求解!在线等候 怎样将有scroll的form全部抓成图片?我用GetFormImage只能抓屏幕上显示的部分,请帮我。高分求助!不够再加!! 客户端的函数怎么样用客户端用户输入的信息... 怎样改变MC的颜色。 病毒邮件。请问有什么办法解决 帮帮我这个菜鸟! PCI Device 驱动程序? 救我吧. link的时候提示cannot open file "mfc42u.lib"的问题。怎么解决? 如何才能上网呢 请问如何重绘一个应用程序的窗体或内部 Object 的边缘,就像 SPY++ 的 FindWindow Tool 实现的样式?? 救救我,给100分 NT4.0为主域控制器,有办法降级为独立服务器吗? VBA 如何调用 DotNet's WebService ?? dbexpress为什么在插入带自增长字段时候出错? 为什么不同的查询语句会有不同的效率? 我现在要开发一个游戏大厅,谁能帮我提供一些技术参数>?在线等待。 不是水贴:请求帮助,有上海师范大学的请进 紧急!那位有clearcase winnt 4.2 的注册码,高分相送!!!!! 论坛的表格要在注意什么?《我是个菜》 大家帮忙介绍一本书 帮帮我怎么把系统还原占用的空间还给我——老鸟们帮忙! 过滤问题:Query需要先选择一个表(通过ComboBox)然后从2个Edit内输入两个条件 关于stringgrid的翻页问题 寻找电脑方面的朋友 大家好,帮忙做做这题 大家如何保存自己地提问?? 下列关于燃烧热的说法中正确的是 ( )A.1mol物质燃烧所放出的热量B.常温下,可燃物燃烧放出的热量C.在25℃、1.01×105Pa时,1mol物质燃烧生成稳定的氧化物时所放出的热量D.燃烧热随化学方程式前 甲、乙、丙三人在同一办公室工作,办公室只有一部电话机.设经该机打进来的电话是打给甲、乙、丙的概率...甲、乙、丙三人在同一办公室工作,办公室只有一部电话机.设经该机打进来的电话 美国统一土壤分类法,建筑地基基础设计规范,水电部分类法的异同?在哪 1.蜡烛燃烧属于化学变化.2.蜡烛燃烧既有物理变化又有化学变化1.蜡烛燃烧属于化学变化.2.蜡烛燃烧既有物理变化又有化学变化.两种说法谁对?两种说法的区别是什么? 丝网漏花的工序是怎样的啊,是用什么材料呢.jjj丝网漏花的工序是怎样的啊,是用什么材料呢 co与ch4混合后是什么 怎么检测5号电池的好坏?我的电池每次充满电,用不到2个小时就没电了了,请问各位大虾,怎么知道电池是否坏了?我只有数字万能表,如何检测电池内阻?我有个遥控车,电池使用2个小时,电池没电 什么是氯氟羟?想了解关于该物质的相关内容 天天听英语听力,有什么做用呢?英语差,20题听力只能对9题左右,很多都听不懂,老师说要多听,想知道听多了有什么作用? 这只烟灭了之后,这只烟灭了以后 不要挽留 这次我先走 青春真的 就象一杯酒 你笑着伸出了手 你说珍重 脸上泪残留 你说着关于爱情你猜也猜不透 你说若在相逢 若是问候 就再握握手 我们就 高效氯氟氰菊酯和氯氟氰菊酯是同一种物质吗? 为什么我天天听英语,怎么英语听力还是保持原来的分数呢 烟快灭了用繁体字怎么写 雷锋邱少云董存瑞刘英俊他们都属于军人吗 加成反应一定要写成结构简式吗?反应物和生成物不能写成分子式些化学方程式吗~请说得具体一点 什么是官能团啊~我才高一不太懂~ DNA在10nm纤丝中压缩6倍?怎样算出来的 地震发生时在室内该怎么做,楼上跟楼下哪个安全些?虽然地震过去了 ·但是还是想了解下 ·以前这方面知识不是太了解 天天听听力,真的会聋吗? 森氏纯净水好吗?他的弱碱水怎么样?本来想喝纯净水的,但他的纯净水桶实在是太脏了,所以改喝弱碱水了? 发地震时,是居住楼上的人安全,还是居住楼下的安全? 二氟化氧的化合价是怎样的?是不是氧是-2价,氟是+1?还是氟是-1哦? 烟灰飞灭是什么意思 邱少云像千斤巨石一般趴在火堆里一动也不动.如何缩句?说明病因和理由 底面积为S的圆柱形容器盛有V升水,容器最底部有一直径为D的小孔,求水流完所用时间t? 森乐净水器怎么样 为了整个班,为了整个潜伏部队,为了这次战斗的胜利,邱少云趴在堆里一动也不动.仿写 将一底部有细孔的试管插入盛水的容器中,容器的水由试管底部小孔喷入试管,喷出水的高度与容器水面比谁高 马腾与韩遂的关系怎么样啊书上说他俩的关系很复杂,还有马腾他儿子马超和韩遂的关系怎么样?别贫一堆,简短一点额... 缩句:邱少云像千斤巨石一般趴在火堆里一动也不动,是缩成:邱少云趴.还是邱少云一动不动. 知伯入南里...直坠其履圯上.顾谓良曰:“孺子,下取履这句话是哪里面的?还有译文`` 马腾、韩遂的部下有谁?如题, 邱少云怕被敌人发现,趴在火堆里一动也不动.换个说法 圯上敬履 履 下邳的 邳 衣褐的 褐 孺子的儒 愕然的额 殴打的殴 有顷的顷 董卓是西凉刺史时,马腾;韩遂在哪里?当什么官?与董卓的关系? 为了整个班,为了整个潜伏部队,为了这次战斗的胜利,邱少云趴在火堆里一动也不动.一颗有生命力的种子,即使落在瓦砾堆里,它也绝不悲观,绝不叹气.我端起搪瓷碗,觉得这个碗有千斤重,怎么也 拔一根2m长的长方体木料截成两段,表面积比原来增加60dm2,这根木料的体积是多少立方分米 森乐空气净化器怎么样? 少量硫化氢通入氢氧化钡溶液的离子方程式.少量硫化氢通入氢氧化钡的离子方程式以及过量硫化氢通入氢氧化钡的离子方程式.还有少量以及过量硫化氢与氨水的离子方程式。 硝酸表现强氧化性时的反应规律有哪些? TPP文件时什么东西?文件只有4000多K,但是点到播放器里能看,是电影,这是什么情况? 用家用电磁炉烧 70升水需要多长时间沸腾 我想用家用电磁炉给 200*70*5 的暖气片加热可行么 屋子是24平方用家用电磁炉烧 70升水需要多长时间沸腾 我想用家用电磁炉给 200*70*5 的暖气片加热可 氧化还原反应下列必须加入氧化剂才能实现的是A:Fe3+变为Fe2+ B:二氧化硫变为 硫酸根离子C; 双氧水变为氧气 我觉得应选C 是不是答案错了 TPP代表什么物质 英语天天听行吗,天天光听.能有什么结果. 英语翻译良尝学礼淮阳.东见仓海君.得力士,为铁椎重百二十斤.秦皇帝东游,良与客狙击秦皇帝博浪沙中,误中副车.秦皇帝大怒,大索天下,求贼甚急,为张良 故也.良乃更名姓,亡匿下邳.良尝闲从 用四种不同的颜色对下面的A,B,C,D,E五个区域染色,相邻的区域染不同的颜色,共有多少种不同的染色方法? 坚持四项基本原则和坚持改革开放是统一的,二者统一于? 税收具有些什么特征呢? 多克多比 形容一下子落空、失去 灰飞烟灭?还是魂飞湮灭?那个词叫什么来着? 英语翻译怎么练听力啊?之前考了一次差六分过,还打算再考,阅读差五分满分,听力几乎没听懂 什么物质才能水解? 怎样用星星管折心 英语四级听力,肿么办啊,天天听貌似也木有什么进步.求方法,求经验 好比说豆油,淀粉,具体一点,嘻嘻,我比较笨的 异丙醇铝能溶于什么溶剂 将一块钠投入水中,反应过程中某同学观察到熔化成的闪亮小球的水面的位置为为什么选D主要分析BC 高中常用物质的以水解为主还是以电离为主,请多列几个常用的谢谢!例如NaHPO4啊什么的,是以水解为主还是电离为主呢,然后多给我列举些, 飞灰湮灭用英语怎么说?3Q 钠在水中为什么会熔化成发亮小球就问为什么发亮.是因为它本身金属的特性么. 安倍访问土耳其 助日企获福岛核事故后南非20名白人右翼分子因叛国罪获刑 张德江会见印尼人民协商会议主席西达尔德专家:欧元区最大问题在于违反不援助日本海上自卫队一军官因非法使用兴奋剂委内瑞拉总统称查韦斯音容出现在委地铁美国最新隐身驱逐舰下水 明年秋季开始消息人士称叙化武生产设备销毁工作如期纽约提高香烟禁售最低年龄 未满21不研究证明蝙蝠系非典传播源 病毒可由动小狗被饿三周吃伞充饥 其主人不愿救治男子扮高富帅专门诈骗按摩女 谎称投资巴西里约热内卢社会游民多 5000余媒体曝美全球监听地图 澳大利亚是美监近3成日本大学毕业生3年内离职 疑被美国艺术家创造“糖果肖像”庆祝万圣节法国一名抢劫犯曾为iPod及8欧元抢韩媒:中国学生“弃日择韩” 赴韩留学俄罗斯一科技园项目涉嫌违法 或致数百新10英镑钞票印简 奥斯丁头像 被批伊朗或取消向巴基斯坦供应天然气巨额合投资与做人的格局科学家称银河系核心味道如树莓,网友问陈道明没那么完美,朋友们没那么幸福水果沙拉这些带孩子的方法老人肯定会做,但是作女子信用卡欠5万半年,收到通知要还近广东顺德为什么称为“世界美食之都”?宋卫平悔婚的真实原因有三条,根子在赌吓人的兑付危机:677家P2P崩盘跑曼联后卫斯莫林偕女友酒吧小饮咸肉炒青蒜支付宝都被盗刷?!资金安全靠天靠地不问理财5月28日两点半股票小炒香干交通银行信用卡封卡的原因有哪些?高善文:房地产对经济有长期压力应用派推荐:Ready Steady财富之花、财富果实和我们不以风险控制为核心的互联网金融创新,重庆互联网+意识强劲,九猪预签约房源\"新常态下的经济走势、政策选择和资
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘