IBM Lotus Symphony


‏‎MsgBox Function [Runtime]‎‏

يتم عرض مربع حوار يحتوي على رسالة ويقوم بارجاع قيمة.

الصيغة:

MsgBox (Text As String [,Type As Integer [,Dialogtitle As String]])

القيمة المرتجعة:

رقم صحيح

المعامل:

النص : يتم عرض تعبير العبارة كرسالة في مربع الحوار. يمكن ادراج السطور مع Chr$(13).

DialogTitle: تعبير مجموعة حروف يتم عرضه في خط العنوان لمربع الحوار. اذا تم حذفه، سيتم عرض الاسم الخاص بالتطبيق المناظر.

Type: أي تعبير رقمي يحدد نوع مربع الحوار ويعرف عدد ونوع المفاتيح والشارات التي سيتم عرضها. Type يمثل مجموعة من نماذج bit patterns، (عناصر مربع الحوار التي تم تعريفها من خلال اضافة القيم الخاصة بهم):

القيم

0 : يتم عرض مفتاح حسنا فقط.

1 : يتم عرض مفاتيح حسنا والغاء.

2 :عرض الاختيارات ايقاف واعادة المحاولة وتجاهل.

3 : يتم عرض مفاتيح نعم و لا والغاء.

4 : يتم عرض مفاتيح نعم و لا.

5 : يتم عرض مفاتيح اعادة والغاء.

16 : يتم اضافة شارة ايقاف لمربع الحوار.

32 : يتم اضافة شارة السؤال لمربع الحوار.

48 : يتم اضافة شارة علامة التعجب الى مربع الحوار.

64 : يتم اضافة شارة المعلومات الى مربع الحوار.

128 : يكون المفتاح الأول في مربع الحوار هو المفتاح المفترض.

256 : يكون المفتاح الثاني في مربع الحوار هو المفتاح المفترض.

512 : يكون المفتاح الثالث في مربع الحوار هو المفتاح المفترض.

القيمة المرتجعة:

1 : حسنا

2 : الغاء

3 : ايقاف

4 : اعادة

5 : تجاهل

6 : نعم

7 : لا

أكواد الخطأ

5 استدعاء غير صحيح للاجراء

مثال:

Sub ExampleMsgBox

Dim sVar as Integer

sVar = MsgBox("Las Vegas")

sVar = MsgBox("Las Vegas",1)

sVar = MsgBox( "Las Vegas",256 + 16 + 2,"Dialog title")

نهاية البرنامج


التعليق التقييمي عن البرنامج | المزيد من المطبوعات الفنية | العلامات التجارية