Блог

Я пытаюсь выяснить, как выполнять четные числа в цикле for, а затем печатать эти числа на ярлыке в форме Windows с помощью кнопки. В настоящее время, когда я нажимаю кнопку, отображается только 20. Я считаю, что код выполняется через цикл, а затем, когда он доходит до 20, он просто печатает 20. Мне нужно напечатать все числа в объекте label.

Вот текущий код:

 Public Class Form1

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles btnGenerate.Click

    For intEven = 2 To 20 Step 2
        lblEven.Text = intEven
    Next


End Sub
End Class
  

Вот изображение приложения при его запуске:

Запуск приложения

И я только что понял это!

 Public Class Form1

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles btnGenerate.Click

    Dim intEven As Integer

    For intEven = 2 To 20 Step 2
        lblEven.Text = lblEven.Text amp;
            intEven.ToString amp; ControlChars.NewLine
    Next intEven


End Sub
End Class