首页 相关文章 复制字符串中的字符

复制字符串中的字符

FillString函数有两个参数,一个是用来重复填充的字符,另一个是填充后的字符串长度。然后它返回填充后的字符串,重复次数由填充字符的个数和填充后字符串长度决定。
  
  该函数建立一个循环,循环次数基于所要求的字符串长度。循环步长有参数Value(即用来重复填充的子字符串)的长度决定。该函数把参数Value作为工作字符串,重复后按所要求的长度适当截尾:
  
  PrivateFunctionFillString(ByValValueAsString,_
  ByValStringLengthAsInteger)
  AsString
  DimstrWorkAsString
  DimintLoopCountAsInteger
  
  ForintLoopCount=1ToStringLengthStepLen(Value)
  strWork=strWork&Value
  Next
  
  FillString=Left(strWork,StringLength)
  EndFunction
  如果参数value为123,参数StringLength(字符串长度)为8,则...[ 查看全文 ]

2016-02-19 标签:

复制字符串中的字符的相关文章

手机页面
收藏网站 回到头部