الدالة Spc

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

يستخدم مع العبارة "طباعة #" أو أسلوب الطباعة في وضع الإخراج.

بناء الجملة

Spc ( n )

إن n وسيطة المطلوب هو عدد المسافات المطلوب إدراجها قبل عرض تعبير التالية في قائمة.

ملاحظات

إذا كانت n أقل من عرض خط الإخراج، فإن موضع الطباعة التالي يلي مباشرة عدد المسافات المطبوعة. إذا كانت n أكبر من عرض خط الإخراج، تحسب Spc موضع الطباعة التالي باستخدام الصيغة:

currentprintposition + (n Mod width)

على سبيل المثال، إذا كان موضع الطباعة الحالي هو 24، فإن عرض خط الإخراج هو 80، ثم قمت بتحديد Spc(90)، ستبدأ الطباعة التالية في الموضع 34 (موضع الطباعة الحالي + باقي الرقم 90/80). إذا كان الفرق بين موضع الطباعة الحالي وعرض خط الإخراج أقل من n (أو n عرض Mod)، فإن الدالة Spc تتخطى إلى بداية السطر التالي وتولد مسافات تساوي n – (العرضcurrentprintposition).

ملاحظة:  تأكد من عرض الأعمدة الجدولية بما يكفي لاحتواء الأحرف العريضة.

عند استخدام أسلوب الطباعة مع خط مباعد نسبيا، يكون عرض أحرف المسافة المطبوعة باستخدام الدالة Spc دائما متوسط عرض جميع الأحرف في حجم النقطة للخط الذي تم اختياره. ومع ذلك، لا يوجد ارتباط بين عدد الأحرف المطبوعة وعدد الأعمدة ذات العرض الثابت التي تشغلها هذه الأحرف. على سبيل المثال، يشغل الحرف العلوي W أكثر من عمود ثابت العرض ويشغل الحرف السفلي i أقل من عمود ثابت العرض.

مثال

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

يستخدم هذا المثال الدالة Spc في وضع الإخراج في ملف وفي النافذة الفورية.

' The Spc function can be used with 
' the Print # statement.
Open "TESTFILE" For Output As #1 ' Open file for output.
Print #1, "10 spaces between here"; Spc(10); "and here."
Close #1 ' Close file.

تتسبب العبارة التالية في طباعة النص في النافذة الفورية (باستخدام أسلوب الطباعة)، مسبوقا ب 30 مسافات.

Debug.Print Spc(30); "Thirty spaces later..."

هل تحتاج إلى مزيد من المساعدة؟

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

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

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

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

×