تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مساعدة في datatGridviwe
#1
عندي قريد فيها عمود عباره عن زر + بيانات السجل 
لما يضغط على الزر يعرض بياناته في شاشه أخرى

المشكله أن عندما يضغط الزر عرض البيانات ياخذ من 4-5 ثواني والمعالج الله يصلحه يضغط ورى بعض كثير لحد ما يعلق البرنامج ولا فيه حل إلى أن يتقفل البرنامج كامل 
كيف أتجاوز هذه المشكله
الرد
تم الشكر بواسطة:
#2
ضع مثال ليتم التعديل عليه أو ضع الكود لمعرفة مكان الخطأ فيه
الرد
تم الشكر بواسطة: DOX.1
#3
ضع الكود المستخدم
الرد
تم الشكر بواسطة: DOX.1
#4
كود :
Dim sRow As DataGridViewRow = DGV.Rows(e.RowIndex)
         

 If e.ColumnIndex = Me.DGV.Columns(0).Index Then

" تنفيذ أمر برمجي
end if

كود :
Dim sRow As DataGridViewRow = DGV.Rows(e.RowIndex)
         

 If e.ColumnIndex = Me.DGV.Columns(0).Index Then

" تنفيذ أمر برمجي
end if
الرد
تم الشكر بواسطة:
#5
جرب هذا : e.ColumnIndex = 2 .
2 هو رقم عامود الموجود فيه الزر .

كود القيمة المراد عرضها بالمسج بوكس Dim valueXT As String = DataGridView1.Rows(e.RowIndex).Cells(0).Value

كود :
   Private Sub DataGridView1_CellContentClick(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellContentClick
    If e.ColumnIndex = 2 Then
        Dim valueXT As String = DataGridView1.Rows(e.RowIndex).Cells(0).Value
        If valueXT = Nothing Then Exit Sub
        MsgBox(valueXT.ToString)
    Else
        Exit Sub
    End If
End Sub
الرد
تم الشكر بواسطة: rnmr , نور الهدى الهدى , DOX.1 , DOX.1
#6
(09-10-18, 08:36 PM)DOX.1 كتب :
كود :
Dim sRow As DataGridViewRow = DGV.Rows(e.RowIndex)
         

 If e.ColumnIndex = Me.DGV.Columns(0).Index Then

" تنفيذ أمر برمجي
end if

نسخت الكود كما هو وجربته ولم أجد أي بطئ
الرد
تم الشكر بواسطة: asemshahen5 , asemshahen5 , نور الهدى الهدى , DOX.1 , DOX.1
#7
برائي انته لا تحتاج إلى if

كل اللي تحتاجه عند النقر على الصف ياخذ قيمة Id

ثم يفتح الشاشة الأخرى وبموجب Id تعرض السجلات .

ولجلب قيمة Id :

لنفرض انه في العمود الأول :

في حدث cellmouceclick


كود :
Private Sub DataGridView1_CellMouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellMouseEventArgs) Handles DataGridView1.CellMouseClick

ضع هذا الكود :

كود :
id = DataGridView1.Item(0, e.RowIndex).Value
Form2.Show


ثم في فورم2 في حدث Load


كود :
Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Load

تكتب استعلام بموجب id (يجب عليك تعريف متغير عام في موديول على مستوى المشروع كامل) هكذا Public id As Integer
بسم الله الرحمن الرحيم > "اللَّهُ نُورُ السَّمَاوَاتِ وَالْأَرْضِ ۚ مَثَلُ نُورِهِ كَمِشْكَاةٍ فِيهَا مِصْبَاحٌ ۖ الْمِصْبَاحُ فِي زُجَاجَةٍ ۖ الزُّجَاجَةُ كَأَنَّهَا كَوْكَبٌ دُرِّيٌّ يُوقَدُ مِن شَجَرَةٍ مُّبَارَكَةٍ زَيْتُونَةٍ لَّا شَرْقِيَّةٍ وَلَا غَرْبِيَّةٍ يَكَادُ زَيْتُهَا يُضِيءُ وَلَوْ لَمْ تَمْسَسْهُ نَارٌ ۚ نُّورٌ عَلَىٰ نُورٍ ۗ يَهْدِي اللَّهُ لِنُورِهِ مَن يَشَاءُ ۚ وَيَضْرِبُ اللَّهُ الْأَمْثَالَ لِلنَّاسِ ۗ وَاللَّهُ بِكُلِّ شَيْءٍ عَلِيمٌ" < صدق الله العظيم
الرد


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] مطلوب مساعدة في برنامج يحدث اخطاء ay.alhaj 14 254 اليوم, 12:57 AM
آخر رد: ay.alhaj
  مساعدة هامة : احتاج طريقة مرنه لعرض منتجات من الداتا بيز في شكل صور او حتى button mohamedgadain61 1 38 اليوم, 12:24 AM
آخر رد: عبد العزيز البسكري
  [VB.NET] مساعدة بخصوص كود الحفظ ay.alhaj 19 271 04-10-18, 10:22 PM
آخر رد: ay.alhaj
  [سؤال] مساعدة في كود تحديث برنامج ScreamVoice 9 139 03-10-18, 02:48 PM
آخر رد: ScreamVoice
  احتاج مساعدة ارجوكم naderalkeng54 11 235 29-09-18, 12:01 PM
آخر رد: naderalkeng54
  مساعدة فى برنامج اصنعوة (مكرار) naderalkeng54 4 105 28-09-18, 10:59 AM
آخر رد: naderalkeng54
  مساعدة في كود التعديل يتم التعديل لكن لا يقف على نفس الصف المعدل في الداتا جريد فيو essawq 22 543 26-09-18, 11:36 PM
آخر رد: elgokr
  مساعدة جزاكم الله كل خير fouadhdfouad 2 93 21-09-18, 01:55 PM
آخر رد: fouadhdfouad
  [VB.NET] اريد مساعدة فى برنامج اصنعة فى الفجول بسك naderalkeng54 4 232 18-09-18, 03:04 PM
آخر رد: naderalkeng54
  مساعدة في طريقة تضمين خط معين للمشروع essawq 9 225 12-09-18, 08:02 AM
آخر رد: elgokr

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


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