首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

怎么筛选指定格式的文件

2012-01-31 
如何筛选指定格式的文件?我用以下代码遍历指定文件夹下的文件,SetfsoCreateObject( Scripting.FileSyste

如何筛选指定格式的文件?

      我用以下代码遍历指定文件夹下的文件,
Set   fso   =   CreateObject( "Scripting.FileSystemObject ")
Set   f   =   fso.GetFolder(mypath)

Set   fol   =   f.SubFolders
Set   fil   =   f.Files

Form1.List1.Clear
For   Each   i   In   fil
        MsgBox   i.Name   &   Chr(13)   &   i.DateCreated,   ,   "文件夹的相关信息 "
        Form1.List1.AddItem   i.Name
Next   i

问题:

        我不想列出全部文件,而是只列出符合格式的文件,其要求如下:
        文件名格式   :ABCidMM.YYY
        共   11   位,其中   “ABC”——为文件标示符(即固定),id——单位编号,任意数字组合,MM——为月份,   2   位长度表示,YYY——为年份的最后三位数字。
        如,编号为78的单位的2005年2月的   ABC   文件为   :   ABC7802.005     .
       
        请问如何之列出符合以上条件的文件?

        谢谢!

[解决办法]
用MID,LEFT,RIGHT等函数截取文件名中指定部分作为条件即可.

时间那里你可以用FORMAT函数直接规范
[解决办法]
友情 up 一下。

FileSystemObject.GetExtensionName(filePath as string ) ' Return extension from path


vb 虽然容易入门,可是,也需要不少的算法、逻辑的基础知识的。

热点排行