VB中怎样让一个字符串重复N次，N为字符串长度？？？？？？？？

来源：百度知道 编辑：UC知道 时间：2024/06/02 17:28:34
比如inputbox输入：hi label显示:hi hi
比如inputbox输入：good label显示:good good good good
比如inputbox输入：hey label显示:hey hey hey

for i=1 to len(str)
label.text=label.text + str + ""
next i
str 为输入的字符串

Private Sub Form_Click()
Dim N As Integer, X As String, I As Integer
Label1.Caption = ""
N = Val(InputBox("次数", "输入"))
X = InputBox("字串", "输入")
Label1.Caption = X
For I = 1 To N - 1
Label1.Caption = Label1.Caption + " " + X
Next
End Sub