[VB6] Errore "L'argomento non è facoltativo"

[danielmark87]

Salve a TUTTI, NON STO A SPIEGARVI NE IL PERCHE E IL PERCOME(N PENSO CHE INTERESSI) MA STO STUDIANDO VB E DEVO SVOLGERE UN ESERCIZIO:
- sCRIVERE UNA FUNCTION CHE ABBIA COME PARAMETRI IL PREZZO DI VENDITA E L'ALIQUOTA IVA, e che restituisca il prezzo con iva inclusa.
Io ho scritto questo:

Dim totp As Integer, iva As Integer, p As Integer

' funzione chiamata
Public Function Calcola(p As Integer, ivap As Integer) As Integer
   iva = prezzo / 100 * ivaperc
   totp = prezzo + iva
End Function

' procedura chiamante
Private Sub Command1_Click()
   prezzo = Val(txtp.Text)
   ivaperc = Val(txtiva.Text)
   txtptot.Text = CStr(Calcola(totp))
End Sub

Secondo le indicazioni e gli esempi del libro... pero mi da errore"l'argomento non è facoltativo)... dov'èp che sbaglio???