عمل رسالة استفهامية ب yes/no - نسخة قابلة للطباعة +- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb) +-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182) +--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183) +--- الموضوع : عمل رسالة استفهامية ب yes/no (/showthread.php?tid=16049) |
عمل رسالة استفهامية ب yes/no - نسيم - 05-06-16 في كود الحقظ لدي اريد عمل شرط يحتوي على رسالة استفهامية محتواها مثلا هل تريد الحفظ بنفس البيانات نعم / لا ؟ وكتبت الكود كالاتي: If MsgBox("يوجد بيانات باسم السيد" & vbCrLf & vbCrLf & Space(4) & TextBox1.Text & Space(4) & "هل تريد الاستمرار ؟", MsgBoxStyle.YesNo, ) = MsgBoxResult.No Then e.no= True Else ولكنها تعطي خطأ : 'no is not a member of 'system.eventarges فكيف لي عمل رسالة باستخدام yes/no وشكرا RE: عمل رسالة استفهامية ب yes/no - ابو ليلى - 05-06-16 كود : Dim Deletes As DialogResult = MessageBox.Show("سيتم حذف السجل الحالي", "انتبه", MessageBoxButtons.YesNo, MessageBoxIcon.Warning, MessageBoxDefaultButton.Button2, MessageBoxOptions.RightAlign) RE: عمل رسالة استفهامية ب yes/no - ابراهيم كركوكي - 05-06-16 (05-06-16, 11:32 AM)نسيم كتب : في كود الحقظ لدي اريد عمل شرط يحتوي على رسالة استفهامية محتواها مثلا هل تريد الحفظ بنفس البيانات نعم / لا ؟Dim ms As Byte ms = MsgBox ("هل تريد الخروج", MsgBoxStyle.OkCancel + MsgBoxStyle.Question, "رسالة خطأ") If ms = 1 Then Me.Close ElseIf ms = 2 Then Beep Exit Sub End If |