المشاركات : 669
المواضيع 88
الإنتساب : Aug 2016
السمعة :
97
الشكر: 798
تم شكره 1154 مرات في 488 مشاركات
18-11-17, 09:32 PM
(آخر تعديل لهذه المشاركة : 18-11-17, 09:33 PM {2} بواسطة Rabeea Qbaha .)
السلام عليكم
مشروع بسيط وجميل لاظهار الأشعارات بدل ال msgbox المزعجة
تستطيع اظهار الاشعارات بشكل تلقائي فوق بعض
وتختفي تلقائيا
---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
الملفات المرفقة
Form Animation and Toast Demo.rar (الحجم : 210 ك ب / التحميلات : 1,251)
تم الشكر بواسطة: عبد العزيز البسكري , ﻣﺒﺘﺪﺉ , sendbad100 , محمد كريّم , VB.NET , Amir_Alzubidy , tryold , naaserhrb , dubai.eig , أسامة السالمي , elgokr , baha , ابو ابراهيم , asemshahen5 , Abunasser2018 , بدري , اباذر , Sajad , اسامه الهرماوي , الحسين احمد , homid2008
المشاركات : 2,468
المواضيع 2
الإنتساب : Nov 2014
السمعة :
602
الشكر: 17073
تم شكره 15267 مرات في 2998 مشاركات
شكرا جزيلا لك اخي ربيع
و بارك الله فيك
المشاركات : 536
المواضيع 182
الإنتساب : Mar 2016
السمعة :
19
الشكر: 652
تم شكره 264 مرات في 171 مشاركات
02-12-17, 01:38 AM
(آخر تعديل لهذه المشاركة : 02-12-17, 01:38 AM {2} بواسطة dubai.eig .)
(18-11-17, 09:32 PM) Rabeea Qbaha كتب : السلام عليكم
مشروع بسيط وجميل لاظهار الأشعارات بدل ال msgbox المزعجة
تستطيع اظهار الاشعارات بشكل تلقائي فوق بعض
وتختفي تلقائيا
---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
تشكر على العمل الجميل
بس هناك سؤال
ممكن تضيف طريقة
كود :
Dim D As String = MsgBox("Are you sure you want to exit?", vbYesNo + vbQuestion, "Thanking You")
If D = vbYes Then
Me.Close()
Dispose()
Else
Exit Sub
End If
ويعطيك العافية استاذ
المشاركات : 669
المواضيع 88
الإنتساب : Aug 2016
السمعة :
97
الشكر: 798
تم شكره 1154 مرات في 488 مشاركات
(02-12-17, 01:38 AM) dubai.eig كتب : (18-11-17, 09:32 PM) Rabeea Qbaha كتب : السلام عليكم
مشروع بسيط وجميل لاظهار الأشعارات بدل ال msgbox المزعجة
تستطيع اظهار الاشعارات بشكل تلقائي فوق بعض
وتختفي تلقائيا
---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
تشكر على العمل الجميل
بس هناك سؤال
ممكن تضيف طريقة
كود :
Dim D As String = MsgBox("Are you sure you want to exit?", vbYesNo + vbQuestion, "Thanking You")
If D = vbYes Then
Me.Close()
Dispose()
Else
Exit Sub
End If
ويعطيك العافية استاذ
ليس على المستخدم الخروج لانة يسختفي تلقائيا
و زر الخروج اذا اراد المستخدم التسريع في اغلاق الاشعار
المشاركات : 69
المواضيع 14
الإنتساب : Oct 2018
السمعة :
2
الشكر: 28
تم شكره 31 مرات في 20 مشاركات
مشروع ج رائع لكن فهمه صعب و ايضا ممكن المستخدم لا يلاحظها اما ال msgbox ينبهه
المشاركات : 669
المواضيع 88
الإنتساب : Aug 2016
السمعة :
97
الشكر: 798
تم شكره 1154 مرات في 488 مشاركات
(30-11-18, 09:19 PM) vb2010 كتب : مشروع ج رائع لكن فهمه صعب و ايضا ممكن المستخدم لا يلاحظها اما ال msgbox ينبهه
لا اوافقك الراي ، في الحقيقة انا اراها افضل بكثير من ال msgbox
لان ال msgbox تصبح مزعجه خصوصا في مشروع فيه الكثير من التنبيهات ستجبر المستخدم
على التعامل مع "موافف" كثيرا . وهذا الشئ حسب راي مزعج و مضيع للوقت مع كثره الاستخدام
تقبل راي وشكرا
المشاركات : 29
المواضيع 7
الإنتساب : Feb 2019
السمعة :
0
الشكر: 56
تم شكره 46 مرات في 26 مشاركات
روعه روعه درس اكثر من رائع وطرح مميز كثير استفاديت من الكود
مودتي
المشاركات : 35
المواضيع 3
الإنتساب : Aug 2019
السمعة :
3
الشكر: 4
تم شكره 43 مرات في 25 مشاركات
المشاركات : 281
المواضيع 47
الإنتساب : Aug 2019
السمعة :
39
الشكر: 312
تم شكره 411 مرات في 236 مشاركات