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

1.ที่ปุ่มบันทึก เพิ่มโค๊ด DoCmd.GoToRecord , , acNewRec

เคอร์เซอร์
http://www.thai-access.com/yeadram_view.php?topic_id=339

2.วิธีนี้อาจจะไม่ตรงตามวัตถุประสงค์สักเท่าไหร่ ถ้าไม่ใช่ก็ขออภัย ลองแบบนี้ดูครับ
2.1 ถ้าชื่อคนทำมีหลายคน ก็สร้างตารางขึ้นมาใหม่ มี 2 ฟิลด์
       ฟิลด์ที่ 1=ID, ฟิลด์ที่ 2=ชื่อ
2.2 กลับไปที่ตารางที่บันทึกข้อมูล เปิดมุมมองออกแบบ สร้างฟิลด์ใหม่
       กำหนดให้ฟิลด์ใหม่นี้เป็น Lookup Wizard เชื่อมกับตารางใหม่ที่สร้างเมื่อกี้
       แล้วเซฟ เราก็จะได้ Select Field ชื่อผู้ใช้ (คลิกแล้วมีชื่อให้เลือก)
2.3 กลับมาที่ฟอร์ม ก็แค่กำหนดแหล่งควบคุม Textbox ที่ต้องการ ให้ตรงกับฟิลด์
       ที่สร้างใหม่ครับ

ขอบคุณ คุณ naress4 ครับ แต่วิธีนี้ ก็ต้องมาเลือกข้อมูลใหม่อยู่ดีครับ คือไม่จำเป็นต้องสร้างมาให้เลือก แต่ต้องการให้ค้างอยู่แบบนั้นจนกว่าจะปิดโปรแกรม ครับ

ใช้ property default ได้ไหมครับ

ทำสำเร็จแล้วครับ
ผมใช้สูตรนี้ครับ
อาจจะดูยากสำหรับมือใหม่แต่ก็ โอ ครับ

Option Compare Database

Dim vName As String


Private Sub Model_BeforeUpdate(Cancel As Integer)
   SETDEFAULT_VALUE

End Sub


Private Sub SAVE_Click()
    SET_DEFAULT_TEMP
    
IsSaveClicked = True
    Me.Dirty = False
    
    MsgBox "บันทึกสำเร็จ"
    
    DoCmd.GoToRecord , , acNewRec ' ให้ขึ้น Record ใหม่
    
    Me.Form.Refresh
    
    SET_DEFAULT_NEW
    
End Sub

Sub SET_DEFAULT_TEMP()
On Error Resume Next

vName = Me.zobj_Name.Value


End Sub

Sub SET_DEFAULT_NEW()
On Error Resume Next

Me.zobj_Name.Value = vName


End Sub

Private Sub zobj_Model_Click()

End Sub