三国志12最好战法:如何判断一个对象是否存在

来源:百度文库 编辑:中科新闻网 时间:2024/04/29 23:28:00
程序如下:
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objParentFolder = objFSO.GetFolder(pb)
Set objSubFolders = objParentFolder.SubFolders
如果在一个文件夹里面不存在其他的文件夹的话,那样objSubFolders的值为空或Null还是其他的什么?

if objParentFolder.SubFolders.count>0 then
...

objSubFolders是一个空集合对象,不是空,也不是null,只能通过它的属性判断是否有记录,objSubFolders.size