获取表字段名。有几种方法：1、用一个组合框或列表框，设其数据行来源类型为“字段列表”，行来源为所需的表，然后用组合框或列表框的Column属性取值来获得字段名。2、用ADO中的Field对象的name属性获得字段名。作者：老汉

其中方法二可写成如下函数：Function Fieldname(tbname As String) As String'参数：tbname为表或查询名称Dim rs As New ADODB.RecordsetDim i As Longrs.Open tbname, CurrentProject.Connection, adOpenKeyset, adLockOptimisticFor i = 1 To rs.Fields.Count    Fieldname = Fieldname & rs.Fields(i).Name & ";"NextEnd Function