[العيدروس]

السلام عليكم.اخواني رجاء المساعدة.عندي بالجدول حقل للتاريخ و حقل لتوقيت البداية و توقيت نهاية الموعد.اريد عندما اضغط على زر الامر يقوم بفحص الحجدول بحيث لا يمكن اختيار نفس التاريخ و نفس توقيت البداية و النهاية .يعني لما يكون التاريخ و التوقيت به حجز لا يمكن لي الحجز بنفس الموعد و نفس التوقيت ما عرفت كيف اضبط هذا الجزء بارك الله فيكم

كود :

   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

[العيدروس]

الله يجبر بخاطرك اخ ابراهيم المحترم مشى الحال بفضل الله ثم فضلك اشكرك جزيل الشكر و بارك الله فيك و انعم عليك