I'm trying to make a basic general knowledge program with a set of questions all on one form. A labels caption holds the question and below it there are 4 option buttons with multiple choice answers. All this is housed in a frame, so that each question is separate. The title of each frame is 'Question 1, Question 2, question 3' etc. When you have answered all the questions you then press a button at the bottom of the form which checks whether correct answer has been selected. I want a message box to come up which will say "Well Done! You have got all the answers correct!!!" if you have got all the answers correct. If some have been answered incorrectly I want a messagebox to come up which will say "Sorry, but you got the following answers wrong: ----then it will list each question no. which the user answered incorrectly-----.

As you can see from the following code, I am nowhere near close to finishing it!

Private Sub Command1_Click()
If (Option4.Value) And (Option6.Value) = True Then
MsgBox "Well Done! You have got all the answers correct!!!"
ElseIf Option4.Value = False Then
MsgBox "You Got Question 1 wrong!"
ElseIf Option6.Value = False Then
MsgBox "You got question 2 wrong!"
End If

End Sub


I would be most grateful for your comments and solutions.