User Function fails in an SQL Select statement within VB.

User function works great with SQL Select statement within Access when User Function is included within an Access module.

ANYONE KNOW HOW TO SOLVE THIS?