静之泪 发表于 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

谢谢! 我自己先去试试!
页: [1]
查看完整版本: 怎么在文件夹中随机选择文件