لاختبار هذه الدالة إنشاء تقرير جديد استنادا إلى الجدول الزمني باستخدام "معالج التقارير التلقائية". عرض التقرير في طريقه العرض "تصميم". أضافه مربع نص غير منضم إلى المقطع التفاصيل الجدول تيميلوج وتعيين خصائصه كما يلي: Textbox --------------- Name: ElapsedTime ControlSource: =GetElapsedTime([EndTime]-[StartTime]) Width: 3 inches
معاينه التقرير. لاحظ ان كل سجل يعرض إجمالي الوقت المنقضي في الأيام والساعات والدقائق والثواني. داله العينة GetTimeCardTotal ()
لإنشاء الدالة Gettimecardtotal () ، اتبع الخطوات التالية:ملاحظه: يستخدم نموذج التعليمه البرمجية في هذه المقالة كائنات الوصول إلى بيانات Microsoft. حساب الفرق بين تاريخين في إكسل Excel - مركز البحوث والدراسات متعدد التخصصات. لهذه التعليمه البرمجية لتشغيل بشكل صحيح ، يجب الرجوع إلى مكتبه كائنات 3. 6 DAO Microsoft. للقيام بذلك ، انقر فوق مراجع في القائمة أدوات في محرر Visual Basic وتاكد من تحديد خانه الاختيار مكتبه كائنات Microsoft DAO 3. 6. إنشاء جدول جديد بالبنية التالية وحفظه ك بطاقة التوقيت. Table: TimeCard ----------------------- Field Name: Daily Hours Data Type: Date/Time Format: Short Time
عرض جدول بطاقة الوقت في طريقه العرض "ورقه البيانات" ، ادخل السجلات الاربعه التالية ثم قم بإغلاق الجدول: 8:15 7:37 8:12 8:03
Function GetTimeCardTotal () Dim db As base, rs As cordset Dim totalhours As Long, totalminutes As Long Dim days As Long, hours As Long, minutes As Long Dim interval As Variant, j As Integer Set db = paces(0).
- حساب الفرق بين تاريخين في إكسل Excel - مركز البحوث والدراسات متعدد التخصصات
- ادارة تعليم الليث - YouTube
- إدارة التعليم بمحافظة الليث
حساب الفرق بين تاريخين في إكسل Excel - مركز البحوث والدراسات متعدد التخصصات
الدالة Gettimecardtotal () بجمع حقل من قيم الوقت في جدول ويعرض الإجمالي في الساعات والدقائق. داله العينة جيلابسيددايز ()
لإنشاء الدالة Getايلاف سيددايز () ، اتبع الخطوات التالية:
فتح نموذج قاعده البيانات
إنشاء وحده نمطيه واكتب السطر التالي في المقطع التعريفات إذا لم يكن هناك بالفعل:
Option Explicit
اكتب الدالة التالية:
Function GetElapsedDays (interval) Dim days As Long days = Int(CSng(interval)) GetElapsedDays = days & " Days " End Function
لاختبار هذه الدالة إنشاء استعلام جديد استنادا إلى الجدول Orders (الطلبيات). في شبكه QBE ، أضف الحقول التالية. Field: ShippedDate Show: True Field: OrderDate Show: True Field: ElapsedTime: GetElapsedDays([ShippedDate]-[OrderDate]) Show: True
تشغيل الاستعلام. لاحظ ان العمود الوقت المنقضي يعرض عدد الأيام بين الحقل ShippedDate وحقل OrderDate لكل سجل في الجدول Orders (الطلبيات). داله العينة جيلابسيدتايم ()
لإنشاء الدالة Getايلاف سيدتايم () ، اتبع الخطوات التالية:
إنشاء جدول جديد بالبنية التالية وحفظه ك TimeLog.
databases(0) Set rs = Recordset("timecard") interval = #12:00:00 AM# While Not interval = interval + rs! [Daily hours] eNext Wend totalhours = Int(CSng(interval * 24)) totalminutes = Int(CSng(interval * 1440)) hours = totalhours Mod 24 minutes = totalminutes Mod 60 GetTimeCardTotal = totalhours & " hours and " & minutes & " minutes" End Function
لاختبار هذه الدالة اكتب السطر التالي في الإطار الحالي ثم ثم اضغط مفتاح الإدخال ENTER:? GetTimeCardTotal()
لاحظ ان الإطار الحالي يعرض 32 ساعة و 7 دقائق. المراجع
لمزيد من المعلومات حول حساب قيم التاريخ/الوقت ، انقر فوق رقم المقالة التالي لعرض المقالة في قاعده معارف Microsoft:
210276 تخزين بيانات التاريخ/الوقت وحسابها ومقارنهها
هل تحتاج إلى مزيد من المساعدة؟
وفي سياق متصل ناشد مدير المستودعات الطلاب والطالبات بالمحافظة على الكتاب المدرسي لأهميته الدينية والعلمية والمادية، موضحًا أن الدولة رعاها الله دفعت ملايين الريالات من أجل توفير الكتب وتوزيعها بالمجان. وعبر الثعلبي عن بالغ شكره وتقديره لمشرف المقررات المدرسية يحيى البركاتي والمشرفة بالمقررات المدرسية بالقسم النسوي سميرة الشيخ ولقادة وقائدات المدارس على جهودهم وتعاونهم ولزملائه موظفي المستودعات المركزية بالإدارة ومكاتب التعليم نظير جهودهم وتفانيهم من خلال العمل على فترتين صباحية ومسائية بكل إخلاص وإتقان.
ادارة تعليم الليث - Youtube
المحفظة الالكترونية
الصفحة الرئيسية تسجيل الدخول
تسجيل الدخول لبدء جلسة العمل الخاصة بك
الرجاء إدخال اسم المستخدم
يرجى إدخال كلمة المرور
تذكرنى
إدارة التعليم بمحافظة الليث
أنهت إدارة التعليم بمحافظة الليث ممثلة في إدارة المستودعات المركزية توزيع وترحيل المقررات الدراسية للفصل الدراسي الثاني ١٤٣٩/ ١٤٤٠هـ، إلى مكاتب التعليم ومدارس الليث (بنين وبنات) بمختلف المراحل الدراسية. ادارة تعليم الليث - YouTube. وأوضح مدير المستودعات المركزية بتعليم الليث وعضو لجنة الاستعداد المدرسي طلق بن دخيل الله الثعلبي قائلاً: تم صرف جميع المقررات الدراسية باستثناء اللغة الإنجليزية للمرحلة المتوسطة والتي سيتم صرفها حال وصولها من المطبعة. وأضاف: أن عملية الصرف والترحيل أتت بكل يسر وسهولة وبدون أي عوائق، وكل ذلك بتوفيق من الله عز وجل ثم بدعم وتوجيه مدير التعليم الدكتور زكي بن رزيق الحازمي وإشرافه المباشر وتوجيهاته المستمرة وتسخير كافة الإمكانات مما كان له بالغ الأثر في سرعة وصول المقررات الدراسية للمدارس. وتابع: فور وصول المقررات الدراسية للمستودعات من المطابع تم تشكيل فريق عمل من الزملاء بالمستودعات المركزية بالإدارة ومستودعات مكاتب التعليم بمحافظة أضم ومركز ربوع العين لتوزيعها وترحيلها بالتنسيق مع قادة وقائدات المدارس لضمان وصولها في وقت قياسي لهم. وطالب الثعلبي قادة وقائدات المدارس بجرد وفرز المقررات الدراسية والتأكد بأنها مطابقة لاستمارات الصرف وفق برنامج نور، وفي حال وجود عجز مخاطبة قسم المقررات المدرسية بالادارة أو الدخول عبر بوابة المستفيد لتسجيل العجز إن وجد.
الرئيسية
البرامج التدريبية
التسجيل ببوابة التدريب
التحقق من الشهادة
الشهادات
الشهادات السابقة
دليل المستخدم الأول
دليل المستخدم الثاني
دليل المدرب
دليل المتدرب
التعاميم
الملفات
اللوائح
التدريب والابتعاث
دليل المتدرب بالصيفي
دليل المدرب بالصيفي
بنين | 0111111111
بنات | 0111111111
إدارة التعليم بمحافظة الليث
استعادة كلمة المرور
لديك حساب؟ تسجيل الدخول