'用途 Dim instance As ITextTemplatingEngineHost Dim path As String Dim returnValue As String returnValue = instance.ResolvePath(path) '宣告 Function ResolvePath ( _ path As String _ ) As String