บทที่ 4 ลบตาราง
ขั้นตอนนี้จะเป็นการสั่งลบตารางข้อมูล ที่อยู่ในฐานข้อมูลออกไป ผ่านทางการเรียกใช้งานฟังก์ชั่น ExecSQL ที่เราได้เขียนขึ้นมา
- ทำการดับเบิ้ลคลิกที่ปุ่ม cmdDeleteTbl และทำการป้อนโค้ด ลงในส่วนของ Sub cmdDeleteTbl_Click ตามตาราง
Private Sub cmdDeleteTbl_Click()
ExecSQL "DROP table TestTable", "TestTable dropped.", "Err: TestTable was not dropped."
End Sub
|
การทำงานจะทำผ่านทางการเรียกใช้งานฟังก์ชั่น ExecSQL เพื่อสั่งให้ทำงานตามคำสั่ง SQL เพื่อลบ ตารางข้อมูล ในตาราง TestTable ออกไป (คำสั่ง SQL ในที่นี้จะเป็นคำสั่ง "DROP table TestTable") โดยมีการส่งข้อความสำหรับรายงานผล ไปด้วย เพื่อใช้ในการแสดงผลการทำงาน เมื่อทำงานตาม ฟังก์ชั่นได้สำเร็จหรือไม่สำเร็จ ก็จะแสดงข้อความที่เหมาะสม ออกมา ให้ทราบ
- ทดสอบ Run และคลิกปุ่ม Delete Table จะได้ผลดังรูป
รูปแสดง ผลการ Run โปรแกรม
|