تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
الاخوة الاعزاء ابحث عن مثال للتنبيه بقرب انتهاء تاريخ بشرط ان احدد المدة
#1
الاخوة الاعزاء ابحث عن مثال للتنبيه بقرب انتهاء تاريخ بشرط ان احدد المدة وبمجرد فتح البرنامج يتم ظهور شاشة تنبيه
الرد }}}}
تم الشكر بواسطة:
#2
كود :
   Dim a As Date = " اكتب التاريخ الذي تريده هنا مثلاً 31-12-2016"
   Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
       'لو تاريخ اليوم اصغر من التاريخ المطلوب بخمسة ايام أظهر رسالة
       If Today < a.AddDays(-5) Then
           MsgBox("اكتب رسالتك هنا")
       End If
   End Sub
{‏‏ يَرْفَعِ اللَّهُ الَّذِينَ آمَنُوا مِنكُمْ وَالَّذِينَ أُوتُوا الْعِلْمَ دَرَجَاتٍ‏ }

 " Mohamed M. Bedair     -     " Abu Anas
Genius Live , Egypt
الرد }}}}
تم الشكر بواسطة:
#3
(20-11-16, 04:49 PM)Genius Live كتب :
كود :
   Dim a As Date = " اكتب التاريخ الذي تريده هنا مثلاً 31-12-2016"
   Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
       'لو تاريخ اليوم اصغر من التاريخ المطلوب بخمسة ايام أظهر رسالة
       If Today < a.AddDays(-5) Then
           MsgBox("اكتب رسالتك هنا")
       End If
   End Sub

ممتاز بس الفكرة في انووو يعرض لك السجلات المنتهية علي شاشة وتعرف تطبعهم منها يا ريت لو في مثال جاهز لو امكن

(20-11-16, 05:02 PM)trfa8899 كتب :
(20-11-16, 04:49 PM)Genius Live كتب :
كود :
   Dim a As Date = " اكتب التاريخ الذي تريده هنا مثلاً 31-12-2016"
   Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
       'لو تاريخ اليوم اصغر من التاريخ المطلوب بخمسة ايام أظهر رسالة
       If Today < a.AddDays(-5) Then
           MsgBox("اكتب رسالتك هنا")
       End If
   End Sub

انا حشرحلك الموضوع كامل
انا عندي برنامج لادارة الايجارات وعايز كل ما افتح البرنامج يظهري تقرير بالايجارات الاوشكت علي الانتهاء علي حسب المدة الانا محددها يعني تنبيه قبل ما ينتهي التاريخ بعشرة يوم
الرد }}}}
تم الشكر بواسطة:
#4
ما هي قاعدة البيانات المستخدمة ؟
ما هي طريقة الربط ؟
ما هي الطريقة التي ترغب بها في عرض السجلات ؟
{‏‏ يَرْفَعِ اللَّهُ الَّذِينَ آمَنُوا مِنكُمْ وَالَّذِينَ أُوتُوا الْعِلْمَ دَرَجَاتٍ‏ }

 " Mohamed M. Bedair     -     " Abu Anas
Genius Live , Egypt
الرد }}}}
تم الشكر بواسطة:
#5
(20-11-16, 05:37 PM)Genius Live كتب : ما هي قاعدة البيانات المستخدمة ؟
ما هي طريقة الربط ؟
ما هي الطريقة التي ترغب بها في عرض السجلات ؟
قاعدة البيانات المستخدمة  access 
الربط عادي   OLEDB
طريقة العرض علي  تقرير او datagrid
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  الإستعلام بإنتهاء المدة abdulla2 3 93 17-10-17, 10:49 AM
آخر رد: سعود الشامان
  الاستعلام عن تاريخ داخل التقرير السيد الجوهري 0 54 05-10-17, 06:55 AM
آخر رد: السيد الجوهري
  مثال رسائل الجانبية مثل الوندوز 10 محمود صالح 1 81 01-10-17, 07:14 PM
آخر رد: tryold
Lightbulb [VB.NET] محتاج مثال ككود ربط الكريستال ريبورت مع جدولين والقاعدة mysql مصمم الدوادمي 3 64 29-09-17, 12:18 AM
آخر رد: wale90
  [سؤال] كيف استدعي ملف وورد بالفجوال بيسك وإضافة تاريخ وبيانات عليه عبقرينو 1 86 20-09-17, 06:08 PM
آخر رد: Rabeea Qbaha
  [VB.NET] هل يوجد اكواد صوت مثل Beep للتنبيه hglogtd 7 159 20-09-17, 02:36 AM
آخر رد: hglogtd
  [VB.NET] ابحث عن شرح عمل صلاحيات محددة 0theghost0 13 322 28-08-17, 08:48 PM
آخر رد: 0theghost0
  [سؤال] ابحث عن اسم هذه الاداة عبدالرحمن المكاوي 8 248 19-08-17, 07:54 PM
آخر رد: zinom
  [VB.NET] فعل حدث قبل تاريخ محدد بيومين Acces سعود الشامان 4 185 11-08-17, 12:44 AM
آخر رد: سعود الشامان
  عرض أحدث تاريخ كرم ابوهشام 8 211 30-07-17, 10:38 PM
آخر رد: HASAN6.0

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم