Vb6中Dir()函数的使用方法: