首页 > 解决方案 > 如何使用循环打印语句多次由 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 

标签: vba

解决方案


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

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

推荐阅读