رفتن به مطلب
برای استفاده از انجمن و عضـویت کلیک کنید.
شایان آباد

آموزش کار با MsgBox2

پست های پیشنهاد شده

شایان آباد    6,138

بنیان گذار و مدیر فنی

درود

MsgBox2 همون MsgBox هست ولی دارای تنظیمات است !

 

که بیشتر برای خروج از برنامه استفاده میشود !

 

باید اول برای عکس ارور یا همون مسیج رو یک متغیر تعریف کنیم !

Dim bmp As Bitmap

حال میاییم برای مسیج باکس همون (yes & no) یک متغیر از نوع Int تعریف میکنیم

Dim choice As Int

خوب حالا پس از اضافه کردن عکس به پوشه File پروژه میاییم عکس رو در متغیری که تعریف کردیم Initialize میکنیم

bmp.Initialize(File.DirAssets, "test.png")

حالا ماییم متغییر Int که بالا تعریف کردیم برابر میکنیم با مسیج باکس

choice = Msgbox2("Would you like to Exit Soft?", "Please specify your choice", "Yes please", "", "No thank you", bmp)

خوب کدهای بالا زیاد نیاز به توضیح نداره ، فقط ما امدیم یک مسیج درست کردیم که Title برابر باشه با Please specify your choice و پیام مسیج برابر Would you like to Exit Soft? باشه و دوتا دکمه به اسم ... yes  و ... No ساختیم

 

و حالا کدی براش مینویسیم که اگه یس بود چه کار کنه ، نو بود چه کار کنه

If choice = DialogResponse.POSITIVE Then ...

--------------------------------------

مثال کلی برای این آموزش

Dim bmp As Bitmap
Dim choice As Int
bmp.Initialize(File.DirAssets, "question.png")
choice = Msgbox2("Would you like to select a route?", "Please specify your choice", "Yes please", "", "No thank you", bmp)
If choice = DialogResponse.POSITIVE Then
 'javabe mosbat
else if choice = DialogResponse.NEGATIVE Then
 'javabe manfi
Else
 'cnacel
End If

موفق باشید

  • پسندیدم 3

به اشتراک گذاری این ارسال


لینک به ارسال

برای ارسال دیدگاه یک حساب کاربری ایجاد کنید یا وارد حساب خود شوید

برای اینکه بتوانید دیدگاهی ارسال کنید نیاز دارید که کاربر سایت شوید

ایجاد یک حساب کاربری

برای حساب کاربری جدید در سایت ما ثبت نام کنید. عضویت خیلی ساده است !

ثبت نام یک حساب کاربری جدید

ورود به حساب کاربری

دارای حساب کاربری هستید؟ از اینجا وارد شوید

ورود به حساب کاربری

  • کاربران آنلاین در این صفحه   0 کاربر

    هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.

×