20-04-19, 11:49 AM
الشكر لله والحمد لله والحمد لله على كل حال
كل ما عليك ان تاتى فى حدث Form1_Load
وتقوم بوضع الكود التالى
كود :
MaskedTextBox1.Text = Date.Now.ToString("HH") & ":30"
MaskedTextBox2.Text = Date.Now.ToString("HH") + 1 & ":29"فهنا يمكنك اخفاء اداء MaskedTextBox
أو تركه لجعل المستخدم يكتب ما يشاء من وقت كالبحث
واذا كنت لا ترد استخدام MaskedTextBox
فقط تعال على Button2_Click
واجعل الكود بهذا الشكل
كود :
For Each a As ListViewItem In ListView1.Items
If a.Text <= Date.Now.ToString("HH") + 1 & ":29" AndAlso a.Text >= Date.Now.ToString("HH") & ":30" Then
a.BackColor = Color.Green
'MsgBox(a.SubItems.Item(1).Text) ' لجلب النص بجانب الساعة
End If
Nextوبكده يمكنك حذف الاداء مع اى حدث خاص به
تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى
لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله
▼ شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى
لكل من يقوم بالمساهمةفى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله
▼ شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية

