如何获取文件名

可以打开“资源管理器”，在要得到文件列表的文件夹内建立一个批处理文件如GETLISTBAT，文件内容只有如下一行命令：DIR /B >LISTTXT。双击执行该批处理文件就可以得到文件夹下所有文件的列表文件LISTTXT。其中的参数/B表示使用没有标题信息或摘要的方式显示文件列表，后面的>LISTTXT表示将文件列表输出到一个文件LISTTXT文件中。

如果是这样的话可以做到，但是会有一个问题，文件夹中的文件没办法确定先后顺序，很有可能名字的顺序是错误的，实际上顺序是乱的。无法保证正确顺序

创建个transtxt 重命名为 transvbs，复制下边代码到transvbs中保存。双击运行

dim sFolder

sFolder = "G:\test" '这是要修改的多个文件夹的外层路径

dim fs

set fs = CreateObject("ScriptingFileSystemObject")

set oFolder = fsGetFolder(sFolder)

set oSubFolders = oFolderSubFolders

for each folder in oSubFolders

fname = foldername

set files = folderfiles

index = 1

for each f in files

newname = fname & "_" & index & "txt"

fsMoveFile f , sFolder & "\" & fname & "\" & newname

index = index + 1

next

next

Set objFSO = Nothing 

MsgBox "complete"

text1text=""

d=dir("指定目录\")

do until d=""

text1text=text1text & d & vbcrlf

d=dir

loop

我不知道如何才能又“具体”又“简单”地说，呵呵，所以就不说了，你自己试

以上就是关于如何获取文件名全部的内容，包括:如何获取文件名、批量把不同的文件夹内的多张图片重命名为文件夹名称相同的名称求代码、vb 怎么用dir函数得到指定目录下的所有文件名等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！