String$函數只能重復復制單字符，當需要重復復制2個或多個字符時，就需要一個循環。看起來是否很麻煩？然而，使用以下的函數就能解決這個問題。基本思路是：建立一個空格字符串，其長度為要重復復制的數目，然後替換每一個空格為要復制的字符串：
FunctionReplicateString(SourceAsString,TimesAsLong)AsString
ReplicateString=Replace$(Space$(Times),"",Source)
EndFunction
但是請注意：根據字符串的長度以及重復的數目，這個方法也許比傳統的循環方法要慢些。
->
