使用 FSO.BuildPath 从文件夹路径和文件名构建完整路径

Created: November-22, 2018

如果你接受文件夹路径的用户输入，则可能需要在构建文件路径之前检查尾部反斜杠（\）。FSO.BuildPath 方法使这更简单：

  Const sourceFilePath As String = "C:\Temp"  '<-- Without trailing backslash
  Const targetFilePath As String = "C:\Temp\" '<-- With trailing backslash

  Const fileName As String = "Results.txt"
  
  Dim FSO As FileSystemObject
  Set FSO = New FileSystemObject
  
  Debug.Print FSO.BuildPath(sourceFilePath, fileName)
  Debug.Print FSO.BuildPath(targetFilePath, fileName)

输出：

C:\Temp\Results.txt
C:\Temp\Results.txt