ดึงข้อมูลจากตาราง2ตารางมาแสดงในฟอร์มเดียว

[prajak]

ในฟอร์ม1ฟอร์ม หากเราต้องการดึงข้อมูลจากตาราง2ตารางมาแสดงสลับกัน ตามการเลือกของเรา ไม่ทราบต้องใช้ function ไหนครับ ยกตัวอย่างตามรูป จะเป็นฟอร์มรายการผ้า ซึ่งจะดึงข้อมูลมาจากตารางผ้า หากบนฟอร์มเดียวกันนี้ผมต้องการดึงข้อมูล accessories มาแสดงแทนผ้า ต้องเพิ่มปุ่มหรือใช้คำสั่งอะไรครับ

[สันติสุข]

ก่อนอื่นต้องบอกว่า การสร้างแต่ละเทเบิลเพื่อเก็บรายการแยกแต่ละประเภท น่าจะออกแบบฐานข้อมูลไม่ถูกต้องแล้ว ปกติเราไม่ทำกันอย่างนั้น ถ้าทำได้ให้รวมเป็นเทเบิลเดียวกันแล้วมีฟิลด์ที่บอกประเภทของรายการจะถูกต้องกว่า ไม่อย่างนั้นต่อไปในอนาคต คุณจะต้องลงแรงและวุ่นวายมากกว่าคนอื่นมากๆ

ทีนี้กลับมาเรื่องที่ต้องการ เราสามารถกำหนดแหล่งที่มาของข้อมูลในหน้าฟอร์มด้วยการใส่ชื่อของ เทเบิล/คิวรี่/SQL statement ลงใน RecordSource property ของฟอร์มนั้น  ตามภาพที่ให้มา หลังจากเลือกประเภทของรายการในคอมโบบ็อกซ์แล้ว ก็ให้ใส่โค้ดไว้ที่ AfterUpdate event procedure ของคอมโบบ็อกซ์นั้น ซึ่งโค้ดคงมีลักษณะโครงสร้างตามนี้คือ

โค๊ด: [Select]

Select Case Me.ชื่อคอมโบบ็อกซ์
   Case ประเภทผ้า    ' ถ้าประเภทเป็นข้อมูลชนิด String ก็ให้ครอบด้วยเครื่องหมาย double quote
       Me.RecordSource = "เทเบิล/คิวรี่/SQL statement ที่แสดงผ้า"

   Case ปรเภทAccessories
       Me.RecordSource = "เทเบิล/คิวรี่/SQL statement ที่แสดง Accessories"
End Select