public function

Jeg har forsøgt at lave en renteberegning på grundlag af en function og et kald af denne i nedenstående koder, men får rente = 0.
Hvad har jeg gjort forkert?

Private Sub Command3_Click()
Dim saldo As Single
Dim rentesats As Single
Dim antaldage As Integer

saldo = InputBox("saldo")
rentesats = InputBox("rentesats")
antaldage = InputBox("antaldage")

MsgBox "Renten udgør  " & Renteberegning
End Sub

Public Function Renteberegning()
Dim saldo As Single
Dim rentesats As Single
Dim antaldage As Integer
Renteberegning = saldo * rentesats * antaldage / 36000

End Function