يتم استخدام الدالة InputBox() في VB لعرض مربع حوار، مما يسمح للمستخدم بإدخال قيمة في مربع الحوار ليتم تمريرها مرة أخرى إلى البرنامج للمعالجة. تنسيق بناء جملة الدالة InputBox() كما يلي:
InputBox(prompt[, title] [, default] [, xpos] [, ypos] [, helpfile, context])
المعلمات الموجودة في بناء جملة الدالة InputBox لها المعاني التالية:
(1) معلمة المطالبة: هذه المعلمة مطلوبة. بشكل أساسي تعبيرات السلسلة التي تظهر في مربعات الحوار. الحد الأقصى لطول المطالبة هو 1024 حرفًا تقريبًا، ويتم تحديده حسب عرض الأحرف المستخدمة. إذا كانت المطالبة تحتوي على أسطر متعددة، فيمكنك استخدام أحرف الإرجاع (Chr(13)) أو تغذية الأسطر (Chr(10)) أو مجموعة من أحرف الإرجاع وتغذية الأسطر (Chr(13) & Chr(10)) بين خطوط.
(2) العنوان اختياري. يعرض تعبير السلسلة في شريط عنوان مربع الحوار. إذا تم حذف العنوان، فسيتم وضع اسم التطبيق في شريط العنوان.
(3) الافتراضي اختياري. يعرض تعبير السلسلة في مربع النص كقيمة افتراضية عند عدم توفير أي إدخال آخر. إذا تم حذف الافتراضي، يكون مربع النص فارغًا.
(4) Xpos اختياري. تحدد التعبيرات الرقمية، التي تظهر في أزواج، المسافة الأفقية بين الجانب الأيسر من مربع الحوار والجانب الأيسر من الشاشة. إذا تم حذف xpos، فسيتم توسيط مربع الحوار أفقيًا.
(5) Ypos اختياري. تحدد التعبيرات الرقمية، التي تظهر في أزواج، المسافة بين الحافة العلوية لمربع الحوار والحافة العلوية للشاشة. إذا تم حذف ypos، فسيتم وضع مربع الحوار بمقدار الثلث تقريبًا عموديًا من أسفل الشاشة.
(6) ملف المساعدة اختياري. تعبير سلسلة يحدد ملف التعليمات المستخدم لتوفير تعليمات حساسة للسياق لمربع الحوار. إذا تم توفير ملف المساعدة، فيجب أيضًا توفير السياق.
(7) السياق اختياري. تعبير رقمي يمثل رقم سياق التعليمات الذي تم تعيينه لموضوع التعليمات بواسطة مؤلف ملف التعليمات. إذا تم توفير السياق، فيجب أيضًا توفير ملف المساعدة.
أشياء يجب ملاحظتها:
إذا تم توفير كل من ملف التعليمات والسياق، فيمكن للمستخدم الضغط على F1 لعرض موضوع التعليمات المطابق للسياق. تقوم بعض التطبيقات المضيفة، مثل Microsoft Excel، تلقائيًا بإضافة زر "تعليمات" إلى مربع الحوار. إذا قام المستخدم بالنقر فوق موافق أو الضغط على مفتاح الإدخال ENTER، فستقوم الدالة InputBox بإرجاع محتويات مربع النص. إذا قام المستخدم بالنقر فوق "إلغاء الأمر"، تقوم هذه الدالة بإرجاع سلسلة ذات طول صفري ().
إذا كنت تريد أيضًا تحديد معلمات أخرى غير المعلمة المسماة أولاً، فيجب عليك استخدام InputBox في التعبير. إذا كنت تريد حذف بعض المعلمات الموضعية، فيجب عليك تضمين محددات الفاصلة المقابلة.
الاستخدام المرجعي:
'وظيفة البرنامج هي استخدام وظيفة صندوق الإدخال لإدخال بياناتين وتوصيلهما باستخدام msgbox a & b
Dim a As String, b As String
أمر فرعي خاص1_Click()
أ = InputBox(أدخل البيانات الأولى :)
ب = InputBox(أدخل البيانات الثانية :)
نهاية الفرعية
أمر فرعي خاص2_Click()
صندوق الرسائل أ و ب
نهاية الفرعية