إرجاع متغير (سلسلة) يحتوي على تعبير منسقة وفقا للإرشادات المضمنة في تعبير تنسيق.
|
Warning هناك مشكلة في استخدام هذه الدالة. يمكن إرجاع آخر يوم اثنين في بعض السنوات التقويمية كأسبوع 53 عندما يجب أن يكون الأسبوع 1. لمزيد من المعلومات والحل البديل، راجع يمكن أن ترجع دالات تنسيق أو DatePart رقم أسبوع خاطئ ليوم الاثنين الماضي في السنة. |
بناء الجملة
Format( expression [, format ] [, firstdayofweek ] [, firstweekofyear ] )
يحتوي بناء جملة الدالة Format على هذه الوسيطات:
|
الوسيطة |
الوصف |
|
التعبير |
مطلوبة. أي تعبير صالح. |
|
تنسيق |
اختيارية. تعبير تنسيق صالح مسمى أو معرف من قبل المستخدم. |
|
أول يوم من الأسبوع |
اختيارية. ثابت يحدد اليوم الأول من الأسبوع. |
|
أولweekofyear |
اختيارية. ثابت يحدد الأسبوع الأول من السنة. |
الإعدادات
يمكن أن تستخدم وسيطة التنسيق مجموعة متنوعة من الإعدادات، اعتمادا على نوع بيانات وسيطة التعبير . راجع المقالات المدرجة في الجدول التالي للحصول على مزيد من المعلومات حول تعبيرات التنسيق الصالحة.
|
بالنسبة للتعبيرات التي تستخدم نوع البيانات هذا... |
راجع المقالة |
|
أي نوع |
|
|
تاريخ/وقت |
|
|
رقمية |
|
|
نص ومذكرات |
|
|
نعم/لا |
تحتوي وسيطة firstdayofweek على هذه الإعدادات:
|
ثابت |
قيمة |
الوصف |
|
نظام vbUseSystem |
0 |
استخدم إعداد واجهة برمجة تطبيقات NLS. |
|
VbSunday |
1 |
الأحد (افتراضي) |
|
vbMonday |
2 |
الاثنين |
|
vbTuesday |
3 |
الثلاثاء |
|
vbWednesday |
4 |
الأربعاء |
|
vbThursday |
5 |
الخميس |
|
vbFriday |
6 |
الجمعة |
|
vbSaturday |
7 |
السبت |
تحتوي وسيطةweekofyear الأولى على هذه الإعدادات:
|
ثابت |
قيمة |
الوصف |
|
نظام vbUseSystem |
0 |
استخدم إعداد واجهة برمجة تطبيقات NLS. |
|
vbFirstJan1 |
1 |
ابدأ بالأسبوع الذي يحدث فيه 1 يناير (افتراضي). |
|
vbFirstFourDays |
2 |
ابدأ بالأسبوع الأول الذي يحتوي على أربعة أيام على الأقل في السنة. |
|
vbFirstFullWeek |
3 |
ابدأ بالأسبوع الكامل الأول من السنة. |
ملاحظات
|
إلى تنسيق |
قم بما يلي |
|
أرقام |
استخدم تنسيقات رقمية مسماة معرفة مسبقا أو أنشئ تنسيقات رقمية معرفة من قبل المستخدم. |
|
التواريخ والأوقات |
استخدم تنسيقات التاريخ/الوقت المحددة مسبقا أو إنشاء تنسيقات التاريخ/الوقت المعرفة من قبل المستخدم. |
|
الأرقام التسلسلية للتاريخ والوقت |
استخدم تنسيقات التاريخ والوقت أو التنسيقات الرقمية. |
|
سلاسل |
إنشاء تنسيقات السلسلة المعرفة من قبل المستخدم. |
إذا حاولت تنسيق رقم دون تحديد تنسيق، يوفر التنسيق وظائف مشابهة لدالة Str ، على الرغم من أنه على علم دولي. ومع ذلك، لا تتضمن الأرقام الموجبة المنسقة كسلاسل باستخدام التنسيق مساحة بادئة محجوزة لعلامة القيمة؛ يحتفظ أولئك الذين تم تحويلهم باستخدام Str بالمساحة البادئة.
إذا كنت تقوم بتنسيق سلسلة رقمية غير مترجمة، فيجب عليك استخدام تنسيق رقمي معرف من قبل المستخدم للتأكد من حصولك على الشكل الذي تريده.
ملاحظة: إذا كان إعداد خاصية التقويم ميلاديا وكان التنسيق يحدد تنسيق التاريخ، فيجب أن يكون التعبير المقدم ميلاديا. إذا كان إعداد الخاصية Visual Basic Calendar هو الهجري، فيجب أن يكون التعبير المتوفر هو الهجري.
إذا كان التقويم ميلاديا، فإن معنى رموز تعبير التنسيق لم يتغير. إذا كان التقويم هو الهجري، فإن جميع رموز تنسيق التاريخ (على سبيل المثال، dddd، mmmm، yyyy) لها نفس المعنى ولكنها تنطبق على التقويم الهجري. تظل رموز التنسيق باللغة الإنجليزية؛ تعرض الرموز التي تؤدي إلى عرض النص (على سبيل المثال، AM وPM) السلسلة (الإنجليزية أو العربية) المقترنة بهذا الرمز. يتغير نطاق رموز معينة عندما يكون التقويم هو الهجري.
|
الرمز |
Range |
|
d |
1-30 |
|
dd |
1-30 |
|
ww |
1-51 |
|
mmm |
يعرض أسماء الأشهر الكاملة (لا تحتوي أسماء الأشهر الهجرية على اختصارات). |
|
y |
1-355 |
|
yyyy |
100-9666 |
أمثلة
استخدام الدالة Format في تعبير يمكنك استخدام التنسيق حيثما يمكنك استخدام التعبيرات. على سبيل المثال، يمكنك استخدامه في استعلام كجزء من اسم مستعار للحقل، أو في الخاصية Control Source لمربع نص في نموذج أو تقرير. تعرض الأمثلة التالية تعبيرا قد تستخدمه في خاصية Filter الخاصة بالتقرير للحد من الإخراج إلى سجلات من الأسبوع السابق.
Format([Date],"ww")=Format(Now(),"ww")-1
في هذا المثال، يحتوي مصدر سجلات التقرير على حقل يسمى Date، والذي يحتوي على التاريخ الذي تم فيه تعديل كل سجل معين، والذي يتم استخدامه في التقرير. عند تشغيل التقرير، تتم تصفية نتائجه لإظهار السجلات التي يكون فيها أسبوع القيمة في حقل التاريخ (Format([Date],"ww")) مساويا للأسبوع السابق (Format(Now(),"ww")-1).
استخدام الدالة Format في التعليمات البرمجية ل VBA
ملاحظة: توضح الأمثلة التالية استخدام هذه الدالة في وحدة Visual Basic for Applications (VBA). لمزيد من المعلومات حول العمل مع VBA، حدد مرجع المطور في القائمة المنسدلة بجوار البحث وأدخل مصطلحا واحدا أو أكثر في مربع البحث.
يوضح هذا المثال استخدامات مختلفة لدالة Format لتنسيق القيم باستخدام كل من التنسيقات المسماة والتنسيقات المعرفة من قبل المستخدم. بالنسبة لفاصل التاريخ (/)، وفاصل الوقت (:)، والحرفية AM/ PM، يعتمد الإخراج المنسق الفعلي الذي يعرضه النظام على إعدادات الإعدادات المحلية للكمبيوتر الذي يتم تشغيل التعليمات البرمجية عليه. عند عرض الأوقات والتواريخ في بيئة التطوير، يتم استخدام تنسيق الوقت القصير وتنسيق التاريخ القصير لللغة البرمجية. عند عرضها عن طريق تشغيل التعليمات البرمجية، يتم استخدام تنسيق الوقت القصير وتنسيق التاريخ القصير للترجمة المحلية للنظام، والتي قد تختلف عن لغة التعليمات البرمجية. على سبيل المثال، يتم افتراض اللغة الإنجليزية الأمريكية.
يتم عرضMyTimeMyDate في بيئة التطوير باستخدام إعداد الوقت القصير للنظام الحالي وإعداد التاريخ القصير.
Dim MyTime, MyDate, MyStrMyTime = #17:04:23#MyDate = #January 27, 1993#' Returns current system time in the system-defined long time format.MyStr = Format(Time, "Long Time")' Returns current system date in the system-defined long date format.MyStr = Format(Date, "Long Date")MyStr = Format(MyTime, "h:m:s") ' Returns "17:4:23".MyStr = Format(MyTime, "hh:mm:ss AMPM") ' Returns "05:04:23 PM".MyStr = Format(MyDate, "dddd, mmm d yyyy") ' Returns "Wednesday, ' Jan 27 1993".' If format is not supplied, a string is returned.MyStr = Format(23) ' Returns "23".' User-defined formats.MyStr = Format(5459.4, "##,##0.00") ' Returns "5,459.40".MyStr = Format(334.9, "###0.00") ' Returns "334.90".MyStr = Format(5, "0.00%") ' Returns "500.00%".MyStr = Format("HELLO", "<") ' Returns "hello".MyStr = Format("This is it", ">") ' Returns "THIS IS IT".
استخدام التنسيق مع سلاسل ذات طول صفري
في الإصدار 2.0 من Microsoft Access والإصدارات السابقة، يمكنك استخدام الدالة Format لإرجاع قيمة واحدة سلسلة فارغة وأخرى لقيمة. على سبيل المثال، يمكنك استخدام تعبير تنسيق مثل ما يلي مع الدالة Format لإرجاع قيمة السلسلة المناسبة من التعليمات البرمجية:
Dim varX As VariantDim varStrX As Variant' Assign some value to varStrX and pass to Format function.varX = Format(varStrX, "@;ZLS;Null")
في إصدارات Microsoft Access 97 والإصدارات الأحدث، يجب عليك الاختبار بشكل منفصل لحالة Null ، ثم إرجاع القيمة المناسبة استنادا إلى النتيجة. على سبيل المثال، يمكنك استخدام الدالة IIf في تعبير مع الدالة Format مثل ما يلي:
varX = IIf(IsNull(varStrX),"Null", Format(varStrX, "@;ZLS"))
ينطبق هذا التغيير فقط عند استخدام الدالة Format لتنسيق سلسلة تعتمد على ما إذا كانت سلسلة ذات طول صفري أو قيمة Null. تستمر تعبيرات التنسيق الأخرى المستخدمة مع الدالة Format في العمل كما فعلت في الإصدارات السابقة.
إذا قمت بتحويل قاعدة بيانات من الإصدار 2.0 من Microsoft Access والإصدارات السابقة إلى Microsoft Access 2002 أو إصدار أحدث، يجب تغيير التعليمات البرمجية للاختبار بشكل منفصل لحالة Null.
