تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] ارجوا الدخول عاجل
#1
Exclamation 
السلام عليكم و رحمة الله و بركاته
اخواني احتاج كود يحاكي ما اقول ( اذا ازداد يوم قم بزيادة 1 الى الابيل 7 )
علما اني استعمل لغة microsoft visual basic .net 2010 Ultimate

و شكرا علما باني احتاجه عاجلا
الرد
تم الشكر بواسطة:
#2
وعليكم السلام ورحمة الله وبركاته

عفواً انا لا اهم :
إقتباس :اخواني احتاج كود يحاكي ما اقول ( اذا ازداد يوم قم بزيادة 1 الى الابيل 7 )

الرجاء التوضيح

تحياتى لك
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

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


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد
تم الشكر بواسطة: anoname , anoname
#3
اخي يعني كلما يزداد يوم مثل 29 / 05 / 2018 + 1 = 30 / 05 / 2018
تزداد قيمة label6 ب 1 مثلا label6.text = 12 و عندما يمر يوم تصبح 13
الرد
تم الشكر بواسطة:
#4
(29-05-18, 07:16 PM)anoname كتب : اخي يعني كلما يزداد يوم مثل 29 / 05 / 2018 + 1 = 30 / 05 / 2018
تزداد قيمة label6 ب 1 مثلا label6.text = 12 و عندما يمر يوم تصبح 13


حتى الان جميل

ولكن ينقصه ايضاً الكثير من التفاصيل

بحيث اذا كان السؤال والطلب عام
كما لو بقول اريدك ارسال هذا الملف
فبطبيعي ارساله الى اين 

بمعنى يجب ان توضح ان لديك فورم يحتوى على كذا وكذا 
وفى الجزء الخاص بكذا يوجد تاريخ مثلاً واريد كلما يزيد اليوم فى هذا الجزء
يتم احتساب عدد فى المنطة كذا +1 كلما زاد الايام يزيد العدد

لاحظ انا ذكرت كم من كلمة كذا
لان انت لا توضح اى تفاصيل او اى تلميح لما تعمله ليتم افادتك

فكيف يمكن منى ان ان اكتب لك كود من كلمة كذا

اذا كنت اريد ان اختصر فى الرد واغادر الموقع
بامكانى ام اكتب كود لك كاتالى

كود :
If TextBox1.Text = TextBox1.Text + 1 Then
           TextBox2.text += 1
       End If

عملياً ما كتبته يقوم بما تطلبه
ولكن فعلياً هل هذا ما تريده اذا قمت باستخدامه

الرجاء التوضيح ما تريده وتبسيط شرح ما تعمل عليه
ليتم اضافة الكود الصحيح للاستخدام المباشر

تحياتى لك
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

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


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد
تم الشكر بواسطة: anoname
#5
   
و الله شكرا و اعلم انك لا تريد الا ان استفيد من الدرس و لكن ربما ساوضح لك الان
لدي فورم 1 فقط و لدي label1.text = 12 و اريد من البرنامج ان كلما يزداد يوم تزداد قيمة label1 بالعدد 1
فتصبح label1.text = 13 و ذلك حسب مرور كم من يوم و ارجوا ان خفيفا عليك لانني اكثرت عليك و نحن
صائمين

اليوم هو اليوم 12 من رمضان و غدا سيكون اليوم 13 من رمضان و العملية مستمرة .
اذا 12 هي label1 و الغد هو day + 1 فصارت label1 الى 13
الرد
تم الشكر بواسطة: عبد الرؤوف
#6
(29-05-18, 07:42 PM)anoname كتب : و الله شكرا و اعلم انك لا تريد الا ان استفيد من الدرس و لكن ربما ساوضح لك الان
لدي فورم 1 فقط و لدي label1.text = 12 و اريد من البرنامج ان كلما يزداد يوم تزداد قيمة label1 بالعدد 1
فتصبح label1.text = 13 و ذلك حسب مرور كم من يوم و ارجوا ان خفيفا عليك لانني اكثرت عليك و نحن
صائمين

اليوم هو اليوم 12 من رمضان و غدا سيكون اليوم 13 من رمضان و العملية مستمرة .
اذا 12 هي label1 و الغد هو day + 1 فصارت label1 الى 13


الشكر لله

لا عليك اخى الحبيب
فكل هدفى ان تستفاد 
وليس النسخ واللصق فقط

خلينى انا ابسط عليك الفكرة وما تحتاجه لعمل ذلك

فى البداية ستحتاج الى مثلاً مصدر 
ليكون قيمته تاريخ ثابت او بداية العد وليكن 1 رمضان

من ثم عمل مصدر
وهنا يكون وظيفته عرض تاريخ اليوم

من ثم عمل عملية طرق لعدد الايام (الكود كا تشبيه)
كود :
label1.text = textbox2.text - textbox1.text
سيتم توضيح ذلك بالنهاية لعملية الطرح للايام

