تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] محتاج كود اضهار مسج بوكس كل يوم سبت او احد
#9
وعليكم السلام ورحمة الله وبركاته. يمكنك استخدام الكود التالي لإظهار MessageBox يوم السبت أو الأحد. هذا الكود يعتمد على تحديد يوم الأسبوع الحالي ويتحقق مما إذا كان اليوم السبت أو الأحد:

PHP كود :
Imports System.Windows.Forms

Module ShowMessageBoxOnWeekends

    Sub Main
()
 
       Dim currentDayOfWeek As DayOfWeek DateTime.Now.DayOfWeek

        If currentDayOfWeek 
DayOfWeek.Saturday Or currentDayOfWeek DayOfWeek.Sunday Then
            MessageBox
.Show("اليوم هو يوم السبت أو الأحد!""رسالة"MessageBoxButtons.OKMessageBoxIcon.Information)
 
       End If
 
   End Sub

End Module 


في هذا الكود، يتم الحصول على يوم الأسبوع الحالي باستخدام DateTime.Now.DayOfWeek ويتم تخزينه في متغير currentDayOfWeek. بعد ذلك، يتم التحقق مما إذا كان currentDayOfWeek يوم السبت أو الأحد باستخدام جملة الشرط If. إذا كان اليوم يوم السبت أو الأحد، سيتم إظهار MessageBox.


يمكنك استخدام الكود التالي لإظهار MessageBox يوم السبت فقط:

PHP كود :
If Weekday(Now) = 7 Then
    MsgBox
(Date.Now.ToString("dddd"))
End If 


في هذا الكود، يتم استخدام دالة Weekday للحصول على رقم يمثل يوم الأسبوع الحالي، حيث يبدأ العد من الأحد (1) إلى السبت (7). إذا كان الرقم المرجع 7، فهذا يعني أن اليوم هو يوم السبت وسيتم إظهار MessageBox. 

إذا كنت ترغب في إظهار MessageBox يوم الثلاثاء فقط، يمكنك استخدام الكود التالي

PHP كود :
If Weekday(Now) = 3 Then
    MsgBox
(Date.Now.ToString("dddd"))
End If 


في هذه الحالة، نستخدم الرقم 3 للتحقق مما إذا كان اليوم هو يوم الثلاثاء. تجد هنا قائمة بالأرقام المقابلة لأيام الأسبوع:

  1. الأحد

  2. الاثنين

  3. الثلاثاء

  4. الأربعاء

  5. الخميس

  6. الجمعة

  7. السبت
الرد }}}
تم الشكر بواسطة:


الردود في هذا الموضوع
RE: محتاج كود اضهار مسج بوكس كل يوم سبت او احد - بواسطة sanyor77 - 27-03-23, 10:44 PM


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


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