Run time error 13 Type mismatch

[Accessguest]

I've been given an Access DB for debugging. When running a query for a report the code stops with "Run time error 13 Type mismach".

The code is stopping on the Else clause c = FormatDateTime(Month(bd) & "/" & Day(bd) & "/" & Year(ed))

Function GetAge(bd, sd, ed) As Integer
Dim a, c, d
GetAge = 0
If IsNull(bd) Or IsEmpty(bd) Or IsNull(sd) Or IsEmpty(sd) Or IsNull(ed) Or IsEmpty(ed) Then
    Exit Function
Else
    If Month(bd) >= Month(sd) Then
        'd = DateSerial(Year(sd), Month(bd), Day(bd)) - DateSerial(Year(bd), Month(bd), Day(bd))
        c = FormatDateTime(Month(bd) & "/" & Day(bd) & "/" & Year(sd))
    Else
        'd = DateSerial(Year(ed), Month(bd), Day(bd)) - DateSerial(Year(bd), Month(bd), Day(bd))
        c = FormatDateTime(Month(bd) & "/" & Day(bd) & "/" & Year(ed))
    End If
End If
a = DateDiff("yyyy", bd, c)
'MsgBox a & vbNewLine & d / 365
GetAge = a
End Function

Thank you in advance for your insight.

[Rabbit]

A type mismatch indicates that a variable is expecting a certain data type but receiving a different data type. So you'll want to check that you're passing the correct data types to functions and assigning the correct data types to variables.

[NeoPa]

Check the values in [bd] & [ed]. They both need to be dates.
The line looks strange anyway - Does it need to refer to both fields or should they all be references to [bd]?

[imaatouk]

i am just install EventTracker 6 and when i am starting the monitiring this message appear please tell me the answer

[NeoPa]

You have asked your question in another member's thread. This is called thread hijacking and is not allowed on this site. There are various reasons for this, the principal of which is that it typically diverts the flow of the thread away from their needs and into yours. Another is that it will tend to mean that your new question is not seen as such, and may get overlooked by many of our experts (You appreciate that they're not looking for answered questions).
Please post your questions in their own threads in future (See How to Ask a Question).

ADMIN.

[NeoPa]

If you do decide to post this question properly, please remember to provide some actual information. As it stands it makes no sense and is almost impossible to respond to anyway.