IBM Lotus Symphony
|
تقوم بارجاع القيمة المحددة من كشف المتغيرات المستقلة.
Choose (Index, Selection1[, Selection2, ... [,Selection_n]])
Index: تعبير رقمي يحدد القيمة التي سيتم ارجاعها.
Selection1: أي تعبير يحتوي على أحد الاختيارات الممكنة.
تقوم وظيفة Choose بارجاع قيمة من كشف التعبيرات وفقا لقيمة الفهرس. اذا كان Index = 1، ستقوم الوظيفة بارجاع أول تعبير في الكشف، اذا كان index i= 2، سيقوم بارجاع ثاني تعبير، وهكذا.
اذا كانت قيمة الفهرس أقل من 1 أو أكبر من عدد التعبيرات التي توجد بالكشف، ستقوم الوظيفة بارجاع القيمة Null.
يستخدم المثال التالي الوظيفة Choose لاختيار مجموعة حروف من محددات متعددة تشكل قائمة:
Sub ExampleChoose
Dim sReturn As String
sReturn = ChooseMenu(2)
Print sReturn
end sub
Function ChooseMenu(Index As Integer)
ChooseMenu = Choose(Index, "Quick Format", "Save Format", "System Format")
وظيفة الانهاء