السلام عليكم.اخواني رجاء المساعدة.عندي بالجدول حقل للتاريخ و حقل لتوقيت البداية و توقيت نهاية الموعد.اريد عندما اضغط على زر الامر يقوم بفحص الحجدول بحيث لا يمكن اختيار نفس التاريخ و نفس توقيت البداية و النهاية .يعني لما يكون التاريخ و التوقيت به حجز لا يمكن لي الحجز بنفس الموعد و نفس التوقيت ما عرفت كيف اضبط هذا الجزء بارك الله فيكم
كود :
If Dt = Dr.Item(0) And Time_Begin >= Real_Begin Then
السلام عليكم ورحمة الله وبركاته
اخي الكريم العيدروس
اعتقد ان المواعيد المحجوزة مسجلة في جدول وهنا سنبحث عنها
لكن انتبه للداتا تابل التي تجلب كل البيانات يجب ان تكون معرفة على مستوى الكلاس لتكون مرئية في حدث التحقق حتى نبحث في صفوفها
كود :
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
For i As Integer = 0 To dt.Rows.Count - 1
If CDate(dt.Rows(i).Item("CV_BirthDay")) >= DateTimePicker1.Value Then
MsgBox("هذا الموعد محجوز")
End If
Next
End Sub
أشكرك جزيل الشكر أخ ابراهيم .الفكرة هي صالة أفراح .. العقبى لنا جميعا و يا رب يجعل أيامنا و ليالينا كلها أفراح ان شاء الله و يتم حجز المواعد .. يعني الحجز بالساعات و ادخل توقيت البداية و توقيت النهاية بالداتتيمر بيكر 1 للبداية و الداتبيكر 2 لتوقيت النهاية اريد لو اجي اعمل حجز في هذا التوقيت بين داتبيكر 1 و 2 تظهرلي رسالة بارك الله فيك اخي
اخي الكريم العيدروس
لسا بحاجة الى موعد البداية يكفي موعد النهاية للمقارنة به مع DateTimePecker
اختر الموعد منها وقم بالتحقق عبر حلقة فور على حقل المواعيد
الا اذا كان لديك فجوات في المواعيد هذه الان خطرت في بالي هنا تحتاج الى 2 DateTimePicker
واحد للبداية والاخر للنهاية
كود :
For i As Integer = 0 To dt.Rows.Count - 1
If CDate(dt.Rows(i).Item("CV_Day")) >= DateTimePicker1.Value And CDate(dt.Rows(i).Item("CV_Day")) <= DateTimePicker2.Valueand Then
MsgBox("هذا الموعد محجوز")
End If
Next
الله يجبر بخاطرك اخ ابراهيم المحترم مشى الحال بفضل الله ثم فضلك اشكرك جزيل الشكر و بارك الله فيك و انعم عليك