เมื่อขึ้นหน้าใหม่ต้องการให้ Cursor ไปรอในช่องที่ต้องการ

[Bravo_M79]

สวัดดีครับผม
มีเรื่องรบกวนอีกแล้วครับ คือผมเขียนโปรแกรม Scan สินค้า ฟอร์ม Frm_PS_ScanOrder

Button "พิมพ์ข้อมูล" ผมใส่ค่า Macro ใน Property Sheet >Event > On Click ดังนี้ครับ
เมื่อกด"พิมพ์ข้อมูล" ให้พิมพ์ Report name "P_ScanOrder" แล้วให้เปิดหน้าใหม่ และต้องการให้ Cursor ไปรออยู่ที่ "เลขที่ใบสั่งซื้อ"


แต่มี Error ตามรูปครับ Txtsearch6 คือชื่อของ "เลขที่ใบสั่งซื้อ"

ถ้าผมต้องการเขียนเป็น Code แทนต้องเขียนยังไงครับผม รบกวนหน่อยครับ
ขอบพระคุณมากครับ

[PNR]

gotocontrol ต้องระบุชื่อฟิลล์ ที่เชื่อมอยู่นะครับ Error นั้นแจ้งว่าคุณไประบุชื่อ คอนโทรล ไม่ใช่ชื่อฟิลล์ที่เชื่อมไว้ หรือลองตั้งชื่อ ฟิลล์และ ชื่คอนโทรลเหมือนกันดูครับ

ส่วน โค้ดจะใช้  Me.Txtsearch6.Setfocus ได้เลย

 ถ้าจะเขียนเป็นโค้ดทั้งหมด ก็น่าจะเป็น

Private Sub PrintBotton_Click()
DoCmd.OpenReport "P_ScanOrder", acViewNormal, , "RuningID Like '*" & [forms]![Frm_PS_SCANERORDER]!TxtSearch & "*'"
Docmd.GoToRecord,,acNext
Me.txtSearch6.Setfocus
End Sub
ลองดูครับว่าได้หรือไม่ถ้าติด ERROR ช่วยส่งรูป Error นั้นมาดูนะครับ

[Bravo_M79]

ทำได้แล้วครับอาจารย์ ขอบพระคุณมากครับผม