填空题

有如下过程，将两次调用过程proc的结果分别填于空 【9】 和 【10】 处。
Private Sub Command1_Click( )
Dim a As Integer
Dim b As Integer
a=2
b=5
Call proc(a, b) 【9】
Call proc(a) 【10】
End Sub
Private Sub proc(x As Integer,Optional y)
Dim z As Integer
If IsMissing(y) Then
MsgBox ("没有提供可选参数")
Else
z=x*y
MsgBox ("乘积=" + Str(z))
End If
End Sub