https://www.thai-access.com/tiupld/view.php?id=qxlssh-c273a7
ผมลงรูปไม่เป็น ขอโทษด้วยครับ เลยเอาลิ้งฝากรูปมาแทน
ใช้ Event Form_Load นะครับ มี 2 แบบคือ
1.ถ้าอยากให้เปิดแล้วไป record ท้ายสุดที่เคยลงไว้ก็ใส่
Private Sub Form_Load()
docmd.GoToRecord,,acLast
End Sub
2.ถ้าอยากให้เปิดมาแล้วให้พร้อมกรอกข้อมูลใหม่เลยก็ใส่
Private Sub Form_Load()
DoCmd.GoToRecord , , acNewRec
End Sub
หรือท่านจะสร้างปุ่มไว้ด้วยกรณีกรอกข้อมูลเสร็จแล้วก็กดปุ่มเพื่อไปกรอกหน้าใหม่เลยเช่น
Private Sub btnAdd_Click()
DoCmd.Save
DoCmd.GoToRecord , , acNewRec
End Sub