Access交流网
电 话:0760-88315075
热 线:0760-88315075
邮 编:528463
咨询QQ:1918333016
营销QQ:4008553990
Email:1918333016@qq.com
获取表字段名。有几种方法:
1、用一个组合框或列表框,设其数据行来源类型为“字段列表”,行来源为所需的表,然后用组合框或列表框的Column属性取值来获得字段名。
2、用ADO中的Field对象的name属性获得字段名。
作者:老汉
其中方法二可写成如下函数:
Function
Fieldname(tbname As String) As String
'参数:tbname为表或查询名称
Dim rs As New
ADODB.Recordset
Dim i As Long
rs.Open tbname, CurrentProject.Connection,
adOpenKeyset, adLockOptimistic
For i = 1 To rs.Fields.Count
Fieldname
= Fieldname & rs.Fields(i).Name & ";"
Next
End
Function