تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] مساعدة في برنامج تتبع الاوقات
#1
السلام عليكم

اعمل على برنامج تتبع الاوقات

ولدي ListView واثناء اضافة زبون جديد لايظهر في ListView
فقمت بعمل الاتي :


كود :
Private Sub ListView1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListView1.SelectedIndexChanged
       ListView1.Items.Clear()

       For Each dr As DataRow In dc.ShowData().Rows

           Dim item As New ListViewItem(dr("Code_ID").ToString())
           item.SubItems.Add(dr("Code_num").ToString())
           item.SubItems.Add(dr("Code_Timein").ToString())
           item.SubItems.Add(dr("Code_Timeout").ToString())
           item.SubItems.Add(dr("Code_mount").ToString())
           item.SubItems.Add("")
           ListView1.Items.Add(item)

           For i As Integer = 0 To ListView1.Items.Count - 1 Step 1
               If Val(ListView1.Items(i).SubItems(3).Text < DateTime.Now.ToString("hh:mm:ss t")) Then
                   ListView1.Items(i).BackColor = Color.Red
                   ListView1.Items(i).ForeColor = Color.White
                   ListView1.Items(i).SubItems(5).Text = "إنتهى الوقت المحدد"

               Else
                   ListView1.Items(i).SubItems(5).Text = "لم ينته الوقت المحدد"
               End If
           Next

       Next
   End Sub
واي اضافة اقول بعملها تظهر لكن هناك شيء ناقص

ان اي شخص ينتهي الوقت الذي اقوم باضافته له لا يقوم بتظليله وقت الانتهاء فهل يوجد بديل ؟؟
الرد }}}}
تم الشكر بواسطة:
#2
تم الحل وشكرا للاخوة الكرام
الرد }}}}
تم الشكر بواسطة:
#3
مشكور على الحل
الرد }}}}
تم الشكر بواسطة:
#4
ادرج الحل لكي يستفيد الاخرين.. وجزاك الله خير
الرد }}}}
تم الشكر بواسطة:
#5
المشكلة اني لم اضع الكود في timer هذا كل شيء
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] مساعدة في نقل الصنف من شاشه البحث الي فاتوره الشراء gmailali 6 111 منذ 8 ساعة مضت
آخر رد: gmailali
  [كود] مساعدة في كود keyDown المبرمج العبقري 2 55 23-01-17, 01:49 AM
آخر رد: مساعدة
  [VB.NET] مساعدة في بحث CoderMM 0 45 22-01-17, 06:02 PM
آخر رد: CoderMM
  [VB.NET] اخ مساعدة الرجاء النظر الي هذا موضوع 3asfa~mdmra 5 136 21-01-17, 12:33 AM
آخر رد: 3asfa~mdmra
  [سؤال] كيف ابطل زر tab فى برنامج على الفيجوال بيسك Mohamed371 1 34 20-01-17, 02:11 AM
آخر رد: مساعدة
  [VB.NET] مساعدة حول تحيديث بينات جدول من جدول آخر kassa djeffal 1 40 19-01-17, 09:16 PM
آخر رد: ahmed.nabil
  ارجوا المساعدة في برنامج محاسبة فيجوال بيسك 2008 محمد بوقزاحة 8 193 19-01-17, 01:30 PM
آخر رد: محمد بوقزاحة
  [VB.NET] مساعدة لنشر موقعي safa 1 47 18-01-17, 11:11 AM
آخر رد: أبو عمر
  مساعدة فى انشاء نظام تسجيل و تسحيل الدخول Mohamed20 2 121 15-01-17, 11:48 PM
آخر رد: Mohamed20
  [اقتراح] كيف ممنكن اتجاوز برنامج التجريبي 3asfa~mdmra 10 225 15-01-17, 04:00 AM
آخر رد: الماجيك مسعد

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


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