สร้างข้อความเมื่อกด ปุ่มคำสั่ง


0 สมาชิก และ 1 บุคคลทั่วไป กำลังดูหัวข้อนี้

04 ก.ย. 67 , 11:00:13
อ่าน 211 ครั้ง

kunlek

ขอวิธีการใส่ข้อความโต้ตอบ Y/N เมื่อกดปุ่ม command bottom หัวฟอร์มบันทึกข้อมูล

 

04 ก.ย. 67 , 12:10:44
ตอบกลับ #1

Un

: สร้างข้อความเมื่อกด ปุ่มคำสั่ง
« ตอบกลับ #1 เมื่อ: 04 ก.ย. 67 , 12:10:44 »
   
โค๊ด: [Select]
Dim RetValue As Variant
    DoCmd.SetWarnings False
    RetValue = MsgBox("ยืนยันลบข้อมูล", vbOKCancel)
       Select Case RetValue
          Case 1
                DoCmd.RunCommand acCmdSelectRecord
                DoCmd.RunCommand acCmdSaveRecord
                DoCmd.RunCommand acCmdDeleteRecord
                MsgBox "ลบเรียบร้อยแล้ว"
                Case Else
                '''
                End Select
    DoCmd.SetWarnings True

ลองไปปรับใช้ครับ

 


บอร์ดเรียนรู้ Access สำหรับคนไทย


 

Sitemap 1 2 3 4 5