vb学习“使用不定数量的参数”时遇到的问题

Question

Sub StudentScores (Name As String, ParamArray Scores())
       Dim I As Integer
       Debug.Print ("Scores for" & Name & ":")      For I = 0 To UBound(Scores())
             Debug.Print ("Score" & I & ":" &Scores(I))
      Next I
End Sub
比如说要在单击事件中调用这函数，不知道怎么传参数，
看书上说：
      StudentScores ("Jams", 60, 80, 90)
但是报错。