تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
وضع شروط للداتا جريد فيو
#1
السلام عليكم
هذا البرنامج به كود لتلوين الخلايا في الداتا جريد فيو عرفته من العضو المحترم الاستاذ : احمد النجار .. وان شاء الله سيكون مفيدا لبقية الاعضاء
ينقصني معرفة كود يقوم بالاتي
1- اذا ادخلت الدرجة degree قيمة حرفية يقوم البرنامج بعمل الاتي : جعل قيمة الخلية فارغة nothing .. عرض رسالة " هذا الطالب غائب .. ينتقل للخلية التالية
حاولت بكود معين معرفتش ..
2- هل ينفع وضع كود شرط التلوين تحت الحدث cellvalldating للداتا جريد فيو
وشكرا .. البرنامج مرفق
البرنامج صممته بـ 2008 .. برجاء اذا تم الحل رفعه بـ 2008
أو كتابة الكود افضل من الرفع


الملفات المرفقة
.rar   Mr_Ahmed.rar (الحجم : 410.24 ك ب / التحميلات : 120)
الرد }}}}
تم الشكر بواسطة:
#2
في حدث Table1DataGridView_CellBeginEdit اكتب التالي
كود :
If Not IsNumeric(Table1DataGridView.CurrentRow.Cells(2)) Then
            Table1DataGridView.CurrentRow.Cells(2).Value = ""
            MsgBox("هذا الطالب غائب")
            Table1DataGridView.CurrentRow.Cells(2).Style.BackColor = Color.Red
        End If
الرد }}}}
تم الشكر بواسطة:
#3
بسم الله الرحمن الرحيم
شكرا جزيلا للاخ الاستاذ احمد .. والله استفدت كثيرا من مشاركاتك .... واحرص على انشر ما توصلت اليه من غيري أو مني حتى ولو كان بسيطا لاني اشعر بمعاناة المبتدئين امثالي ..
اسمح لي لقد عدلت على كود سيادتك والحمد لله نجح إلا في نقطه بسيطة
كتب في حدث CellValidating الكود الاتي فلا ينفذ سطر حذف المحتويات الحرفية من الخلية ولكن يعطي رسالة خطأ .. جربتها في حدث CellBeginEdit ترفض العمل أصلا
أريد عدم ظهور تلك الرسالة وتنفيذ سطر حذف محتويات الخلية شكرا لكم جميعا وجمعه مباركة إن شاء الله
()Private Sub Table1DataGridView_CellValidating
If Table1DataGridView.CurrentCell.ColumnIndex = 0 Then
If Table1DataGridView.IsCurrentCellDirty Then

If IsNumeric(e.FormattedValue) Then
If Val(e.FormattedValue) Mod 2 = 0 Then
Table1DataGridView.CurrentRow.Cells(2).Style.BackColor = Color.Gray
End If
Else
MsgBox("أنك وضعت قيمة حرفية")
REM لا ينفذ هذه الجملة ويعطي رسالة خطأ ويترك الخلية كما هي ولا يجعل قيمتها فارغة
Table1DataGridView.CurrentRow.Cells(2).Value = ""

e.Cancel = True
End If
End If
End If
الرد }}}}
تم الشكر بواسطة:
#4
السلام عليكم ورحمة الله وبركاته

أنسخ الكود أو الحدث التالى كما هو فارغ ولا تكتب فيه أي شيئ .... وجرب
PHP كود :
Private Sub Table1DataGridView_DataError(ByVal sender As ObjectByVal e As System.Windows.Forms.DataGridViewDataErrorEventArgsHandles Table1DataGridView.DataError

    End Sub 


Abu Ehab : Microsoft Partner  & Systems Developer
الرد }}}}
تم الشكر بواسطة:
#5
أعتقد ممكن الخطأ يكون في أن الحقل نوع بياناته رقمي فعند وضع قيمة نصية لا يقبها

جرب تغيير نوع البيانات في الجدول إلى نوع نصي
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] شباب كيفية انقاص او طرح الكمية الموضوعة فى الداتا جريد من الجدول احمد عبد الحكيم 2 310 04-10-16, 11:37 PM
آخر رد: benomar
  احتاج مساعدة في الداتا جريد فيو Mo_rb 8 304 18-06-16, 04:28 PM
آخر رد: boudyonline
  مشكلة الترقيم التلقائي للعمود الاول في الداتا جريد فيو kofa 31 728 18-06-16, 03:53 AM
آخر رد: khodor1985
  أريد منع المستخدم من تعديل خلية معينة في داتا جريد ؟؟؟ Abdh111 3 162 05-06-16, 09:28 PM
آخر رد: khodor1985
  حفظ من سطر جريد فيو له قيمة شيك بوكس djelloul 3 254 02-04-16, 07:18 AM
آخر رد: khodor1985
  إنشاء جريد فيو من جدولين djelloul 4 299 01-04-16, 11:33 PM
آخر رد: djelloul
  كود عدم تكرار البيانات بالداتا جريد فيو ِAbou Sama 3 764 29-12-15, 09:09 PM
آخر رد: العواد الصغير
  [سؤال] في حالة حذف او اضافة صف جديد بالداتا جريد فيو عند التعديل لا تتأثر قاعدة البيانات ِAbou Sama 0 501 26-12-15, 03:52 AM
آخر رد: ِAbou Sama
  مساعده في عدم استجابة قاعدة البيانات الي التعديل في الداتا جريد فيو ِAbou Sama 4 413 25-12-15, 08:59 AM
آخر رد: silverlight
  [سؤال] هل من كود لعمل update set لبيانات الجدول من الداتا جريد احمد عبد الحكيم 7 619 18-12-15, 06:55 PM
آخر رد: احمد عبد الحكيم

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم