sub cmd_onclick()
dim sql as string
sql = "Select * form ..... where ( " & _
filed1 like '*" & keyword & "*' or " & _
filed2 like '*" & keyword & "*' or " & _
filed3 like '*" & keyword & "*')"

.........recordsource = sql
หรือ ...... rs.open sql, currentproject.connection
แล้วค่อยเอาผล rs ไปทำอะไรก็ได้ครับ
end sub

นั่นเป็น การหาพร้อมกันทุกฟิลด์ คือ ใช้ Like..... แล้ว ก็ or

แต่ถ้าต้องการเป็นลำดับ อย่างที่กล่าว คือจะให้หาใน ฟิลด์แรกก่อน ถ้าไม่เจอ ค่อยไปหาฟิลด์ต่อไป แต่ถ้าเจอ ก็ให้หยุดการค้นหา ก็ใช้ If ..... then เข้าช่วย ครับ โดยในส่วน เงื่อนไขการหา ก็ไม่ต้อง or เช่น


sql = "Select * from ... where field1 like '*" & keyword & "*'"

if rs.eof and rs.bof then .....
ประมาณนี้แหละครับ ลองดัดแปลงดูครับ หลักๆ คือ เขียนเป็น select statement ครับ

--------------------------------------------

ส่วนการใช้ dlookup ก็มีหลักคล้ายๆ กัน คือถ้า ผลของ dlookup ได้มาเป็น null ค่อยไปหาฟิลด์ต่อไป

if (dlookup("ฟิลด์1", "ตาราง", "[ฟิลด์1] Like '*" & keyword & "*'") =null then...

ผมสร้างปุ่มคำสั่งจากกล่องเครื่องมือ ในฟอร์ม1 ให้ เปิดฟอร์ม 2 เพื่อดูภาพ
แต่พอเปิด ฟอร์ 2 กลับไปอยู่ที่เรคคอร์ด 1 ตลอด
ทำไงให้ เมื่อกดปุ่ม เปิดฟอร์ม2 แล้วให้ไปเปิดที่เรคคอร์ดเดียวกับฟอร์ม 1
ขอบคุณครับ

ในคำสั่ง เปิดฟอร์ม
docmd.openform จะมี อากิวเมนต์ wherecondition ครับ ใส่เงื่อนไขการเปิดในนั้นได้เลย
OpenForm(FormName, View, FilterName, WhereCondition, DataMode, WindowMode, OpenArgs)

ฟอร์ม1 กับฟอร์มสองของคุณที่บอกว่า เรคคอร์ดเดียวกันน่ะ รู้ได้อย่างไรว่ามันอันเดียวกัน ดูจากไหน
คุณก็เอาสิ่งที่คุณดูนั่นแหละครับเป็นเงื่อนไขการเปิดฟอร์ม

sq = "Invoice = '" & txInvoice & "'"
docmd.openform "ฟอร์ม2",acnormal, ,sq