如何在visual basic中使用循环将用户输入定义的语句打印若干次



我想编写一个简单的程序,执行以下操作

接受字符串的文本输入和程序用户需要循环的次数,并产生该循环以输出该字符串指定的次数。我的循环没有这样做。(visual basic循环新功能)

请纠正我的错误:

Public Class Form1
Private Sub cmdLoop_Click(sender As Object, e As EventArgs) Handles cmdLoop.Click
Dim newput As String
Dim numberr As Integer
Dim counter As Integer
newput = txtStatement.Text
numberr = TxtRepeatNum.Text
For counter = 1 To numberr
lbloutput.Text = newput & vbCrLf
Next

End Sub 

循环将number乘以相同的字符串写入文本框,每次迭代都会覆盖之前的内容。改为

lbloutput.Text = ""
For counter = 1 To numberr
lbloutput.Text = lbloutput.Text & newput & vbCrLf
Next

最新更新