Access - funcion visual basics

Hola buenos dias, tengo un programa de visual basic en el que hago una llamada a una función pero cuando la quiero ejecutar desde acces me da error, el condigo es el siguiente por si alguien me puede ayudar:

Option Compare Database
Option Explicit
-------------------------------------------------------------------------------------------------------------------
Function abrir( rangominimo As Enter, rangomáximo As Enter)

total = rangominimo + rangomaximo

End Function
---------------------------------------------------------------------------------------------------------------------
Private Sub Comando21_Click()
Dim abriendo As Double
Me.rangominimo = 0
Me.rangomaximo = 20

abriendo = abrir(rangominimo, rangomáximo)
End Sub

¿alguien puede ayudarme?

muchas gracias

Function abrir( rangominimo As Enter, rangomáximo As Enter) as integer

abrir = rangominimo + rangomaximo

End Function


Private Sub Comando21_Click()
Dim abriendo As string
Me.rangominimo = 0
Me.rangomaximo = 20

abriendo = abrir(rangominimo, rangomáximo)
aqui puedes utilizar el valor devuelto por la función en "abrir"
End Sub

¿me.rangominimo y me.rangomaximo me imagino que existirán en el formulario?

si, si están en el formulario, muchas gracias lo probaré y ya te comentaré. muchas gracias de todas formas