أكاديمية الصقر للتدريب

اعلن هنا
أكاديمية الصقر للتدريب
أعلن هنا
أعلن هنا
صفحتنا على الفيس بوك
أعلن هنا

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز
المشرف المتميز
المراقب المتميز
المدير المتميز
الموضوع المتميز
القسم المتميز
بكار للأبد Eslam Abdullah لا تميز خلال هذه الفترة YasserKhalil الداله الجديده المعرفه alsqrdate - حسام خطاب اكسيل اسئله واجابات




أهلا وسهلا بك زائرنا الكريم في أكاديمية الصقر للتدريب، لكي تتمكن من المشاركة ومشاهدة جميع أقسام المنتدى وكافة الميزات ، يجب عليك إنشاء حساب جديد بالتسجيل بالضغط هنا أو تسجيل الدخول اضغط هنا إذا كنت عضواً .





اظهار رسالة ترحيب عند فتح البرنامج حسب الوقت

السلام عليكم اليوم نقدم لكم موضوع اظهار رسالة ترحيب عند فتح البرنامج حسب الوقت وهو موضوع بسيط جدا وكود بسيط ونستطيع تطب ..



06-11-2017 01:37 مساء
Yasser Elaraby
menu_open عضوية موثقة
المشرف العام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 1
المشاركات : 862
الجنس : ذكر
الدعوات : 11
يتابعهم : 2
يتابعونه : 500
قوة السمعة : 6318
الاعجاب : 1667
موقعي : زيارة موقعي
 offline 

السلام عليكم 
اليوم نقدم لكم موضوع اظهار رسالة ترحيب عند فتح البرنامج حسب الوقت وهو موضوع بسيط جدا وكود بسيط ونستطيع تطبيقه على نطاق اكبر من المستخدم في هذا الموضوع
كرسائل تذكير للمهام او حتى في الاذكار او تنبيه وعدم فتح البرنامج بعد وقت معين وليكن وقت انتهاء العمل لا يمكن فتحه في هذا الوقت 
وغيرها 


طريقة عمل الرسائل
نفتح مشروع جديد كما تعودنا وتعملنا سابقنا
حتى تظهر لنا هذه النافذة

MzM3NDEwMQ929230
نضغط دبل كليك على الفورم للدخول لمحرر الاكواد
وفي حدث تحميل الفورم
نضع الكود التالي كما بالصورة

MTgxMTA3MQ6620
يتم كتابة الكود هكذا
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim NM As String
        NM = "YasserElaraby"
        If TimeOfDay >= "12:00 AM" And TimeOfDay < "11:30 AM" Then
            MsgBox("Good Morning MR " & NM)
        ElseIf TimeOfDay > "11:30 AM" And TimeOfDay < "5:00 PM" Then
            MsgBox("Good Afternoon MR " & NM)
        ElseIf TimeOfDay > "5:00 PM" And TimeOfDay < "12:00 AM" Then
            MsgBox("Good Evening MR " & NM)
        End If
    End Sub


أو هكذا
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim NM As String
        NM = "YasserElaraby"
        If TimeOfDay >= "12:00 AM" And TimeOfDay < "11:30 AM" Then
            MsgBox("Good Morning MR " & NM)
        End If
        If TimeOfDay > "11:30 AM" And TimeOfDay < "5:00 PM" Then
            MsgBox("Good Afternoon MR " & NM)
        End If
        If TimeOfDay > "5:00 PM" And TimeOfDay < "12:00 AM" Then
            MsgBox("Good Evening MR " & NM)
        End If
    End Sub

الموضوع بسيط 
TimeOfDay
الوقت الحالي ويتم مقارنته مع الوقت المضاف عن طريق المستخدم باستخدام IF
اذا تحقق الشرط يتم عرض الرسالة الخاصة بالشرط عند فتح الفورم
كما موضح بالصورة


ODAxOTUx40
وتم الاعلان عن متغير من نوع نصي String باسم المستخدم والاشارة له ب NM لاختصار كتابته داخل كل الرسائل
كما قلنا الموضوع بسيط ولكن تنفيذه على نطاق اوسع او مهام اخرى قد يكون مهم عند اغلب المستخدمين


ومثال اخر بالاكسيل

    Dim NM As String, TM
    NM = "YasserElaraby"
    TM = Format(Now(), "hh")
    If TM >= "1" And TM < "12" Then
        MsgBox ("Good Morning MR " & NM)
    ElseIf TM > "12" And TM < "17" Then
        MsgBox ("Good Afternoon MR " & NM)
    ElseIf TM > "17" Then
        MsgBox ("Good Evening MR " & NM)
    End If




تحياتي

81




لرؤية الروابط والمرفقات عليك الرد على الموضوع


أثارت هذه المشاركة إعجاب: بودى مورا، ahmed moh، الصقر، Kamel meraghni، YasserKhalil، محمد أبو عبدو، عبد العزيز البسكري، karwan، malik،


توقيع :Yasser Elaraby
663013020




