StrDup 函数

项目
08/18/2008

更新：2007 年 11 月

返回由指定字符重复指定次数后形成的字符串或对象。

Public Shared Function StrDup( _
   ByVal Number As Integer, _
   ByVal Character As { Char | String } _
) As String
' -or-
Public Shared Function StrDup( _
   ByVal Number As Integer, _
   ByVal Character As Object _
) As Object

参数

Number
必选。Integer 表达式。要返回的字符串的长度。
Character
必选。任何有效的 Char、String 或 Object 表达式。将只使用表达式的第一个字符。如果字符类型是 Object，它必须包含一个 Char 值或 String 值。

异常

异常类型	错误号	条件
ArgumentException	5	Number 小于 0 或 Character 类型无效。
ArgumentNullException	5	Character 为 Nothing。

如果正在升级使用无结构错误处理的 Visual Basic 6.0 应用程序，请参见“错误号”一列。（您可以根据 Number 属性（Err 对象）比较错误号。）然而，如果可能，应当考虑用 Visual Basic 的结构化异常处理概述替换这种错误控制。

备注

该函数返回由重复字符组成的 String。组成该字符串的字符是 Character 参数的第一个字符，且该字符重复 Number 次。

示例

本例使用 StrDup 函数返回重复字符组成的字符串。

Dim aString As String = "Wow! What a string!"
Dim aObject As New Object
Dim TestString As String
aObject = "This is a String contained within an Object"
' Returns "PPPPP"
TestString = StrDup(5, "P")
' Returns "WWWWWWWWWW"
TestString = StrDup(10, aString)
' Returns "TTTTTT"
TestString = CStr(StrDup(6, aObject))