ตัวอย่างการใช้งาน DialogResult ใน VB.Net

เวลาเราต้องการจะให้แสดง DialogResult ขึ้นมาเพื่อให้ผู้ใช้ยืนยันให้มั่นใจว่าท่านรู้ตัวหรือไม่ว่าท่านกำลังทำอะไรอยู่ (หากไม่รู้ตัวก็จงอย่าทำ เพราะอาจจะทำให้เกิดข้อผิดพลาดข้อมูลที่สำคัญถูกเปลี่ยนแปลงไปจนไม่อาจกู้ข้อมูลกลับมาเหมือนเดิมได้) ตัวอย่าง ตัวอย่างการใช้งาน DialogResult ใน VB.Net มีดังนี้

Dim result1 As DialogResult = MessageBox.Show("Do you want to delete the data? ", "Confirm dialog", MessageBoxButtons.YesNo, MessageBoxIcon.Question)


If result1 = DialogResult.Yes Then
...
...
End If