محبوبترینها
آیا میشود فیستول را عمل نکرد و به خودی خود خوب میشود؟
مزایای آستر مدول الیاف سرامیکی یا زد بلوک
سررسید تبلیغاتی 1404 چگونه می‌تواند برندینگ کسب‌وکارتان را تقویت کند؟
چگونه با ثبت آگهی رایگان در سایت های نیازمندیها، کسب و کارتان را به دیگران معرفی کنید؟
بهترین لوله برای لوله کشی آب ساختمان
دانلود آهنگ های برتر ایرانی و خارجی 2024
ماندگاری بیشتر محصولات باغ شما با این روش ساده!
بارش‌های سیل‌آسا در راه است! آیا خانه شما آماده است؟
بارش‌های سیل‌آسا در راه است! آیا خانه شما آماده است؟
قیمت انواع دستگاه تصفیه آب خانگی در ایران
نمایش جنگ دینامیت شو در تهران [از بیوگرافی میلاد صالح پور تا خرید بلیط]
صفحه اول
آرشیو مطالب
ورود/عضویت
هواشناسی
قیمت طلا سکه و ارز
قیمت خودرو
مطالب در سایت شما
تبادل لینک
ارتباط با ما
مطالب سایت سرگرمی سبک زندگی سینما و تلویزیون فرهنگ و هنر پزشکی و سلامت اجتماع و خانواده تصویری دین و اندیشه ورزش اقتصادی سیاسی حوادث علم و فناوری سایتهای دانلود گوناگون
مطالب سایت سرگرمی سبک زندگی سینما و تلویزیون فرهنگ و هنر پزشکی و سلامت اجتماع و خانواده تصویری دین و اندیشه ورزش اقتصادی سیاسی حوادث علم و فناوری سایتهای دانلود گوناگون
آمار وبسایت
تعداد کل بازدیدها :
1854936934
یه سوال تو ویژوال بیسیک -
واضح آرشیو وب فارسی:سایت ریسک: یه سوال تو ویژوال بیسیک حامد منصف 08 خرداد 1386, 00:04با سلام خدمت دوستان عزیز من تو ویژوال بیسیک میخوام کاری کنم وقتی روی close یه پنجره کلیک میکنم بپرسه مطمئنی؟ اگه جواب منفی بود برنامه رو نبنده برای این کار توUnload فرم یه msg box گذاشتم تا yes or no رو تشخیص بده.؟ حالا نمیدونم اگه جواب منفی بود چجوری فرمانunload رو cancel کنم و الان چه yes بزنی چه no برنامه رو میبنده اگه کمکم کنین ممنون میشم MDP 08 خرداد 1386, 09:00NET. یا 6vb؟ حامد منصف 09 خرداد 1386, 07:30vb 6 Faroos Networks 09 خرداد 1386, 08:11سلام Private Sub MDIForm_Unload(Cancel As Integer) If MsgBox("ÂíÇ ãØãÆä Èå ÎÑæÌ ÇÒ ÈÑäÇãå åÓÊíÏ¿", vbQuestion + vbYesNo, "Faroos Networls") = vbNo Then Cancel = True Form1.Show Exit Sub End If End Sub موفق باشين Parthia 08 تير 1386, 22:56من معمولا اینطوری کار میکنم : Private Sub Form_Unload(Cancel As Integer) Dim MsgRes As VbMsgBoxResult MsgRes = MsgBox("Are You Sure You Want To Exit ?", vbYesNo Or vbQuestion) If MsgRes = vbYes Then Unload Me End If End Sub Parthia 08 تير 1386, 23:02من معمولا اینطوری کار میکنم : Private Sub Form_Unload(Cancel As Integer) Dim MsgRes As VbMsgBoxResult MsgRes = MsgBox("Are You Sure You Want To Exit ?", vbYesNo Or vbQuestion) If MsgRes = vbYes Then Unload Me End If End Sub
این صفحه را در گوگل محبوب کنید
[ارسال شده از: سایت ریسک]
[مشاهده در: www.ri3k.eu]
[تعداد بازديد از اين مطلب: 365]
-
گوناگون
پربازدیدترینها