Simple Powerpoint Vba Macro Problem

[Formulayeti]

im making a quiz in powerpoint vba but the YourName statement doest show the MSG box nor do the Correct and Wrong statements here is my code :

Dim numberCorrect As String
Dim UserName As Integer
Dim numberWrong As String
Sub YourName()
UserName = InputBox(Prompt:="Type Your Name")
MsgBox (" Welcome to the Quiz " & ", " & UserName), vbApplicationModal, " Quiz "
End Sub
Sub Correct()
MsgBox (" That is correct, move on & UserName "), vbApplicationModal, " Quiz "
numberCorrect = numberCorrect + 1
SlideShowWindows(1).View.Next
End Sub
Sub Wrong()
MsgBox (" Sorry Thats the wrong answer & UserName"), vbApplicationModal, " Quiz "
numberWrong = numberWrong + 1
SlideShowWindows(1).View.Next
End Sub
Sub Start()
numberCorrect = 0
numberWrong = 0
YourName
SlideShowWindows(1).View.Next
End Sub
Sub Results()
MsgBox ("You Got " & numberCorrect & " out of " & numberWrong + numberCorrect & ", " & UserName), vbApplicationModal, " Quiz "
SlideShowWindows(1).View.Next
End Sub

Your help would be much appreciated
Thank you in advanced

 

[lizsantiago07]

try dim username as string