爲什麼我在兩個數組元素之間獲得空間？

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

加入默認添加空格。 在這個環節退房第一段：

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

Join函數需要一個字符串數組，並返回一個級聯 字符串。默認情況下，它在字符串的每個元素之間添加一個空格， 但您可以指定不同的分隔符。

改用

newFilename = Join(strarray, "") 

Answer 2

這是加入的（）行爲：http://www.vb6.us/tutorials/vb-string-array-functions-split-join-filter

嘗試

newFilename = Join(strarray, "")