****** การขยับ Record ใน Form ตามที่เลือกใน Combo/List ********

ในบางครั้งเราต้องการให้ Record ใน form เลื่อนตาม Record ที่เราเลือกใน Combo/List หรือจะเป็นค่าจาก Input Box ก็ตาม สามารถประยุกต์ ใช้กับวิธีนี้ได้ ในที่นี้จะ
สมมุติว่าจะเลื่อน Record นี้โดยเลื่อนตาม ID ที่ได้มาจากการเลือกใน ComboBox โดยจะส่งค่ามาที่ตัวแปร ที่ชื่อว่า FindID แล้วค่อยไปเทียบกับ ID ที่ใน Form

****** CODE **********

Dim FindID As Integer

FindID = Combo1.Value
Me.RecordsetClone.FindFirst "[ID] = " & FindID
Me.Bookmark = Me.RecordsetClone.Bookmark

********** ส่วนการวาง Code นี้ แล้วแต่ Event ที่จะใช้งานนะ *********