السلام عليكــم ورحمـة الله وبركاتــه ،،
اخواني الكرام,
كيف يمكنني ان اضيف التاريخ في الفورم؟ وإلى ماذا يحتاج؟ هل تكست بوكس او فريم ام لدي الخيار في الاثنين؟
مع رجائي لكم بتوضيح الدالة
اخيكم,
BYQ
[ تمت الإجابة ](سؤال) كيف أضيف تاريخ اليوم في المشروع؟ او الوقت والتاريخ؟
وعليكــم السـلام ورحمة الله وبركاتـه..
لإضافة التاريخ
ضع أى أداة لعرض النصوص وليكن Label وإسمه Label1
ثم اكتب الكود التالى
Private Sub Form_Load() Me.Label1.Caption = Date End Sub
لإضافة الوقت قم بإضافة Label جديد باسم Label2 وأضف أداة Timer
غير خاصية Interval الخاصة بالتايمر إلى 1000 ثم اكتب هذا الكود
Private Sub Timer1_Timer() Me.Label2.Caption = Time End Sub
إن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال
السلام عليكــم ورحمـة الله وبركاتــه ،،
شكرا جزيلا اخي الغالي على الاجابة
ولكن هل هناك دالة تخص الوقت المتحرك أي يتم تحديثها اوتوماتيكيا اثناء عمل البرنامج
شكراً على الرد اخي الكريم
اخيك,
BYQ
لو جربت الكود السابق لوجدت الرد على سؤالك
هذه هى فائدة التايمر الذى قمنا بإضافته على الفورم
إن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال
اخي الكريم,
الكود السابق تمت تجربته وبالفعل يعمل جيداً, ولكن يجب الخروج من الفورم او الانتقال بين فورم ومن ثم الرجوع إليه ليتم تحديث الوقت
والمطلوب هو ان الوقت يتغير في اثناء بقائي في نفس الفورم ثانيه بعد ثانيه
أتمنى ان اجد التعديل ان كان هناك اي تعديل
شكراً جزيلاً على التجاوب السريع
اخيك,
BYQ
اعذرني اخي الغالي ان الخطأ مني انا
Form_Load() وضعت الكود بالخطأ في
عندما وضعته في مكانه الصحيح في كود التايمر اشتغل الكود بنجاح
الف شكر لك
اخيك المبتدأ،
BYQ
شكراً لك Abboodd
وصلت الفكره
اخيك،
BYQ