[ابو ليلى]

كود :

               Dim Deletes As DialogResult = MessageBox.Show("سيتم حذف السجل الحالي", "انتبه", MessageBoxButtons.YesNo, MessageBoxIcon.Warning, MessageBoxDefaultButton.Button2, MessageBoxOptions.RightAlign)


               If DeletStud = Windows.Forms.DialogResult.Yes Then
'اكتب ما تريد هنا

               End If