06-11-2017 02:01 مساء
مشاهدة مشاركة منفردة [1]
بودى مورا
menu_open
عضو مشارك
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 17-10-2017
رقم العضوية : 1111
المشاركات : 46
الجنس : ذكر
تاريخ الميلاد : 20-12-1977
يتابعهم : 12
يتابعونه : 2
قوة السمعة : 62
الاعجاب : 20
 offline 
look/images/icons/i1.gif اظهار رسالة ترحيب عند فتح البرنامج حسب الوقت
ممكن لينك  بيشرح فيه كيفية فتح مشروع جديد كما تعودنا وتعملنا سابقنا
حتى تظهر لنا هذه النافذة

أثارت هذه المشاركة إعجاب: karwan،




06-11-2017 02:04 مساء
مشاهدة مشاركة منفردة [2]
الصقر
menu_open عضوية موثقة
مدير المنتدى
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 2
المشاركات : 1500
الجنس : ذكر
الدعوات : 13
يتابعهم : 0
يتابعونه : 407
قوة السمعة : 12943
الاعجاب : 3164
موقعي : زيارة موقعي
 offline 
look/images/icons/i1.gif اظهار رسالة ترحيب عند فتح البرنامج حسب الوقت

جزاكم الله خيرا يا عربى 142



أثارت هذه المشاركة إعجاب: Yasser Elaraby،


توقيع :الصقر

اخى العضو الكريم
اذا كنت ترى ان المنتدى مفيد لك
فكن سفيرا لنا بدعوة الاخرين للانضمام معنا
فالدال على الخير كفاعله



06-11-2017 02:05 مساء
مشاهدة مشاركة منفردة [3]
ahmed moh
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 03-09-2017
رقم العضوية : 330
المشاركات : 210
الجنس : ذكر
يتابعهم : 3
يتابعونه : 3
قوة السمعة : 277
الاعجاب : 123
 offline 
look/images/icons/i1.gif اظهار رسالة ترحيب عند فتح البرنامج حسب الوقت
السلام عليكم
جزاك الله خيرا اخى ياسر
فعلاا يكمن تطويع الكود حسب الاساخدام 
وارجو  ارفاق الملفلين الفائده

أثارت هذه المشاركة إعجاب: Yasser Elaraby،




06-11-2017 02:14 مساء
مشاهدة مشاركة منفردة [4]
رمضان بكري
menu_open
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 26-08-2017
رقم العضوية : 153
المشاركات : 306
الجنس : ذكر
تاريخ الميلاد : 9-7-1981
الدعوات : 4
يتابعهم : 5
يتابعونه : 22
قوة السمعة : 896
الاعجاب : 246
 offline 
look/images/icons/i1.gif اظهار رسالة ترحيب عند فتح البرنامج حسب الوقت
جزاك الله خيرا استاذ ياسر 
 

أثارت هذه المشاركة إعجاب: Yasser Elaraby،




06-11-2017 02:17 مساء
مشاهدة مشاركة منفردة [5]
رمضان بكري
menu_open
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 26-08-2017
رقم العضوية : 153
المشاركات : 306
الجنس : ذكر
تاريخ الميلاد : 9-7-1981
الدعوات : 4
يتابعهم : 5
يتابعونه : 22
قوة السمعة : 896
الاعجاب : 246
 offline 
look/images/icons/i1.gif اظهار رسالة ترحيب عند فتح البرنامج حسب الوقت
استاذ ياسر كان في موضوع لي حضرتك  كيفية عمل التحكم  في صلاحية المستخدم 
اريد عمل صلاحيات للمستخدم  واحدد صلاحيتهم ععلي البرنامج
 

أثارت هذه المشاركة إعجاب: عاصم الفى،




06-11-2017 02:18 مساء
مشاهدة مشاركة منفردة [6]
بودى مورا
menu_open
عضو مشارك
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 17-10-2017
رقم العضوية : 1111
المشاركات : 46
الجنس : ذكر
تاريخ الميلاد : 20-12-1977
يتابعهم : 12
يتابعونه : 2
قوة السمعة : 62
الاعجاب : 20
 offline 
look/images/icons/i1.gif اظهار رسالة ترحيب عند فتح البرنامج حسب الوقت
لرؤية الروابط والمرفقات عليك الرد على الموضوع




لرؤية الروابط والمرفقات عليك الرد على الموضوع


أثارت هذه المشاركة إعجاب: karwan،




06-11-2017 02:40 مساء
مشاهدة مشاركة منفردة [7]
Yasser Elaraby
menu_open عضوية موثقة
المشرف العام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 1
المشاركات : 862
الجنس : ذكر
الدعوات : 11
يتابعهم : 2
يتابعونه : 500
قوة السمعة : 6318
الاعجاب : 1667
موقعي : زيارة موقعي
 offline 
look/images/icons/i1.gif اظهار رسالة ترحيب عند فتح البرنامج حسب الوقت
المشاركة الأصلية كتبت بواسطة: بودى مورا »
ممكن لينك  بيشرح فيه كيفية فتح مشروع جديد كما تعودنا وتعملنا سابقنا
حتى تظهر لنا هذه النافذة

