怎么在文件夹中随机选择文件

静之泪 · 发表于 2011-5-11 11:06:42

怎么在文件夹中随机选择文件
打开文件夹里边有很多图片! 怎么设置可以随机的选择其中的一张!
图片有的是 jpg格式.有的是其它格式的.
谢谢大家

lyscser · 发表于 2011-5-11 11:21:36

Set Fso = CreateObject("Scripting.FilesystemObject")
Set myFolder = Fso.GetFolder(folderPath) --------folderPath是文件夹路径，参数

randomNum = randomnumber.Value(1,myFolder.Files.Count)
MsgBox myFolder.Files.Item(randomNum).Name

静之泪 · 发表于 2011-5-11 11:37:07

谢谢! 我自己先去试试!

		自动登录	找回密码
密码			(注-册)加入51Testing

[原创] 怎么在文件夹中随机选择文件

相关帖子

站长推荐 /1