Using a defined field in a query

[oliver_penney]

hi

if i have this code:-

Function test88() As DAO.Field
Set test88 = DBEngine.Workspaces(0).Databases(0).TableDefs("tbl_Teleservices_Spider").Fields("BAN Int")
End Function

Sub test77()
MsgBox test88().Name
End Sub

test77 comes up with "BAN Int" hurrah!

BUT i want to define a new field in a query as this field and if i try something like

test99: test88()

in a query field defn, it says "undefined function test88 in expression"

what am i missing?

regards

oliver

 

[guybrush]

Try making it a Public function.

....

Actually, I just tried that, and it is more than that.
You need to also have test77 return a string.

Try this...

Public Function test88() As DAO.Field
    Set test88 = DBEngine.Workspaces(0).Databases(0).TableDefs("tbl_Teleservices_Spider").Fields("BAN Int") 
End Function

Public Function test77() As String
    test77 = test88().Name
End Function

Now call Test: test77() in your query.

What are you tring to do with this?