+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : تصفح الداتاغريد فيو (/showthread.php?tid=45911)
تصفح الداتاغريد فيو - kebboud - 16-04-23
السلام عليكم إخوتي
عندي داتاغريد فيو تستقبل بياناتها من داتاتابل و هذا الداتاتابل يتم تزويده ببيانات ليس مصدرها قاعدة بيانات معينة
المهم أن هذه الداتاغريدفيو بها 60 صف من البيانات
أريد أن أعمل لها PAGINATION أو تصفح بحيث تعرض كل مرة 7 صفوف
شكرا إخواني
(16-04-23, 07:08 PM)kebboud كتب : السلام عليكم إخوتيأين الأخوة المبرمجين ؟
عندي داتاغريد فيو تستقبل بياناتها من داتاتابل و هذا الداتاتابل يتم تزويده ببيانات ليس مصدرها قاعدة بيانات معينة
المهم أن هذه الداتاغريدفيو بها 60 صف من البيانات
أريد أن أعمل لها PAGINATION أو تصفح بحيث تعرض كل مرة 7 صفوف
شكرا إخواني
لماذا لم يجيبوني ؟
لا حول و لا قوة إلا بالله العلي العظيم
أين الأخوة المبرمجين ؟
RE: تصفح الداتاغريد فيو - Taha Okla - 16-04-23
وعليكم السلام ورحمة الله وبركاته
أظن أن أغلبهم يقيمون العشر الأواخر من رمضان بين قيام وتسبيح وقراءة لكتاب الله..
هنيئاً لمن لم تشغله الدنيا عن التعبد لله في هذه الأيام وفضلها..
RE: تصفح الداتاغريد فيو - kebboud - 16-04-23
(16-04-23, 09:17 PM)Taha Okla كتب : وعليكم السلام ورحمة الله وبركاتههههههه
أظن أن أغلبهم يقيمون العشر الأواخر من رمضان بين قيام وتسبيح وقراءة لكتاب الله..
هنيئاً لمن لم تشغله الدنيا عن التعبد لله في هذه الأيام وفضلها..
هل هذا إفتعال عذر لعدم الإجابة على سؤالي ؟
RE: تصفح الداتاغريد فيو - عبد العزيز البسكري - 16-04-23
هذا فيديو من على قناتي على اليوتوب لعله يفيد إن شاء الله
RE: تصفح الداتاغريد فيو - Taha Okla - 16-04-23
(16-04-23, 10:03 PM)kebboud كتب :(16-04-23, 09:17 PM)Taha Okla كتب : وعليكم السلام ورحمة الله وبركاتههههههه
أظن أن أغلبهم يقيمون العشر الأواخر من رمضان بين قيام وتسبيح وقراءة لكتاب الله..
هنيئاً لمن لم تشغله الدنيا عن التعبد لله في هذه الأيام وفضلها..
هل هذا إفتعال عذر لعدم الإجابة على سؤالي ؟
هذا ليس اعتذار عن نفسي ..
فأنا أجاوبك من وراء مكتب عملي .. متواجد دوماً أو بالأصح على الأغلب متواجد في أغلب الأوقات..
----
ولكن هذا اعتذار عن الذين لم نرهم خلال هذا الشهر الكريم .. إلا نادراً ..
وكل شخص لم يجاوب هو معذور ولو كان بدون عذر..
فليس لأي أحد هنا حق ليلزم غيره بالجواب - وليس له الحق بأن يلومه بالتقصير..
..
RE: تصفح الداتاغريد فيو - kebboud - 18-04-23
(16-04-23, 10:17 PM)Taha Okla كتب :ههههه(16-04-23, 10:03 PM)kebboud كتب :(16-04-23, 09:17 PM)Taha Okla كتب : وعليكم السلام ورحمة الله وبركاتههههههه
أظن أن أغلبهم يقيمون العشر الأواخر من رمضان بين قيام وتسبيح وقراءة لكتاب الله..
هنيئاً لمن لم تشغله الدنيا عن التعبد لله في هذه الأيام وفضلها..
هل هذا إفتعال عذر لعدم الإجابة على سؤالي ؟
هذا ليس اعتذار عن نفسي ..
فأنا أجاوبك من وراء مكتب عملي .. متواجد دوماً أو بالأصح على الأغلب متواجد في أغلب الأوقات..
----
ولكن هذا اعتذار عن الذين لم نرهم خلال هذا الشهر الكريم .. إلا نادراً ..
وكل شخص لم يجاوب هو معذور ولو كان بدون عذر..
فليس لأي أحد هنا حق ليلزم غيره بالجواب - وليس له الحق بأن يلومه بالتقصير..
..
يا صديقي العزيز
أنت تحفة من تحف هذا المنتدى العريق و نحن نعتز بك و نحترمك
على كل حال كنت أمزح معك
(16-04-23, 10:08 PM)عبد العزيز البسكري كتب :هذا فيديو من على قناتي على اليوتوب لعله يفيد إن شاء الله
شكرا أخي الكريم عبد العزيز
RE: تصفح الداتاغريد فيو - foo - 18-04-23
ضع هذا السطر في كلاس الفورم
كود :
Dim yyy As Integer = 0في اخر حدث load للفورم اي بعد ملء الداتاتابل ضع هذا الكود
كود :
DataGridView1.DataSource = dt.AsEnumerable.Skip(yyy).Take(7).CopyToDataTableاضف مفتاح button1 للرجوع بالصفحات للخلف وهذا كوده
كود :
yyy -= 7
If yyy < 0 Then yyy = 0
DataGridView1.DataSource = dt.AsEnumerable.Skip(yyy).Take(7).CopyToDataTableواضف مفتاح button2 للتقدم بالصفحات للامام وهذا كوده
كود :
yyy += 7
If yyy > dt.Rows.Count - 1 Then yyy -= 7
If yyy < 0 Then yyy = 0
DataGridView1.DataSource = dt.AsEnumerable.Skip(yyy).Take(7).CopyToDataTableRE: تصفح الداتاغريد فيو - kebboud - 20-04-23
(18-04-23, 05:30 PM)foo كتب : ضع هذا السطر في كلاس الفورم
كود :
Dim yyy As Integer = 0
في اخر حدث load للفورم اي بعد ملء الداتاتابل ضع هذا الكود
كود :
DataGridView1.DataSource = dt.AsEnumerable.Skip(yyy).Take(7).CopyToDataTable
اضف مفتاح button1 للرجوع بالصفحات للخلف وهذا كوده
كود :
yyy -= 7
If yyy < 0 Then yyy = 0
DataGridView1.DataSource = dt.AsEnumerable.Skip(yyy).Take(7).CopyToDataTable
واضف مفتاح button2 للتقدم بالصفحات للامام وهذا كوده
كود :
yyy += 7
If yyy > dt.Rows.Count - 1 Then yyy -= 7
If yyy < 0 Then yyy = 0
DataGridView1.DataSource = dt.AsEnumerable.Skip(yyy).Take(7).CopyToDataTable
السلام عليكم الأخ foo
الكود الذهبي الذي أرسلت حل المشكلة 100 في المائة
شكرا من الأعماق
ترليون شكرا
و عيدا مباركا