Scribd
Upload
3 views1 page

Coding

The document contains three subroutines for a quiz application. The 'Correct' subroutine increases the score by 10 and displays a message for a correct answer. The 'Wrong' subroutine decreases the score by 5 and shows a message for an incorrect answer, while the 'Reset' subroutine sets the score to 0.

Uploaded by

nashelyrheeyan
Copyright
© All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as DOCX, PDF, TXT or read online on Scribd
3 views1 page

Coding

The document contains three subroutines for a quiz application. The 'Correct' subroutine increases the score by 10 and displays a message for a correct answer. The 'Wrong' subroutine decreases the score by 5 and shows a message for an incorrect answer, while the 'Reset' subroutine sets the score to 0.

Uploaded by

nashelyrheeyan
Copyright
© All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as DOCX, PDF, TXT or read online on Scribd

Sub Correct()

[Link] = ([Link]) + 10
Output = MsgBox("Your Answer is Correct, Well Done!", vbOKOnly, "Correct Answer")
End Sub

Sub Wrong()
[Link] = ([Link]) - 5
Output = MsgBox("Your Answer is Wrong!", vbOKOnly, "Incorrect Answer")
End Sub

Sub Reset()
[Link] = 0
End Sub

You might also like