string - 为什么两个数组元素之间会出现空格？

Question

更具体地说，为什么 newFilename 中的 strarray(1) 和 strarray(2) 之间有一个空格？提前致谢!

Sub Button1_Click()

Dim orgFilename As String
Dim temp As String
Dim strarray(3) As String
Dim newFilename As String

orgFilename = Application.GetOpenFilename(FileFilter:="All files (*.), *.", Title:="Please select a file")


temp = Mid$(orgFilename, InStrRev(orgFilename, "\") + 1)
strarray(1) = Left(orgFilename, InStrRev(orgFilename, "\"))
strarray(2) = "processed_"
strarray(3) = temp
newFilename = Join(strarray)


End Sub

Answer 1

Join 默认添加空格。查看此链接中的第一段:

http://msdn.microsoft.com/en-us/library/aa164507%28v=office.10%29.aspx

The Join function takes an array of strings and returns a concatenated string. By default it adds a space between each element of the string, but you can specify a different delimiter.

改为使用

newFilename = Join(strarray, "")