هنگامی که ماکروها را در Word ایجاد می کنید، می توانید به راحتی از جعبه های پیام استفاده کنید. اینها معمولاً برای انتقال اطلاعات به کاربر و دریافت مقداری ورودی ابتدایی استفاده می شوند. شما جعبه های پیام را با استفاده از دستور MsgBox اضافه می کنید. بخش زیر از یک ماکرو یک جعبه پیام بسیار ساده ایجاد می کند:
MsgBox "The macro is done"
همچنین میتوانید با گنجاندن یک کد از نوع نماد به عنوان بخشی از فراخوانی MsgBox، نمادهایی را به جعبههای پیام خود اضافه کنید. این نمادها به طور گسترده در بسیاری از کادرهای گفتگوی ویندوز استفاده می شود. از چهار نوع نماد زیر می توان استفاده کرد:
تایپ کنید |
|
شمارش |
|
سمبل |
16 |
|
vbCritical |
|
X سفید در یک دایره قرمز (و "دینگ") |
32 |
|
vbQuestion |
|
علامت سوال در دایره |
48 |
|
vb تعجب |
|
علامت تعجب در دایره |
64 |
|
اطلاعات vb |
|
نماد اطلاعات (حروف کوچک i در یک دایره) |
میتوانید از شماره در ستون Type یا شمارش در ستون Enumeration با عبارت MsgBox استفاده کنید. به عنوان مثال، فرض کنید میخواستید علامت علامت تعجب را اضافه کنید. این معمولاً در جعبههای محاورهای بهعنوان اطلاعیه زمانی که اتفاق مهمی رخ داده یا در شرف وقوع است، درج میشود. برای قرار دادن این نماد در جعبه پیام خود، یکی از خطوط کد زیر را وارد کنید:
MsgBox "Cant run the macro on the text", 48 MsgBox "Cant run the macro on the text", vbExclamation
تاکنون از دستور MsgBox به عنوان یک دستور استفاده شده است، اما می توانید از آن به عنوان تابع نیز استفاده کنید. اگر این کار را انجام دهید، می توانید از آن برای دریافت ورودی ساده از کاربر استفاده کنید. برای مفیدتر کردن عملکرد MsgBox، Word به شما اجازه می دهد تا دکمه های قابل کلیک بیشتری را در کادر محاوره ای در کنار دکمه OK نمایش دهید. این کار با تنظیم کد نوع، که برای نمادهای نمایش داده شده در جعبه پیام استفاده می شود، انجام می شود. در زیر ترکیب های مختلفی از دکمه ها وجود دارد که می توانید در جعبه پیام خود نمایش دهید:
تایپ کنید |
|
شمارش |
|
انواع دکمه ها |
1 |
|
vbOK لغو |
|
باشه، لغو |
2 |
|
vbAbortRetryIgnore |
|
لغو، تلاش مجدد، نادیده گرفتن |
3 |
|
vbYesNo Cancel |
|
بله، نه، لغو |
4 |
|
vbبله خیر |
|
بله خیر |
5 |
|
vbRetryCancel |
|
تلاش مجدد، لغو |
برای استفاده از دکمه ها، به سادگی مقدار نوع دکمه را به مقداری که می خواهید برای نماد استفاده کنید، اضافه کنید. میتوانید از مقادیر ستون Type یا شمارشهای ستون Enumeration استفاده کنید. VBA اهمیتی نمی دهد که کدام مورد استفاده می شود. در مثال قبلی از کد 48 یا enumeration vbExclamation برای نمایش علامت علامت تعجب استفاده کردید. اگر میخواهید دکمههای Abort، Retry، Ignore را نیز اضافه کنید، میتوانید به سادگی از خطوط کد زیر استفاده کنید:
J = MsgBox("Cant run the macro on the text", 48 + 2) J = MsgBox("Cant run the macro on the text", vbExclamation + vbAbortRetryIgnore)
اگر استفاده از مقادیر عددی را انتخاب کنید، در واقع می توانید مقادیر را با هم اضافه کنید. به عبارت دیگر، شما می توانید از "50" به جای "48 + 2" استفاده کنید. پس از اجرای خط کد، J برابر با مقداری خواهد بود که نشان می دهد روی کدام دکمه کلیک شده است. در انجام تست خود برای اینکه ببینید J برابر است، بهتر است از شمارش استفاده کنید، اما می توانید از مقادیر استفاده کنید. در اینجا مقادیر بازگشتی ممکن است:
ارزش |
|
شمارش |
|
دکمه کلیک شد |
1 |
|
vbOK |
|
خوب |
2 |
|
vbCancel |
|
لغو کنید |
3 |
|
vbAbort |
|
سقط |
4 |
|
vbRetry |
|
دوباره امتحان کنید |
5 |
|
vb نادیده گرفتن |
|
چشم پوشی |
6 |
|
vbبله |
|
آره |
7 |
|
vbNo |
|
خیر |
آیا باید از مقادیر یا شمارش با MsgBox استفاده کنید؟ این واقعاً به ترجیحات شخصی خلاصه می شود، اما دو مزیت عمده برای استفاده از شمارش وجود دارد. ابتدا، هنگامی که کد VBA را تایپ می کنید، ویرایشگر به طور خودکار "نکات" را در مورد شمارش های موجود ارائه می دهد. دوم، شمارشها در کد شما توصیفیتر هستند، به این معنی که میتوانید به راحتی تأثیر آنها را در MsgBox ببینید. سوم، شمارش ها از شما در برابر هرگونه تغییر احتمالی که ممکن است مایکروسافت در نحوه عملکرد MsgBox در آینده ایجاد کند، محافظت می کند. این بدان معنا نیست که مایکروسافت تغییراتی ایجاد خواهد کرد. مقادیر نشان داده شده در این نکته برای سال ها ثابت بوده است. اما اگر آنها مقادیر را تغییر دهند، شمارش ها به کار خود ادامه می دهند زیرا مایکروسافت به سادگی معانی شمارش ها را در پشت صحنه تغییر می دهد.