Interactive Quiz with Scores at the end?

VisionAvenger · #1 03-04-2016, 11:15 AM

I found a site that gave some ideas for using PowerPoint for an interactive quiz, ie, when someone clicks a button, it counts if they got the question right and then gives a score at the end.
Using this code . . .

Code:

Option Explicit
Public Tally As Integer
Sub InitializeScore()
Tally = 0
End Sub
Sub AddToTally(Points As Integer)
Tally = Tally + Points
End Sub
Function ShowTally()
MsgBox "Your final score is " & CStr(Tally)
End Function

This is good, but I can't connect an Action button to the Function (only a Sub), so I'm not sure if it's working.

Two questions, please:
1) How do Initialize the score without requiring someone click the button, ie, it should initialize when the Slideshow begins.

2) How do I show the person the score at the end, seeing as I can't attach it to an Action, eg, "Click here to see your score"?

Thanks in advance, and if you have any suggestions for improving the above, I would naturally be happy to hear your thoughts!

Cheers

Brian

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Exporting quiz scores from powerpoint to excel spreadsheet/word	rjagile	PowerPoint	1	02-08-2016 02:26 PM
Ad a quiz with different scores for each question and with final score at the end	Amadeus	PowerPoint	0	09-16-2014 04:24 AM
Scores returning ranked results	TerryStevenson	Excel	1	09-16-2013 12:20 PM
Interactive Quiz using PPT 2010	TimC	PowerPoint	3	07-08-2013 11:33 PM
Keeping scores in ppt, please please help	piper7971	PowerPoint	0	07-24-2010 07:10 PM