Subroutines multiple arguments

Hi,
>
This might be a dumb question but i'm trying to pass a couple of
arguments to a subroutine and keep getting an error message
>
This:
>
Sub showNumbers(a As Integer)
MsgBox (a & ", " & a)
>
End Sub
>
>
Private Sub Command0_Click()
showNumbers (1)
>
End Sub
>
Works Fine!
>
>
>
>
But This:
>
Sub showNumbers(a As Integer, b As Integer)
MsgBox (a & ", " & b)
>
End Sub
>
Private Sub Command0_Click()
showNumbers (1, 2)
>
End Sub
>
gives a syntax error..
>
Any help much appreciated..
>
thanks
>
jim
>