เรียนอาจารย์ค่ะ

   หนูจะcopy Query ชื่อ QR1 ไปไว้ที่ตาราง TB1 ค่ะโดยเอาไปทั้งหมดในQR1
โดยมีปุ่ม CMD1 เป็นตัวควบคุมการทำงานค่ะ
ดูกระทู้ตัวอย่างแล้วใช้ INSERT INTO แต่ก็ไม่ได้ค่ะ

Private Sub CMD1_Click()
Dim strSQL As String
strSQL = "INSERT INTO TB1 (*) "
& " SELECT * "
& "FROM QR1 "
End Sub

หรือมันต้องระบุทีละพิวค่ะ ไม่เข้าใจ SQL ค่ะ


และอีกอย่างเมื่อหนูเปิดพอร์มแล้วอยากให้ลบข้อมูลในตาราง TB1 ทั้งหมด
เลยจะเขียนยังไงค่ะ


ขอบคุณค่ะ