اخي الكريم هذا الدرس يخص الفيجوال بيسك دوت نت وليس الاكسيل
وتجد شرح فتح المشروع الجديد في اول درس داخل هذا الموضوع
لرؤية الروابط والمرفقات عليك الرد على الموضوع

 

أثارت هذه المشاركة إعجاب: karwan،


توقيع :Yasser Elaraby
663013020



06-11-2017 02:45 مساء
مشاهدة مشاركة منفردة [8]
Yasser Elaraby
menu_open عضوية موثقة
المشرف العام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 1
المشاركات : 862
الجنس : ذكر
الدعوات : 11
يتابعهم : 2
يتابعونه : 500
قوة السمعة : 6318
الاعجاب : 1667
موقعي : زيارة موقعي
 offline 
look/images/icons/i1.gif اظهار رسالة ترحيب عند فتح البرنامج حسب الوقت
المشروع مرفق بلغة الفيجوال بيسك دوت نت
لرؤية الروابط والمرفقات عليك الرد على الموضوع

وان شاء الله نعمله ع الاكسيل عشان الاخوة اللي محتاجينه ع الاكسيل
تحياتي
 




لرؤية الروابط والمرفقات عليك الرد على الموضوع


أثارت هذه المشاركة إعجاب: karwan،


توقيع :Yasser Elaraby
663013020



06-11-2017 02:47 مساء
مشاهدة مشاركة منفردة [9]
Yasser Elaraby
menu_open عضوية موثقة
المشرف العام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 1
المشاركات : 862
الجنس : ذكر
الدعوات : 11
يتابعهم : 2
يتابعونه : 500
قوة السمعة : 6318
الاعجاب : 1667
موقعي : زيارة موقعي
 offline 
look/images/icons/i1.gif اظهار رسالة ترحيب عند فتح البرنامج حسب الوقت
جزيتم خيرا اخواني الكرام
اخي الكريم حسام 
اخي الكريم ابو حنين
اخي الكريم بودي مورا
اخي الكريم رمضان 
تقبلوا فائق احترامي
81



توقيع :Yasser Elaraby
663013020



06-11-2017 03:12 مساء
مشاهدة مشاركة منفردة [10]
Yasser Elaraby
menu_open عضوية موثقة
المشرف العام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 1
المشاركات : 862
الجنس : ذكر
الدعوات : 11
يتابعهم : 2
يتابعونه : 500
قوة السمعة : 6318
الاعجاب : 1667
موقعي : زيارة موقعي
 offline 
look/images/icons/i1.gif اظهار رسالة ترحيب عند فتح البرنامج حسب الوقت
ملف اكسيل منفذ عليه الكود
لرؤية الروابط والمرفقات عليك الرد على الموضوع
 




لرؤية الروابط والمرفقات عليك الرد على الموضوع


أثارت هذه المشاركة إعجاب: عبدالله الصاري،


توقيع :Yasser Elaraby
663013020



06-11-2017 06:15 مساء
مشاهدة مشاركة منفردة [11]
Kamel meraghni
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 26-08-2017
رقم العضوية : 182
المشاركات : 101
الجنس : ذكر
تاريخ الميلاد : 23-10-1984
يتابعهم : 7
يتابعونه : 6
قوة السمعة : 595
الاعجاب : 135
 offline 
look/images/icons/i1.gif اظهار رسالة ترحيب عند فتح البرنامج حسب الوقت
جزاك الله كل خير

أثارت هذه المشاركة إعجاب: Yasser Elaraby،


توقيع :Kamel meraghni

الحمد لله وكفى والصلاة والسلام على الحبيب المصطفى



142



06-11-2017 10:56 مساء
مشاهدة مشاركة منفردة [12]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 5060
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 15
يتابعهم : 0
يتابعونه : 333
قوة السمعة : 14756
الاعجاب : 5509
 offline 
look/images/icons/i1.gif اظهار رسالة ترحيب عند فتح البرنامج حسب الوقت
بارك الله فيك أخي الحبيب ياسر العربي وجزيت خيراً على هذه الروائع والدروس القيمة

أثارت هذه المشاركة إعجاب: Yasser Elaraby،






الكلمات الدلالية
اظهار ، رسالة ، ترحيب ، البرنامج ، الوقت ،


 







اخلاء مسئولية: يخلى منتدى أكاديمية الصقر للتدريب مسئوليته عن اى مواضيع او مشاركات تندرج داخل الموقع ويحثكم على التواصل معنا ان كانت هناك اى إنتهاكات تتضمن اى انتهاك لحقوق الملكية الفكرية او الادبية لاى جهة - بالتواصل معنا من خلال نموذج مراسلة الإدارة .وسيتم اتخاذ الاجراءات اللازمة.
سياسة النشر: التعليقات المنشورة لا تعبر عن رأي منتدى أكاديمية الصقر للتدريب ولا نتحمل أي مسؤولية قانونية حيال ذلك ويتحمل كاتبها مسؤولية النشر.



الساعة الآن 01:56 صباحا

أعلن هنا
أعلن هنا
أعلن هنا