การใช้คำสั่งDLookUpสำหรับหาข้อมูล จัดทำโดย : นายจืด พิมพ์


การใช้คำสั่งDLookUpสำหรับหาข้อมูล

คำสั่งนี้เป็นคำสั่งที่มีความสำคัญครับเพราะมักจะถูกนำมาใช้งานบ่อยๆ มาลองกันเลยดีกว่า

1.สร้างฟอร์มโดยกำหนดชื่อฟอร์มว่า frm_Dfunction ในมุมมองของการออกแบบขึ้นมาแล้วสร้าง Text Box เข้าไป 3 ชิ้น โดยแต่ละ Text Box มีชื่อดังนี้

1.txtID 2.txtName 3.txtScore

2.คลิกเลือก Text Box แล้วคลิกขวาเลือกคุณสมบัติหลังจากนั้นให้เปลี่ยนชื่อ Text Box ข้างต้น เป็น txtID ทำเช่นนี้ทั้ง 3 กล่องข้อความ

2.ให้เพิ่ม Text Box ไปอีก 1 ชิ้น ตั้งชื่อว่า txtRemark

3.สำหนับ txtName นั้น สมว่าเรามีข้อมูลการสอบจากนักศึกษาโดยนำ้ข้อมูลตารางที่เราเคยสร้างมาใช้ โดยในที่นี้เราต้องการให้แสดงรายชื่อของผู้สอบที่มีรหัสประจำตัวตรงกับหมายเลขที่ใส่ไว้ในช่อง txtID ดังนั้นเราต้องใส่ Control Source(แหล่งตัวควบคุม) ของ txtName =DLookUp("[Name]","[tblExamScore]","[ID]=[txtID]")

4.ต่อไปก็ให้เราทำเช่นเดียวกับ txtScore แต่ให้กำหนดแหล่งควบคุมในคุณสมบัติดังนี้ =DLookUp("[Score]","[tblExamScore]","[ID]=[txtID]")

5.ทำการเปิดฟอร์ม frm_Dfunctionให้ใส่ตัวเลขเข้าไปที่ช่องtxtID

6.เมื่อใส่ตัวเลขไปที่ช่องเลขที่แล้วแต่ยังไม่เกิดอะไรขึ้นใ้ห้ทำการกดปุ่ม F9 ที่แป้นพิมพ์

7.ถ้าเราต้องทำการกด F9 ทุกครั้งคงจะไม่สะดวก วิธีก็คือทำการสร้างมาโคร 1 ชุด ให้ชื่อว่า mcr_F9

8.หลังจากนั้นเปิดฟอร์ม frm_DFunction ในมุมมองออกแบบขึ้นมา คลิกขวาที่ txtID เลื่อกคุณสมบัติ แล้วใส่ชื่อมาโคร mcr_F9 เข้าไปที่ Event : After Update(หลังการปรับปรุง)

9.หลังจากจากบันทึกฟอร์มแล้วนั้นท่านก็จะได้ฟอร์มfrm_DFunction คราวนี้ท่านลองเลขที่สอบลงไปใน txtID แล้วกด Enter ท่านก็จะได้ข้อมูลตามที่ท่านต้องการไม่ยากเลยใช้ไม่ครับลองนำ้ไปใช้ดู

 

คุณอาจสนใจ
เทคนิคการสุ่มตัวเลข
Mr.GuruZ (28,920 - 03 มิ.ย. 49)
ล้วงลึกเทคโนโลยี Hyper - Threading Technology (HT Technology)
เว็บไทยดีดี (14,788 - 29 ก.ย. 50)
ทำภาพให้โปร่งแสงด้วย Transparency
ธนิศา ไชยภูริพัฒน์ (74,892 - 19 ม.ค. 51)
การสร้างปฏิทิน Online
first (91,988 - 23 ธ.ค. 50)
การใช้เครื่องมือ Gradint Tool
Tung (68,878 - 21 พ.ย. 50)
การจัดรูปแบบ Word Art
Mr.Nook (20,525 - 28 ม.ค. 51)
สร้างข้อความให้พลิ้วไว้กับริบบิ้น
langjuko (45,304 - 20 ต.ค. 51)
โชว์เมนูบาร์ IE7 ให้เหมือน IE6
เว็บไทยดีดี (14,859 - 08 ก.ย. 50)