คำตอบที่ได้รับเลือกจากเจ้าของกระทู้
ความคิดเห็นที่ 2
ได้โค้ดแล้วนะครับ ขอบคุณท่าน dontamh มากนะครับ ปุ่มลบมีโค้ดดังนี้
Dim result As Integer = MessageBox.Show("ยืนยันการลบ", "ต้องการลบหรือไม่", MessageBoxButtons.YesNo)
If result = result = DialogResult.No Then
Me.Close()
ElseIf result = DialogResult.Yes Then
HomeworkBindingSource.RemoveCurrent()
HomeworkBindingSource.EndEdit()
HomeworkTableAdapter.Update(Database11DataSet.homework)
End If
End Sub
End Class
Dim result As Integer = MessageBox.Show("ยืนยันการลบ", "ต้องการลบหรือไม่", MessageBoxButtons.YesNo)
If result = result = DialogResult.No Then
Me.Close()
ElseIf result = DialogResult.Yes Then
HomeworkBindingSource.RemoveCurrent()
HomeworkBindingSource.EndEdit()
HomeworkTableAdapter.Update(Database11DataSet.homework)
End If
End Sub
End Class
แสดงความคิดเห็น
ช่วยผมหน่อยครับ VB 2010
คือผมได้สร้างโปรแกรมขึ้นมาโปรแกรมหนึ่ง ใน VB และได้เชื่อมกับฐานข้อมูล access
ซึ่งในนั้น มี Button ทั้งหมด 3 ปุ่มคือ บันทึก เพิ่ม ลบ
ซึ่งใน ปุ่มบันทึกมีโค้ดดังนี้
หมายเหตุ Homework คือ ชื่อฐานข้อมูล
HomeworkBindingSource.EndEdit()
HomeworkTableAdapter.Update(Database11DataSet.homework)
ปุ่มเพิ่มมีดังนี้
HomeworkBindingSource.AddNew()
ปุ่มลบมีดังนี้
HomeworkBindingSource.RemoveCurrent()
HomeworkBindingSource.EndEdit()
HomeworkTableAdapter.Update(Database11DataSet.homework)
ซึ่งผมต้องการให้ปุ่มลบนั้น แสดง Form ขึ้นมาว่า ต้องการลบหรือไม่เพื่อยืนยัน
ผมจึงสร้าง ฟอร์ม2 ขึ้นมา
หลังจากนั้น ผมได้เปลี่ยน โค้ดของปุ่มลบเป็น
Form2.show
เมื่อกดแล้วฟอร์ม2 ก็เด้งขึ้มมา
ซึ่งในฟอร์ม 2 ประกอบด้วย ปุ่ม ใช่ กับ ไม่
ซึ่งโค้ดในปุ่มไม่ของฟอร์ม 2 นั้น
ได้มีโค้ดดังนี้
Me.close
ซึ่งปัญหา คือ ในปุ่มใช่นั้น ผมจะเขียนโค้ดอย่างไรให้สามารถลบและบันทึกค่าที่เรากระทำได้ ช่วยหน่อยนะครับ เด็ก ม.2
ขอบคุณมากครับ