كيف إدخل ماكرو فيجول الى استعلام

بنيت ماكرو (اريد استخدامه في الاستعلام بحيث يقرأ من حقلين Module ،

الدرجة الكاملة .حقل درجةالطالب

Function M(a, B) As Integer

d = (a / B) * 100

If d >= 90 Then M= "ممتاز"

If d >= 75 And d < 90 Then M = "جيدجداً"

If d >= 60 And d < 75 Then M = " جيد"

If d >= 50 And d < 60 Then M = "مقبول"

If d < 50 Then M = "ضعيف"

End Function

وكتبت في الحقل الخاص بالاستعلامExpr2: m([amalf1],[e1])

ولكن يظهر لي