textbox ที่คุณใช้คีย์กลุ่มข้อมูลสินค้า หรือ combo box ก็ได้
สมมติว่าชื่อ txGroup

วิธีแรก การใช้โค้ด
ให้เขียนโค้ดในเหตุการณ์ หลังจากปรับปรุงข้อมูล ดังนี้

Private sub txGroup_AfterUpdate()
txGroup.DefaultValue = txGroup
End sub


วิธีที่สอง
การกำหนดคุณสมบัติของคอนโทรล
ให้ไปกำหนดในคุณสมบัติของ textbox หรือ combobox ตัวนี้เลยครับ ที่ค่าเริ่มต้น (Default Values) ให้เขียนเป็นนิพจน์ เซฟลงไปเลยครับ
= """" & [txGroup] & """"
   หมายเหตุ เครื่องหมายที่เขียนติดกันนั่นคือ เครื่องหมาย ฟันหนู (duble quote) 4 ตัว ทั้งด้านหน้าและด้านหลัง

ลองดูครับ ไม่หรูมาก แต่ก็พอกล้อมแกล้มแก้ปัญหาเบื้องต้นได้บ้างครับ

ขอบคุณค่ะอาจารย์
ทดลองทำ ทั้ง 2 วิธีแล้ว เขียนเป็นโค้ดได้ผลค่ะ แต่ วิธีกำหนดในคุณสมบัติแล้วขึ้น #error โชว์ค่ะ หนูเลยใช้โค้ด

แต่มีข้อสังเกตุว่าการกำหนด( ทั้งสองวิธีนี้ ) นี้มีข้อจำกัดกับฟิลด์ข้อมูลเป็นวันที่ หรือ มีเครื่องหมาย / หรือเปล่าคะเพราะพอกำหนดแล้ว จะโชว์ #name? ในฟิลด์หรือไม่ก็ขึ้นเป็นวันที่แปลกๆ ค่ะ

ขอบคุณค่ะ

- ถ้าขึ้น #error เป็นอาการปกติครับ สำหรับการเปิดใช้ฟอร์มครั้งแรก หลังจากมีการบันทึกข้อมูลแล้วอย่างน้อย 1 เรคคอร์ด ลักษณะดังกล่าวน่าจะหายไปครับ
... อย่างที่บอกครับ มันไม่หรูมาก แต่ก็พอใช้ทำงานได้ ลักษณะของผลลัพธ์ที่เราจะเป็นจากการทำแบบนี้ มันจะเกิดขึ้นในเรคคอร์ดที่ 2 เป็นต้นไปครับ
กล่าวคือ เราสั่งให้มันจำข้อมูลของเรคคอร์ดแรกไว้ครับ
... คำว่าเรคคอร์ดแรก หรือเรคคอร์ดที่ 2 ที่ผมกล่าวในที่นี้ ให้นับเฉพาะจำนวนที่เพิ่งบันทึกผ่านฟอร์มนี้ ในครั้งที่เปิดฟอร์มนี้นะครับ ถ้ามีการปิดฟอร์มลงไปแล้วเปิดใหม่ ก็นับหนึ่งใหม่อีกครับ

- ถ้าขึ้น #Name? อาจเกิดจาก คุณตั้งชื่อ ฟิลด์ กับชื่อ textbox เป็นคำเดียวกัน ทำให้ระบบไม่แน่ใจว่าต้องนำค่าอะไรมาใช้กันแน่ คือมันแยกไม่ออกว่าคุณกำลังอ้างอิงถึงอะไร   วิธีแก้ไขคือต้องเปลี่ยนชื่อ textbox อย่าให้เป็นคำเดียวกันกับชื่อฟิลด์ที่มาผูก   แล้วในนิพจน์นั้นให้อ้างชื่อ textbox นะครับอย่าอ้างชื่อฟิลด์