Hi all
I've an elderly lady who has just designed my first very simple powerpoint quiz, but I'm stuck andneed the code to send the results to an email address. Any help would be greatly appreciated (in words of one syllable, please!). I have attached my code so far below
Many thanks
Dim UserName As String
Dim numberCorrect As Integer
Dim numberWrong As Integer
Sub YourName()
UserName = InputBox(Prompt:="Pleae type your first name!")
MsgBox " Welcome to The Wolverhampton Induction Quiz " + UserName, vbApplicationModal, " Trial Quiz"
End Sub
Sub Correct()
MsgBox "Well Done! That's the correct answer " + UserName, vbApplicationModal, " Trial Quiz"
numberCorrect = numberCorrect + 1
ActivePresentation.SlideShowWindow.View.Next
End Sub
Sub Wrong()
MsgBox "Sorry! That's incorrect " + UserName, vbApplicationModal, " Trial Quiz"
numberWrong = numberWrong + 1
ActivePresentation.SlideShowWindow.View.Next
End Sub
Sub Start()
numberCorrect = 0
numberWrong = 0
YourName
ActivePresentation.SlideShowWindow.View.Next
End Sub
Sub Results()
MsgBox "Well done " & UserName & " You scored " & numberCorrect & " out of " & numberCorrect + numberWrong, vbApplicationModal, " Trial Quiz"
ActivePresentation.SlideShowWindow.View.Next
End Sub