WEB开发网
开发学院软件开发VB 创建任意长度重复字符串的简洁方法 阅读

创建任意长度重复字符串的简洁方法

 2006-02-27 21:12:36 来源:WEB开发网   
核心提示:String$函数只能重复复制单字符,当需要重复复制2个或多个字符时,创建任意长度重复字符串的简洁方法,就需要一个循环,看起来是否很麻烦?然而,其长度为要重复复制的数目,然后替换每一个空格为要复制的字符串:FunctionReplicateString(SourceAsString,TimesAsLong)AsStri

String$函数只能重复复制单字符,当需要重复复制2个或多个字符时,就需要一个循环。看起来是否很麻烦?然而,使用以下的函数就能解决这个问题。基本思路是:建立一个空格字符串,其长度为要重复复制的数目,然后替换每一个空格为要复制的字符串:

FunctionReplicateString(SourceAsString,TimesAsLong)AsString

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

EndFunction

但是请注意:根据字符串的长度以及重复的数目,这个方法也许比传统的循环方法要慢些。

->

Tags:创建 任意 长度

编辑录入:爽爽 [复制链接] [打 印]
赞助商链接