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

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中是不支持尾递归的。

Docker一周岁生日快乐 虚拟现实,正在改变什么? 一周消息树:腾讯CTO张志东离职 未来希望帮技术人成长 又见真人CS:13th Lab推出移动FPS对战平台 前瞻、教育、创业:Maker Faire演讲嘉宾揭晓 提高API采用率的六大方法 一周热点:以咖啡店为例演示Web应用程序扩展 中国云计算大会PPT集萃(四):数据安全与实际应用挑战 CDN前景光明,SDN发展的驱动力源于对产业的颠覆 Android、WP双系统若要发展 难题不断 即将于下周召开的微软Build 2014六个愿望清单 【独家专访】腾讯陈磊:你不知道腾讯对开源有多爱 地下数据交易网站Rescator被黑,疑似Target报复 Spark独门秘籍:打造结构一体化、功能多元化的高效数据流水线 【走进支付宝】重磅嘉宾!历届“走进企业”回顾 【OSTC讲师专访】腾讯TDW项目:开源的分布式数据仓库 ID爆发的物联网时代,我们该如何管理手中的数百个账户 取代Google Maps?苹果大幅优化Apple Maps用户体验 中交兴路系统架构师杨晓明:Hadoop+Storm+ HBase…,打造交通行业创新型服务 雨果·巴拉的第二春:我与小米的那些事儿 为什么Android Wear能统领智能手表领域? LinkedIn缘何抛弃Ruby,转投NodeJS怀抱 【OSTC讲师专访】九秒社团李明:开源对游戏产业的渗透与帮助 IBM 2014中国论坛:挖掘新互联网时代下“智慧企业”的发展之路 Facebook工程部副总裁Cory Ondrejka谈企业在早期所遇到的管理瓶颈 小团队管理工具选择:不需要大而全 《近匠》聚合CEO左磊:基础数据免费,API开放 IDC:HTML5与原生应用之争还将长存 不甘称臣,Google誓要击败Amazon 【OSTC讲师专访】腾讯追风(QcloudMna):开源移动加速SDK Google Go:一门为云而生的编程语言 DirectDraw页面格式问题(两个)。答对100分绝对送上,从不食言!(附源码) VC++中的内部交互调试器在哪? 人邮版的C++面向对象高效编程如何? realplayer中文件菜单栏中的以看过的文件名,怎么删除? 如何实现真正的无标题栏的拖动? 用"select top n"取了前n纪录后,要再接着取n+1至2n条纪录,接着再取2n+1至3n……,这种取法要怎样实现呢? 如何在Excel中编制一个宏? 如何得知程序的一个实例正在运行? 送分了,送分了,虽然不多,但天天有! 为什么select count(*) from test 时,提示表或示图不存在!!! 请问如何设置mp3文件的在线播放?? 请问在内部局域网正常的情况下,打印机无法共享(共享以后没有效果)的主要原因是什么?谢谢! ===我对Linux上的Oracle8.1.7.0.1操作的时候只读,为什么啊???==== 请给我一个GetCurrentDirectory使用实例, 问一个深入MFC的简单问题 请问有关delphi项目编译的一个小问题。 各位,那里有VisualAge for Java4.0下在?我从ibm的网站上下载了,但是安装不了,说是语言不对! shcv.dll 编译不过去!!!!! have a test!have a test!have a test!have a test!have a test!have a test!have a test!have a test! mysql 结果中再次查询如何才能实现呢 pc2phone java支持byte[] a = String.getBytes("iso-8859-1");转换吗? c语言中关于对windows命令调用的语法、命令及其格式。 怎么样捕捉数据库连接出错的信息?? 在SQL语句中,如何获得一汉字字段的字节长度,而不是字符长度?如“测试”返回4,不是2 如何建树 winsock.dll提供的都是什么函数?如果它提供的是winsockAPI,那么winsock32。lib提供的又是些什么?它们重复吗? FormatDateTime这个函数的日期间的字符不支持汉字,怎么解决? 关于用JAVA生成GIF的问题?(16M的GIF,256的我已经知道了) 如何在ACCESS李使用SQL? 梦天请进,谢谢! 能不能将对象序列化后存到数据库再取出还原?有没有例子? 分屏的已个视要做成对话框,请指教,顺便告诉我如何给分,只能给这么多 sorry,梦天进来,thanks!! 急!请问怎么在java类里写编译另一个类的语句?? 如何在ACCESS里使用SQL? 谁有BO2K源代码,我愿高分求购.不为别的目的,只为深入学习系统编程 如何实现 调用IE打开一个页面,并且多次调用,只打开一个窗口? 帮我点一下我就给分! 一个简单问题:我在给Access数据表中增加记录,其中一字段是CTime类型,但老是非法操作。调试后错误出现是:return (GetLocalTm(NULL)->tm_year) + 1900 不知如何解决。请各位大师救救我把。 动态的保存datawindow object的问题 怎么给一个(tab control)属性单 的标题栏上给添加一个背景位图呢! 千山一刀之忍者神龟进来拿分!!! 怎样得到年、月、日的值 那里有C++ Primer这本书 十万火急!!!怎么在oracle+developer2k中取得本机ip.——高分奉上!! 如何判断输入的信息是中文? dll调用找不到程序入口?? 怎么用win2000来制作一张可以代光盘启动的启动盘 我怎么用一个ALT 封装一个 ToolBar Control的 ActiveX的控件! 谁有什么好的例子吗! 约数之和(除其本身)恰好等于它本身的数叫什么? 如图小正方形的七分之六被阴影覆盖,大正方形的九分之八被阴影覆盖.求小正方形与大正方形的面积比 多项式除以多项式的法则,如:(2a^2*b^2+3ab^3)/(4a^2*b^5+2ab) 求1~2000的数中,所有偶数和所有奇数之和的差个反复反复反复反复反复反复反复反复 如图,图中的大正方形中阴影部分的面积是小正方形中阴影部分面积的3倍.小正方形中空白部分的面积是大正方形中空白面积的( )%. 正数的相反数是负数,这句话用符号表示是?急!在线等! 什么是单项式,多项式,整式.它们的区别与联系一定要准确啊 有8个约数的数中,最小的是多少?能列出算式吗? 相反数用什么符号表示 甲数等于2*3*5*7,甲数有几个约数?快 一个两位数,他既有约数2,又有约数5,还有约数3,这个两位数最小是( ) 相反数怎么用符号表示总不会让我写字- -bu shi你们理解错了,比如:7的相反数是-7,,我知道是负号 怎样区分单项式和多项式?就像那个单项式集合和多项式集合我就会分乱了,搞不清楚,就连单项式和多项式的次数次数都搞不清楚,你们能给我详细解答还有举例子吗?(请你们回答时要一个一 单项式与多项式的概念 下列说法正确的是( )A.一个数的相反数是负数或0 B.符号不同的两个数互为相反数 C.非负数的相反数是非正数. D.相反数等于本身的数不止数0一个 怎样区别单项式和多项式?如:x分之3,x+1,-2又2分之一,4分之a,0.72xy,2分之x-1中单项式有几个?分别是?多项式有几个?分别是?并且还要说出你怎样区别单项式与多项式 多项式与单项式的概念问题问:1+1,是单项式还是多项式?根号X是整式么?如果1+1是多项式,那么经常有这样的题:(a-3)x^2+x是单项式,那么求a是多少?很简单我们都另a-3=0,则a=3.那么,这个式子就 下列说法哪个正确1符号不同的俩个数互为相反数2整数的相反数是分数3非负数的相反数是非正数.还有一个4一个数的相反数一定是负数 单项式与多项式区别 什么是单项式,什么是多项式,x5-6xy+y3是关于y的几次多项式,请说明原因 多项式乘多项式法则 C#输入一组非0整数(以0作为输入结束标志)到一维数组中,求出这一组数的平均值,统计出正数和负数的个数.如,输入4,5,6,0,则输出 5是C#的问题,求解 多项式和单项式的定义 多项式乘多项式法则的字母表达式 汇编语言要输入一个整数输出对应的负数或者输入负数输出对应的整数就是如果输入-15要变成15输出,输入15变成-15输出,不知道怎么用汇编实现负数的输入输出,还想问问-1024怎么用16位有符号 单项式和多项式的概念是什么? 请问该如何设置windows的货币符号和数字格式? 一个小数由8个1 五个十分之一和22个千分之一组成 这个数写作 读作 c语言:编程统计数组a中的正数,0,负数的个数,并输出统计结果?(1)#include "stdio.h"int main(){int s[40],i=0,j,num=0,a=0,b=0,c=0;for (i=0;s[i]!='\n';i++ ){scanf("%d",&s[i]);num++; } for(j=0;j0) a++;else if (s[j]==0) b++;else c+ 在excel表中怎样将数据设置为货币格式,货币符号,小数点后位为1 如果用&(A)表示A的所有约数的个数,例如&(4)=3,那么&(&(18))等于多少? 用C语言编写程序,任意输入10个数,计算所有正数的和、负数的和以及这10个数的总和 1.一个由8个十,3个十分之一,8个千分之一组成,这个数写作( ) 1.游泳馆向一个长50米、宽25米、深1.6米的空游泳池里注水.经过0.6小时水深达0.2米,这样的话,几小时能把游泳池注满?(用比例知 如何在4*4的方格纸中表示根号5和根号2的正方形面积?图片正方形边长 C语言写编程,输入10个数,分别计算正数和负数的和 我这程序哪里不对啊?#includemain(){int i=0;double x,sum1=0,sum2=0;for(i=0;i 一个数是由10个一,5个十分之一和3个千分之一组成的,这个数写作( ),读作( )保留一位小数是( ),保留两位小数是( ). 输出区间m到n内所有的完全数,完全数就是小于本身的约数的和等于本身,6的约数1 2.3,#include int main ( ){int i,n,m,a,b;i=0;printf("m n");scanf("%d %d",&m,&n);for(a=m;a 一块正方形地的面积是640平方米,把它画在图纸上面积是40平方厘米,求这幅图的比例尺 如图,小正方形的七分之六被阴影覆盖,大正方形的九分之八被阴影覆盖,求小正方形与大正方形的面积比要式子 方法 过程 M/\除以N=3,那么M是N的约数吗 5的平方是用根号怎么表示,正方形面积5平方米,求边长是多少用根号怎么表示 如下图,阴影部分占小正方形面积的3分之1,占大正方形面积的5分之1,则小正方形的则小正方形的面积:大正方形的面积=( )【求做题方法或算式】 先求图形中涂色部分的面积,再求小正方形的面积(边长四分米)大长方形的边长是4分米 已知一个正方形与一个长方形面积相等,长方形的长为50根号2cm,宽为40根号2cm,求正方形边长 一个小数由8个十,6个0.01和五个0.001组成8个十,6个0.01和5个0.001组成,这个小数是什么? 先求右面图形中涂色部分的面积,再求小正方形的面积. 4分米 单项式和多项式最简单的区分方法最好能举一些例子,如X-4分之一是单项数还是多项式 多项式除以多项式的法则是什么?因为我是初一的,所以可不可以请各位讲得简单点啊!比如说,2abc+2ab^2c+c^2+c^2b/c+cb 下面的3个正方形大小相等.每个正方形中的涂色部分占正方形面积的几分之几?【下面图和问题】下面的3个正方形大小相等.每个正方形中的涂色部分占正方形面积的几分之几?哪个正方形中的 在内部RAM的21H单元开始存有一组单字节无符号数,数据长度为20H,编写程序要求找出最大数存入MAX单元 . 汇编语言问题 判断BUF中的数是正数,负数,还是0,并分别统计它们的个数判断BUF中的数是正数,负数,还是0,并分别统计它们的个数DATA SEGMENTBUF DB 1,-1,-2,-3,-0 A DB 0B DB 0D DB 0N EQU 5DATA ENDSCODE SEGMENTASSUME 1到20数中奇数有几个?偶数有几个? 求救 明天补考单片机 .设内部RAM 40H单元存放有一有符号数,判断其值是否小于,等于或大于0,分别在41H单元写入0,1或2,完成下列程序.START:MOV A,40H-------- IERO 判断累加器A是否小于0-------- POSITIVE 判 在BUFF开始的存储区中存放30个带符号数,试统计其正数,负数和零的个数.分别将个数放至A1,A2,A3单元我知道大体思路,就是具体的程序不会写. 100以内恰有4个约数的数有多少个? .ARRAY单元开始存放200个有符号字节数,统计出其正数、0和负数的个数,并把它们分别存入N1、N2、和N3中.我不知道哪个是正确的.能说明下吗 面积为30平方米的大正方形的四个角都是面积为3平方米的小正方形,用计算器求阴影部分的正方形边长 输入一个数求1到这个数的奇数和与偶数和用JAVA写.想了很就 如图,阴影部分的面积是大正方形面积的37.5%,是小正方形面积的三分之二,则小正方形面积是大正方形面积的百分之几?抱歉,没时间了所以没画图 列式写清楚 多项式除以多项式的法则
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn