Code Issue

hey guys, as I have had a variety of negative feedback from previous threads im really trying my best with this code and at the moment I have this:
Public Class Form1
Dim choice As String
Dim rating(19) As String
Dim guest(19) As String
Dim custom(19) As String
Dim tel(19) As String
Dim counter As Integer

Private Sub btnadd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnadd.Click
Do Until choice = "no"
MsgBox("please Fill out the questionnaire")
custom(counter) = txtname.Text
tel(counter) = txttel.Text
rating(counter) = cmborate.Text
guest(counter) = cmbono.Text
choice = InputBox("Would you like to fill in more questionnaire data?")
counter = counter + 1
Loop


End Sub
End Class

The problem I have at the moment is the loop will just keep going from message box to inputbox, I would be very grateful if someone was able to explain how I could alter the code so that the message box comes up, then waits to allow the user to fill in the two text boxes and two combo boxes, then asks if more user information should be added

all help would be much appreciated as I am very limited with my knowledge of vbasic