51Testing软件测试论坛

标题: 怎么在文件夹中随机选择文件 [打印本页]

作者: 静之泪 时间: 2011-5-11 11:06
标题: 怎么在文件夹中随机选择文件
怎么在文件夹中随机选择文件
打开文件夹里边有很多图片! 怎么设置可以随机的选择其中的一张!
图片有的是 jpg格式.有的是其它格式的.
谢谢大家

作者: lyscser 时间: 2011-5-11 11:21
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
谢谢! 我自己先去试试!

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)