الدالة GetSetting

هام: تمت ترجمة هذه المقالة ترجمة آلية، راجع إقرار إخلاء المسؤولية. يرجى الاطلاع على النسخة الإنجليزية من هذه المقالة. هنا للرجوع إليها.

ملاحظة: يتم تعطيل الداله اسلوب الكائن او الخاصيه هو موضح في هذا الموضوع اذا Microsoft Jet Expression Service قيد التشغيل في وضع الحمايه، الذي يمنع تقييم التعبيرات قد تكون غير امنه. ل# مزيد من المعلومات حول وضع الحمايه، ابحث عن "وضع الحمايه" في "تعليمات".

ارجاع قيمه اعداد الاساسي من ادخال تطبيق في سجل Windows او (علي ماكنتوش) معلومات في ملف تهيئه ل# التطبيق.

بناء الجملة

GetSetting ( appname او المقطع او مفتاح [, الافتراضيه ] )

يحتوي بناء جمله الدالهgجيتسيتينعلي الوسيطات التاليه:

الوسيطة

الوصف

appname

مطلوب. تعبير السلسلة التي تحتوي علي اسم التطبيق او المشروع المطلوب الاعداد الاساسي الخاصه به. علي Macintosh، هذا هو اسم ملف التهيئه في المجلد "تفضيلات" في مجلد النظام.

مقطع

مطلوب. تعبير سلسله يتضمن اسم المقطع حيث توجد الاعداد الاساسي.

مفتاح

مطلوب. تعبير سلسله يتضمن اسم الاعداد الاساسي ل# ارجاع.

الافتراضي

اختياري. تعبير يحتوي علي القيمه المراد ارجاعها اذا يتم تعيين اي قيمه في الاعداد الاساسي. اذا اهمل فائقالافتراضيه من المفترض ان سلسله فارغه ("").


ملاحظات

في حاله عدم وجود اي من العناصر المسماه في الوسيطات GetSetting ، ترجع GetSetting قيمه افتراضيه.

مثال

ملاحظة: توضح الامثله التاليه استخدام هذه الداله في Visual Basic for Applications (VBA) الوحده النمطيه. ل# الحصول علي مزيد من المعلومات حول العمل ب# استخدام VBA، حدد مرجع المطور في القائمه المنسدله الموجود ب# جانب بحث و# ادخل شروط واحد او اكثر في مربع البحث.

يستخدم عباره واسطه SaveSetting اولا ل# جعل ادخالات في Windows التسجيل (او ملف .ini علي الانظمه الاساسيه Windows 16 بت) ل# التطبيق المحدد ك appnameهذا المثال، و# بعد ذلك يستخدم الداله GetSetting ل# عرض اي من الاعدادات. ل# انه تم تعيين الوسيطه الافتراضيه ، يتم ضمان بعض قيمه يتم ارجاعها. لاحظ انه لا يمكن استرداد اسماء المقاطع مع GetSetting. و# اخيرا، بيان ديليتيسيتينج ل# ازاله الادخالات كل التطبيقات.

' Variant to hold 2-dimensional array returned 
' by GetSetting.
Dim MySettings As Variant
' Place some settings in the registry.
SaveSetting "MyApp","Startup", "Top", 75
SaveSetting "MyApp","Startup", "Left", 50
Debug.Print GetSetting(appname := "MyApp", _
section := "Startup", _
key := "Left", default := "25")
DeleteSetting "MyApp", "Startup"

ملاحظة: إقرار إخلاء المسؤولية للترجمة الآلية: تمت ترجمة هذه المقالة بواسطة نظام كمبيوتر دون تدخل العامل البشري. توفر Microsoft هذه الترجمات الآلية لمساعدة المستخدمين الذين لا يتحدثون الإنجليزية على استخدام منتجات Microsoft، وخدماتها، وتقنياتها والاستمتاع بها. قد تحتوي هذه المقالة على أخطاء في المفردات، أو بناء الجملة، أو القواعد نظرًا لترجمتها آليًا.

توسيع المهارات
استكشاف التدريب
الحصول على الميزات الجديدة أولاً
الانضمام إلى Office Insider

هل كانت المعلومات مفيدة؟

نشكرك على ملاحظاتك!

شكراً لك على الملاحظات! يبدو أنه من المفيد إيصالك بأحد وكلاء دعم Office لدينا.

×