VBA 使用Join函数连接字符串数组
示例
'Declare and assign a string array Dim widgetNames(2) As String widgetNames(0) = "foo" widgetNames(1) = "bar" widgetNames(2) = "fizz" 'Concatenate with Join and separate each element with a 3-character string concatenatedString = VBA.Strings.Join(widgetNames, " > ") 'concatenatedString = "foo > bar > fizz" 'Concatenate with Join and separate each element with a zero-width string concatenatedString = VBA.Strings.Join(widgetNames, vbNullString) 'concatenatedString = "foobarfizz"