access 如何判断特定的字段是否存在？

用列表框多选字段自动生成的查询表，如何判断特定的字段是否存在？

如：自动生成的查询表＂费用表＂中，判断字段＂收费日期＂是否存在，只判断这一个字段．

'如果字段不存在，将返回nothing

function GetField(rs as adodb.recordset,sFldName) as adodb.field
on error goto errhandler
set GetField=rs(sfldname)
errhandler:
end function