Return vb脚本中的返回函数值

Return vb脚本中的返回函数值,return,Return,我不是vb专家,我从一些地方得到了这段代码,这段代码打印值recentFile.Name和recentFile.DateLastModified在代码的末尾,我所需要的是返回这些值,而不是打印,有人能帮我使用vb脚本吗 Option Explicit Function GetRecentFile(path) Dim fso, file Set fso = CreateObject("Scripting.FileSystemObject") Set GetRe

我不是vb专家,我从一些地方得到了这段代码,这段代码打印值recentFile.Name和recentFile.DateLastModified在代码的末尾,我所需要的是返回这些值,而不是打印,有人能帮我使用vb脚本吗

Option Explicit  

Function GetRecentFile(path)
  Dim fso, file
  Set fso = CreateObject("Scripting.FileSystemObject")
  Set GetRecentFile = Nothing
  For Each file in fso.GetFolder(path).Files
    If GetRecentFile is Nothing Then
      Set GetRecentFile = file
    ElseIf file.DateLastModified > GetRecentFile.DateLastModified Then
      Set GetRecentFile = file
    End If
  Next
End Function

Dim recentFile
Set recentFile = GetRecentFile("C:\Users\Administrator\Documents\Automation Anywhere Files\Automation Anywhere\My Tasks\ABL\WebocABL\EIFReports")
If recentFile is Nothing Then
  WScript.Echo "No recent files found"
Else
  WScript.Echo "Recent file is " & recentFile.Name & " " & recentFile.DateLastModified
End If