Answer:
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Close()
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Dim number As Integer
number = 1
Do While number < 5
MessageBox.Show(number)
number = number + 1
Loop
End Sub
Explanation:
Please check the answer section. The do while loop prints numbers 1 to 5, and till i less than 5. Exit button exits from program if clicked We can rename button1 above as Display, and then it will appear as display.
