169k views
3 votes
For a=5 to 1 step -1

For b=1 To a
TextBox.AppendText(a)
Next
TextBox1.AppendText(Environment.NewLine)
Next

End Sub
End Class

Edit this program to show this answers
Answer:
54321
5432
543
543
5

For a=5 to 1 step -1 For b=1 To a TextBox.AppendText(a) Next TextBox1.AppendText(Environment-example-1
User Bskaggs
by
7.1k points

1 Answer

3 votes
Here is the edited program:

vb
Private Sub Button_Click(sender As Object, e As EventArgs) Handles Button.Click
For a = 5 To 1 Step -1
For b = 1 To a
TextBox.AppendText(b)
Next
TextBox.AppendText(Environment.NewLine)
Next
End Sub


This program will display the following answers in the TextBox:

54321
5432
543
54
5
User Relliv
by
8.3k points

Related questions