¿Como conocer los campos de una tabla mediante ADO?
Si usas ADO un método rápido es hacer algo así como

Dim cn As New Connection
Dim rs As New Recordset

Private Sub Form_Load()
cn.Open "DSN=ACC"
rs.Open "Select Top 1 * From LaTabla", cn
Dim f As Field
For Each f In rs.Fields
    Debug.Print f.Name
Next
rs.Close
cn.Close
Set rs = Nothing
Set cn = Nothing
End Sub