IBM Lotus Symphony
|
يتم تقييم كشف من المتغيرات arguments، تتكون من تعبير متبوع بقيمة. تقوم وظيفة Switch function بارجاع قيمة مصاحبة للتعبير الذي تم امراره بواسطة هذه الوظيفة.
Switch (Expression1, Value1[, Expression2, Value2[..., Expression_n, Value_n]])
تقوم وظيفة Switch function بتقييم تعبيرات من اليسار الى اليمين، ثم تقوم بارجاع القيمة التي تم تخصيصها لتعبير الوظيفة function expression. اذا لم يتم تحديد التعبير والقيمة كزوج، سيحدث خطأ runtime.
Expression: التعبير الذي تريد تقييمه.
Value: القيمة التي تريد ارجاعها اذا كان التعبير True.
في المثال التالي، تقوم وظيفة Switch function بتخصيص الجنس المناسب للاسم الذي تم امراره للوظيفة:
Sub ExampleSwitch
Dim sGender As String
sGender = GetGenderIndex( "John" )
MsgBox sGender
End Sub
Function GetGenderIndex (sName As String) As String
GetGenderIndex = Switch(sName = "Jane", "female", sName = "John", "male")
وظيفة الانهاء