String$函數(shù)只能重復復制單字符，當需要重復復制2個或多個字符時，就需要一個循環(huán)。看起來是否很麻煩？然而，使用以下的函數(shù)就能解決這個問題。基本思路是：建立一個空格字符串，其長度為要重復復制的數(shù)目，然后替換每一個空格為要復制的字符串：

FunctionReplicateString(SourceAsString,TimesAsLong)AsString

ReplicateString=Replace$(Space$(Times),"",Source)

EndFunction

但是請注意：根據(jù)字符串的長度以及重復的數(shù)目，這個方法也許比傳統(tǒng)的循環(huán)方法要慢些。