Access獲取數據表的所有字段名(列名)

2017-11-22 16:05:00
tmtony8
原創
9925

在Access創建的應用系統中,我們需要做的就是與數據表打交道,對數據的增刪改查。

通過ADO或者DAO可以快速獲取表的所有字段名。


詳細代碼如下:

Public Sub GetFieldsName()
    
    Dim rs As Recordset
    Set rs = CurrentDb.OpenRecordset("SELECT * FROM 表1")    
    For i = 0 To rs.Fields.Count - 1
        
        Debug.Print rs.Fields(i).Name
    Next
    
End Sub

    分享
    北京十一选五基本走势