فاصبح هنا لدينا الشكل النهائي
واللى من المفترض يكتب 14 بناءاً على تاريخ الكمبيوتر

ناتى الان الى الكود
كود :
Dim firstDate As New DateTime(1439, 9, 1)
       Dim secondDate As New DateTime(Now.ToString("yyyy"), Now.ToString("MM"), Now.ToString("dd"))
       TextBox1.Text = Now.ToString("yyyy-MM-dd")
       Dim TotalDay As String = (secondDate - firstDate).TotalDays.ToString()
       label1.text = CInt(TotalDay) + 1


تذكر اذا كان التاريخ بالجهاز هو التاريخ الميلادى
فقم بتعديل الارقام 1 / 9 / 1439 الى 1 / 5 / 2018 
(اى تاريخ لكن عليك باخذ اعتبار تاريخ الجهاز م / هـ)

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

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


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد
تم الشكر بواسطة: anoname
#7
استخدم 
label1.text = Now.Day
أو 
label1.text = Now.Day + 1

حسب ما تفكر به , لا اعلم بالضبط ما تعني
الرد
تم الشكر بواسطة: anoname
#8

.rar   Ramadan Fator.rar (الحجم : 116.23 ك ب / التحميلات : 29)
اخي انا مبتدأ و لم افهم من هذه الاكواد شيئا . سوف ارفع لك المشروع و قم بتعديل لي الكود و اعد رفعه
لكي اقوم بفهم خطة العمل . جزاء الله خيرا و ادخلك فساح جنته يا رب العالمين ااااامين

اليوم هو اليوم 12 من رمضان و غدا هو اليوم 13 من رمضان و الى اخره
هذه هي فكرة البرنامج
علما ان label6.text = 12 اذا كيف اجعل قيمة 12 تزداد ب1 كلما زدنا يوما واحدا
الرد
تم الشكر بواسطة:
#9
اخى الكريم اليوم هو 13 من رمضان
وفى الكمبيوتر والمطبوعات ستجد ان اليوم هو 14

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

تعال عن السطر التالى
كود :
Label6.Text = CInt(TotalDay)

وقم بجعله كما يلى
كود :
Label6.Text = CInt(TotalDay) - 1
Label6.Text = CInt(TotalDay) + 1

اختار ما تريد مع تغيير قم 1 الى العدد المطلوب

ثانياً اذا كنت بحاجة الى تعديل فى التواريخ ايضاَ فى النقص او التزايد

ستجد سطر ما يلى
كود :
Label7.Text = Date.Today.AddDays("-1").ToString("yyyy-MM-dd")

فقط مكان -1 ضح ما تريد اذا كان +999 او بالـ -999
قم بكتابة الارقام التى تريدها

تذكر ما عليك فعله حتى لا تواجه مشكلة 
بان البرنامج لا يعمل على بعض الاجهزة


وهو ان يجب ان يكون الجهاز المستخدم
تاريخ هجري وليس ميلادى

تحياتى لك


الملفات المرفقة
.zip   Ramadan Fator.zip (الحجم : 141.55 ك ب / التحميلات : 28)
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

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


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد
تم الشكر بواسطة: anoname , anoname , sendbad100


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  عاجل اخوانى اخوكم فى حيره من امره (تم حل المشكله )بمساعده العضو (c#dev) خالد كامل1 9 596 24-06-21, 09:41 PM
آخر رد: c#dev
Lightbulb ارجوا المساعدة في طباعة الكاشير بدون إظهار التقرير abo.alaa315 6 787 02-05-21, 05:56 PM
آخر رد: alfaiz678
  [vb6.0] كود اذا لم يقم بتسجيل الدخول خلال 3 دقائق فانه سيتم الخروج من البرنامج بشكل تلقائي Rasha Hasanain 1 636 18-04-21, 04:31 PM
آخر رد: messry
  [سؤال] هام و عاجل hala farid 3 463 24-02-21, 01:52 PM
آخر رد: Jounior_P
Exclamation تسجيل الدخول الى موقع يحتوي على Captcha باستخدام WebBrowser Basil Abdallah 4 687 01-02-21, 11:16 PM
آخر رد: Basil Abdallah
  خطا في صفحة تسجيل الدخول وعند ربطها بsql khowla.goma 0 284 20-12-20, 02:01 AM
آخر رد: khowla.goma
Thumbs Up اهل الخبره ارجوا الافادة وهج الصحراء 0 326 06-10-20, 05:58 PM
آخر رد: وهج الصحراء
  سؤال عاجل جداً للأهميه وهج الصحراء 1 500 04-10-20, 03:32 AM
آخر رد: kiki
  عاجل ??????? ahmedbezia 1 702 27-06-20, 07:40 PM
آخر رد: kiki
Rainbow عاجل جدا . مشكله في مشروع و خطأ غريب theend200x 2 847 08-05-20, 03:56 AM
آخر رد: سعود

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


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