การหาชื่อ field ของตาราง ใน Access
ในการทำงานกับ MS Access บางครั้งมีความจำเป็นที่ต้องหาชื่อฟิลด์ เพื่อใช้เป็นเงื่อนไข ตามที่ต้องการ สมมติตาราง Table1 มึข้อมูล ดังนี้ วิธีการหาชื่อตาราง มีดังนี้ สร้างฟอร์มใหม่ ชื่อ Form1 สร้างปุ่ม ใช้ชื่อว่า Command1 ที่เหตุการณ์ เมื่อคลิก ให้พิมพ์โค้ดข้างล่างนี้ Private Sub Command1_Click() 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 End Sub เมื่อคลิกที่ปุ่ม จะแสดงชื่อฟิลด์ ใน Message Box