IBM Lotus Symphony
|
يقوم بتوضيح وتعريف البرنامج الفرعي في ملف DLL الذي تريد تنفيذه من Lotus® Symphony™ Basic.
أنظر أيضا: FreeLibrary.
Declare {Sub | Function} Name Lib "Libname" [Alias "Aliasname"] [Parameter] [As Type]
الاسم: اسم مختلف عن الاسم الذي تم تعريفه في DLL، لاستدعاء البرنامج الفرعي من Lotus Symphony Basic.
Aliasname: اسم subroutine كما هو معرف في DLL.
Libname: اسم الملف أو النظام بالنسبة الى DLL. يتم تحميل هذه المكتبة آليا في أول مرة يتم فيها استخدام الوظيفة.
Argumentlist: كشف بالمعاملات التي تمثل متغيرات يتم امرارها للاجراء عند استدعاءه. يتوقف نوع وعدد المعاملات على الاجراء الذي يتم تنفيذه.
Type: يتم تعريف نوع البيانات للقيمة التي يتم ارجاعها بواسطة اجراء الوظيفة function procedure. يمكنك استبعاد هذا المعامل اذا تم ادخال حرف type-declaration بعد الاسم.
![]() |
لامرار معامل الى subroutine كقيمة بدلا من كمرجع، يجب الاشارة الى المعامل بواسطة الكلمة المرشدة ByVal. |
Declare Sub MyMessageBeep Lib "user32.dll" Alias "MessageBeep" ( long )
Sub ExampleDeclare
Dim lValue As Long
lValue = 5000
MyMessageBeep( lValue )
FreeLibrary("user32.dll" )
End Sub