我需要使用VBA或Access SQL獲取表的所有列名並遍歷它們進行驗證,是否有人有解決方案,我已經搜索到Google無濟於事。獲取列名
Q
獲取列名
10
A
回答
14
這將工作
Set db = CurrentDb()
Set rs1 = db.OpenRecordset("Table1")
Dim fld As DAO.Field
For Each fld In rs1.Fields
MsgBox (fld.Name)
Next
Set fld = Nothing
2
Dim l As Integer
For l = 0 To CurrentDb.TableDefs("tbl_Name").Fields.Count - 1
Debug.Print CurrentDb.TableDefs("tbl_Name").Fields(l).name
Next l
+0
這是3年前Feral所做的,但將其改爲David提出的更好的代碼。我不明白你爲什麼添加它(三年後);更不用說爲什麼它起來了。 – Johanness 2016-12-24 14:41:43
相關問題
- 1. 獲取列名
- 2. 獲取列名ambigous
- 3. Hive - 獲取列名
- 4. 獲取ResultSet列名
- 5. 獲取列名postgres
- 6. 從列名獲取列號
- 7. 從列號獲取列名?
- 8. 獲取SQLite中的列名?
- 9. SpreadsheetGear按名稱獲取列?
- 10. 獲取列名與Teradata的
- 11. 獲取當前列名
- 12. 獲取WP7地名列表
- 13. javafx:獲取列的名稱
- 14. LINQ:獲取表列名稱
- 15. 獲取對應於列名
- 16. 從表中獲取列名
- 17. 從AbstractTableModel獲取列名稱
- 18. 獲取列名到數組
- 19. 獲取系列名稱
- 20. 獲取實體的列名
- 21. 無法獲取列名pymssql
- 22. 根據列獲取排名
- 23. 如何獲取dtype列名
- 24. 按學生名稱獲取列名
- 25. 獲取列表改變列名
- 26. 獲取特定列的列名稱
- 27. 根據列名獲取SQL列索引
- 28. MySQL從列值獲取列名稱
- 29. 從列值中獲取列名
- 30. 獲取查詢中列的列別名?
快速,乾淨,正是我想要的,謝謝! +1 – Yoda 2010-07-27 13:32:54
很高興聽到它,不客氣.. – 2010-07-27 13:45:36
我通常從不使用計數器來收集集合中物品的數據類型。我會使用For Each fld而不是rs1.Fields(使用變量fld作爲DAO.Field類型)。 – 2010-07-28 19:44:21