Looping (Do Until) Program On VB.net

Example Looping DO UNTIL on VB.net

Step to made  Looping DO UNTIL Program :
1. Add label, 1 textbox and 1 button

2. Double click on button and add the coding :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim x As Integer

        x = 0

        Do Until x = 5

            x = x + 1

            TextBox1.Text = TextBox1.Text & x

        Loop

End Sub

3. Done compile this program