تنفيذ أسلوب كائن، أو تعيين خاصية ل عنصر أو إرجاعها.

بناء الجملة

CallByName ( كائن ، procname، calltypeargs()])

بناء جملة الدالة CallByName على هذه الوسيطات:

الوسيطة

الوصف

عنصر

مطلوبة. متغير(كائن). اسم الكائن الذي سيتم تنفيذ الدالة عليه.

procname

مطلوبة. متغير (سلسلة). تعبير سلسلة يحتوي على اسم خاصية أو أسلوب الكائن.

calltype

مطلوبة. الثابت. ثابت من النوع vbCallType يمثل نوع الإجراء الذي يتم استدعاءه.

args ()

اختياري. متغير(صفيف).


ملاحظات

يتم استخدام الدالة CallByName للحصول على خاصية أو تعيينها، أو لاستدعاء أسلوب في وقت التشغيل باستخدام اسم سلسلة.

في المثال التالي، يستخدم السطر الأول CallByName لتعيين خاصية MousePointer لمربع نص، ويحصل السطر الثاني على قيمة خاصية MousePointer، ويطالب السطر الثالث أسلوب "نقل" لنقل مربع النص:

CallByName Text1, "MousePointer", vbLet, vbCrosshair
Result = CallByName (Text1, "MousePointer", vbGet)
CallByName Text1, "Move", vbMethod, 100, 100

مثال

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

يستخدم هذا المثال الدالة CallByName لاستدعاء أسلوب "نقل" لزر أمر.

يستخدم المثال أيضا نموذجا (Form1) مع زر (Command1) وتسمية (Label1). عند تحميل النموذج، يتم تعيين الخاصية "تسمية توضيحية" للتسمية إلى اسم الأسلوب لاستدعاء، في هذه الحالة، "نقل". عند النقر فوق الزر، تقوم الدالة CallByName باستدعاء الأسلوب لتغيير موقع الزر.

Option Explicit
Private Sub Form_Load()
Label1.Caption = "Move"' Name of Move method.
End Sub
Private Sub Command1_Click()
If Command1.Left <> 0 Then
CallByName Command1, Label1.Caption, vbMethod, 0, 0
Else
CallByName Command1, Label1.Caption, vbMethod, 500, 500
End If

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

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

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

ما مدى رضاك عن جودة الترجمة؟
ما الذي أثّر في تجربتك؟

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

×