الدالة FileAttr

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

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

ارجاع طويل يمثل وضع الملف ل# الملفات المفتوحه ب# استخدام جمله مفتوحه .

بناء الجملة

FileAttr ( filenumber ، returntype )

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

الوسيطة

الوصف

filenumber

مطلوب. عدد صحيح. اي صالح رقم الملف.

returntype

مطلوب. عدد صحيح. رقم يشير الي نوع المعلومات ل# ارجاع. حدد 1 ل# ارجاع قيمه تشير الي وضع الملف. انظمه 16 بت فقط، حدد 2 ل# استرداد مؤشر ملف نظام التشغيل. returntype 2 غير معتمد في انظمه 32 بت والي حدوث خطا.

ارجاع القيم

عندما تكون returntypeوسيطة 1، تشير الي القيم التاليه ب# ارجاع الي وضع الوصول الي الملف:

Mode

القيمة

الادخال

1

الاخراج

2

عشوائي

4

إلحاق

8

ثنائي

32

مثال

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

يستخدم هذا المثال الداله FileAttr ل# ارجاع مؤشر الملف و# وضع ملف من ملف مفتوح. يتم ارجاع مؤشر الملف فقط علي انظمه 16 بت؛ في انظمه 32 بت، تمرير 2 ك# وسيطه ثانيه انشاء خطا.

Dim FileNum, Mode, Handle
FileNum = 1 ' Assign file number.
Open "TESTFILE" For Append As FileNum ' Open file.
Mode = FileAttr(FileNum, 1) ' Returns 8 (Append file mode).
Handle = FileAttr(FileNum, 2) ' Returns file handle.
Close FileNum ' Close file.
تعزيز مهارات Office
استكشاف التدريب
الحصول على الميزات الجديدة أولاً
الانضمام إلى Office Insider

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

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

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

×