(10-07-19, 11:29 PM)ابراهيم ايبو كتب : السلام عليكم ورحمة الله وبركاته
اخي ابو روضة هذا مثال عملته مبدئيا على وجه السرعة فيه بعض الامور بحاجة الى تعديلات اجلتها الى وقت أخر
وفيه قاعدة بيانات لحفظ المواقيت (يكفي 7 سجلات حتى لايطول شرط التحقق)
انتبه الى صيغة الوقت والتاريخ اترك الصيغة كما هي فقط عدل القيم بما تريد واحفظ التعديل (الثواني مطلوبة)
لاتحذف السجلات او اي سجل فقط عدل - واذا اضفت سجلا جديدا تجتاج الى تعريفه ووضعه في شرط التحقق في حدث التايمر ..
جربه هكذا ثم ضع كود من عندك لتشغيل صوت او فيديو او كود بسيط وتحقق
وان اعجبك العمل لاتنسني من الدعاء لوالدتي واختي
دمت بخير
ملاحظة: بعد التعدبل قم بالخروج من البرنامج ثم اعد التشغيل لتأخذ المتغيرات القيم الجديدة
(11-07-19, 12:29 AM)Eng.Ahmed Amen كتب : (10-07-19, 11:19 PM)ابو روضة كتب : (10-07-19, 10:54 PM)Eng.Ahmed Amen كتب : تفضل عدل المتغيرات والشرط فقط
PHP كود :
Dim kk As Date = DateTimePicker1.Value
Dim gg As Date = Now
Dim result As Integer = DateTime.Compare(gg, kk)
' If gg = kk Then
If result = 0 Or result = 1 Then
MsgBox("exx")
End If
لم ينفع أخى شكرا لك
الكود شغال 100% , حضرتك اكيد طبقت غلط ,
جزاكم الله كل الخير إخوتى الكرام لكن انا فقط اريد تنفيذ هذا الكود بوقت أحدده انا
فهذا الكود موجود داخل التايمر أصلاً...
كود :
For r As Integer = 0 To CheckedListBox1.Items.Count - 1
If CheckedListBox1.GetItemChecked(r) = True Then
CheckedListBox1.SetSelected(r, True)
CheckedListBox1.SetItemChecked(r, False)
If Not (r = CheckedListBox1.Items.Count) Then
GoTo GoToHere1
Else
GoTo GoToHere2
End If
End If
Next
Button1.Enabled = True
MsgBox("DON")
Timer1.Stop()
GoToHere1:
Exit Sub
GoToHere2:
فقط أريد هذا الكود يعمل مثلا الساعة 11 مساءا أو أى وقت أنا أحدده يعنى الموضوع مش محتاج
قاعدة بيانات أى أى شيئ أخر على ما أظن