vb 函数 传参数（files）是什么类型的啊？

Set fso = CreateObject("Scripting.FileSystemObject")
Set sourcefolder = fso.GetFolder(BackUpFileFloder)
Set sourcefile = sourcefolder.Files

str = aaa(sourcefile )

-----------------------------------------------------------------
Public Function aaa(sourcefile As Files) As String

         Dim s
         s = sourcefile

End Function
------------------------------------
总是在调用的地方报错，告诉我类型不匹配，就想传 sourcefile ，用什么类型？？ --------------------编程问答-------------------- Scripting.FileSystemObject对象库中的文件对象集合
在引用中，添加对ms scripting runtime 的引用

补充：VB ,  基础类