المساعد الشخصي الرقمي

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

الصفحات : [1] 2
thegust2000
19-04-2007, 12:23 AM
بسم الله الرحمن الرحيم
والصلاه والسلام على اشرف الخلق سيدنا محمد خاتم الانبياء والمرسلين


اللهم اغفر لى ولوالدي وارحمهم ووفقهم واعفو عنهم
واجعل علمى وعملى شاهدا لى و لا تجعله شاهد على
اللهم اغننابحلالك عن حرامك واكفنا بفضلك عن من سواك
يا مثبت القلوب ثبت قلوبنا دينك وعلى طاعتك وابعد عنا رفقاء السوء ووفقنا لما تحب وترضاه
اللهم ارزقنا الشهادة في سبيلك وموتة في بلد خليلك
إنك سميع مجيب آمين



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

اخوتي الكرام

اليوم باذن الله نبدا معكم رحله الفيجوال بيسك
وهى ان شاء الله تبداء من الصفر
الى ان يشاء الله


الفهرس العام


مقدمه عن الفيجوال وشرح طريقه التنصيب (http://www.absba.org/vb/showpost.php?p=4126814&postcount=1)

الدرس الاول

- ما هو الفيجوال بيسك؟ 2- ما هى ادوات البرمجه؟ 3- الادوات الاساسيه فى الفيجوال بيسك (http://www.absba.org/vb/showpost.php?p=4126855&postcount=3)




الدرس الثانى

شرح شاشه new (http://www.absba.org/vb/showpost.php?p=4126871&postcount=4)
وبعض خصائص الفورم (http://www.absba.org/vb/showpost.php?p=4126871&postcount=4)

باقى خصائص الفورم (http://www.absba.org/vb/showpost.php?p=4126884&postcount=5)


الدرس الثالث

Tool Box(صندوق الادوات) اده Command Button (http://www.absba.org/vb/showpost.php?p=4126904&postcount=7)



الدرس الرابع

شاشه الاومر لبرمجه Command Button (http://www.absba.org/vb/showpost.php?p=4132939&postcount=15)




الدرس الخامس

خصائص صندوق النص (http://www.absba.org/vb/showpost.php?p=4146897&postcount=21)

السادس

تدريب على صندوق النص فى كتابه الكود (http://www.absba.org/vb/showpost.php?p=4147164&postcount=22)


السابع

عمل برنامج متوسط حسابى (http://www.absba.org/vb/showpost.php?p=4155257&postcount=35)



الثامن

اده Picture Box (http://www.absba.org/vb/showpost.php?p=4155833&postcount=39)

التاسع


اداه Image Box (http://www.absba.org/vb/showpost.php?p=4157470&postcount=41)
(http://www.absba.org/vb/showpost.php?p=4157470&postcount=41)




العاشر

Cobmo Box
الدرس الاول (http://www.absba.org/vb/showpost.php?p=4159939&postcount=55)

الدرس الثانى (http://www.absba.org/vb/showpost.php?p=4160244&postcount=57)


الحادى عشر
Message Box

الدرس الاول (http://www.absba.org/vb/showpost.php?p=4162524&postcount=62)
الدرس الثانى (http://absba.org/vb/showpost.php?p=4163558&postcount=63)
الدرس الثالث (http://absba.org/vb/showpost.php?p=4173775&postcount=70)





List Box (http://absba.org/vb/showpost.php?p=4176985&postcount=75)






Drive list Box (http://absba.org/vb/showpost.php?p=4182864&postcount=85)






DirListBox (http://absba.org/vb/showpost.php?p=4182946&postcount=86)








File List Box (http://absba.org/vb/showpost.php?p=4183200&postcount=89)





الاده Time (http://absba.org/vb/showpost.php?p=4191414&postcount=95)
الدرس الثانى (http://absba.org/vb/showpost.php?p=4202051&postcount=103)
الدرس الثالث (http://absba.org/vb/showpost.php?p=4206473&postcount=108)





HscrollBar و VscrollBar (http://absba.org/vb/showpost.php?p=4210143&postcount=111)
الدرس الثانى (http://absba.org/vb/showpost.php?p=4214767&postcount=115)




CheckBox (http://absba.org/vb/showpost.php?p=4219316&postcount=119)




Option Button (http://absba.org/vb/showpost.php?p=4224954&postcount=135)







Shape (http://absba.org/vb/showpost.php?p=4226489&postcount=136)




Menu Editor (http://www.absba.org/vb/showpost.php?p=4234927&postcount=141)




Variables المتغيرات (http://www.absba.org/vb/showpost.php?p=4238272&postcount=147)
الدرس الثانى (http://www.absba.org/vb/showpost.php?p=4245630&postcount=151)

الدرس الثالث (http://www.absba.org/vb/showpost.php?p=4246127&postcount=153)




الثوابت Constant (http://www.absba.org/vb/showpost.php?p=4246483&postcount=154)


المصفوفات ARRAY (http://www.absba.org/vb/showpost.php?p=4257332&postcount=162)

الدرس الثانى (http://www.absba.org/vb/showpost.php?p=4379707&postcount=189)

الدرس الثالث (http://www.absba.org/vb/showpost.php?p=4417670&postcount=193)




































ملحوظه لكل
مشروع source code
يكون فى مشاركه مستقله









اخوانى الكرلم
قبل البدء فى شرح واجه البرنامج يجب معرف
الفيجوال بشكل عام لمن لا يعرفه

وهذه انسب مقدمه
اضعه لكم وهى من كتاب للفيجوال بيسك







تاريخ الفيجوال بيسك







لغة البيسك المرئي VISUAL BASIC تعتبر فى الوقت الحالى من أسهل وأبسط وأقوى لغات البرمجة المستخدمة تحت بيئة النوافذ WINDOWS ورغم أن لغة الفيجوال بيسك سهلة وممتعة إلا أنك تستطيع كتابة برامج قوية باستخدامها.







فهي تمكن المبرمج من تطوير وإنتاج التطبيقات المختلفة في وقت قصير، وبكفاءة عمل عالية ،وتندرج لغة Visual Basic تحت قائمة لغات الأحداث المحركة Object Oriented Languages ، وهذا يعني أن ما يحدثة المستخدم من أفعال مثل ضغط أحدالمفاتيح أو نقر زر الماوس يؤدي إلي تنفيذ الدوال المخصصة لذلك وبذلك يكون مستخدم البرنامج هو المسؤل عن ما يحدث ومتى يحدث ؟







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





لقد قامت شركةمايكروسوفت بتصميم فيجوال بيسك بناءً على لغة البرمجة بيسك والمصممة خصيصاً للمبتدئين في البرمجة نظراً لسهولتها على عكس اللغات التي كانت متوفرةحينذاك مثل الكوبول وفورتران و لغة التجميع Assembly .






فأصل لغة فجوال بيسك هى لغة بيسك التي ظهرت في كلية دارتماوث Dartmaouth علي يد جون كيمني John Kemeny و توماس كيرتز Thomas Kurtz عام 1963م و قدأصبحت بسرعة فائقة من أشهر و أسهل لغات البرمجة بل لم تقف عند هذا فحسب فأصبحت كلغة تعليمية تدرٌس في المعاهد و الكليات و الجامعات و بدأ انتشارها في السبعينات




ثم أخذت هذه اللغة في التطور الدائم مع المحافظة على سهولةاستخدامها و بساطتها و كان الإصدار الأول لهذه اللغة عام 1991 م ثم كان الإصدار الثاني منها عام 1992 م ثم كان الإصدار الثالث عام 1993 ومن ذلك الوقت تعاقبت اصدارات كثيرةمنها ، الإصدار السادس (Visual Basic 6.0) وهو مع مجموعة من اصدارات شركة مايكروسوفت التي اسمته الان فيجوال ستديو 6.0 (Visual Studio 6.0) وبعد ذلك أصدرت مايكروسوفت اصدارها الجديد من لغة فيجوال بيسك هو الاصدار (Visual Basic .Net)





ويتوفر من هذة اللغة ثلاثة إصدارات مختلفةوهي:





1. Visual Basic Standard Edition

2. Visual Basic Professional Edition


3. Visual Basic Enterprise Edition





تمتاز Visual Basic بإمكانيات كثيرة نورد منهاما يلى :


امكانية كتابة برامج تعمل تحت بيئة ويندوز بسهولة وبسرعة.
سهولة تعديل وتطوير البرامج المكتوبة بها وسهولة تعلمها.
تتضمن مجموعة كبيرة من الكائنات objects
امكانية استخدام عددكبير من الايقونات والصور Icons & Pictures في البرامج
سهولة عمل ملف تنفيذي (Execution File).
سهولة التعامل مع قواعد البيانات المختلفة مثل Access - Oracle ... الخ.
قدرتها على التعامل مع الوسائط االمتعددة Multimedia.
تدعم التعامل مع العناصر البرمجية المستوردة Activex Controls.
سهولة ربطها مع التطبيقات الاخرى مثل ( ….Word-Excel ).
تدعم انشاء حزم البرامج (Setup Programms) بكفاءة عالية.
تدعم أدوات كثيرة تتعامل مع الشبكة الدولية Internet.
سهولة اكتشاف وتصحيح الأخطاء أثناء تشغيل البرنامج.
يمكن ان يشغل برامجها مستخدم واحد أو عدة مستخدمين في آن واحد.
البرمجة بالفيجوال بيسك تعتبر متعة حقيقية.
عناصر فيجوال بيسك:






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




عند تشغيلك لبرنامج الفيجوال بيسك فسوف ترى عدد من النوافذ والتي تعرف ببيئة التطوير المتكاملة للفيجوال بيسك VB IDE (integrated development environment) وكمبرمج فإنك سوف تمضي الوقت الكثير مع هذه الواجهة ، لذلك فاننا سنأخذ بعض الوقت للتعرف على القوائم وما تحتويه من أوامر وجميع الأدوات الاساسية والنوافذ الموجودة في بيئة التطوير الخاصة بفيجوال بيسك.






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







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






كيفية عمل Visual Basic





يمكن القول ان لغة Visual Basic لغةبرمجية ورسومية في آن واحد ( Graphical user interface )حيث انك تصمم واجهة برنامجك على الشكل الذي تريده بما في ذلك الصور والرسومات* وتضع بعض الازرار عليها مثلا * وتضع عناصر ادخال واخراج مثلا* ثم تقوم بكتابة كود لكل عنصر ليؤدي عمله كما يجب وعلى المنوال الذي تريده* ثم تجرب برنامجك وتصحح الاخطاء التي (قد) تتواجد فيه * فجل من لا يسهو * بعدها تأمر لغة فيجول بيسك بعمل ملف تنفيذي للبرنامج الذي صممته فينتجه على هيئة برنامج بامتداد أوتنسيق exe * بمعنى انه من نوع مايطلق عليه (تطبيق) عندها يمكن تنفيذ هذا التطبيق خارج بيئة برنامج Visual Basic (في اى جهاز كمبيوتر).






أساسيات البرمجة بــ Visual Basic






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





ومن المهم جداً أن يكون المبرمج متمكناً من جزئين مهمين في الفيجوال بيسك : قواعد البيانات و التقارير.





فالبرامج المصممة باستخدام الفيجوال بيسك تستخدم قواعد البيانات بنسبة 80% حيث ان معظم التطبيقات تحتاج الى حفظ بيانات وطباعتها. وسوف نقوم خلال هذه الدورة بشرح اكثر من طريقة للقيام بهذه المهام الا ان معظم المبرمجين يفضلون التعامل مع قواعد بيانات Access واستخدام مصمم التقارير المدمج مع فيجوال بيسك أو استخدام كريستال ريبورت Crystal Report





ومن الأمور المهمةللمبرمج المبتدئ هو امضاء بعض الوقت في معرفة الأساسيات للبرمجة بالفيجوال بيسك وعدم الذهاب مباشرة الى الأمور المتطورة في الفيجوال بيسك حيث أن90 % من البرامج تستخدم الأساسيات في الفيجوال بيسك ونادرا ما تحتاج إلى الأمور المتطورة









واول شئ هو اعداد النسخه وتثبيتها على الجهاز

بسم الله نبدا الدرس

نفتح النسخه الخاصه بنا على جهاز الكمبيوتر الخاص بنا


http://img208.imageshack.us/img208/2126/17xa3.jpg (http://imageshack.us/)


http://img208.imageshack.us/img208/1724/28eh.jpg (http://imageshack.us/)

http://img208.imageshack.us/img208/2633/37kf2.jpg (http://imageshack.us/)

http://img208.imageshack.us/img208/9624/41ba.jpg (http://imageshack.us/)

http://img208.imageshack.us/img208/18/58oc.jpg (http://imageshack.us/)
http://img208.imageshack.us/img208/7175/69pc.jpg (http://imageshack.us/)
http://img208.imageshack.us/img208/8666/79ot.jpg (http://imageshack.us/)
http://img208.imageshack.us/img208/4290/86te.jpg (http://imageshack.us/)
http://img208.imageshack.us/img208/6710/97ny.jpg (http://imageshack.us/)
http://img208.imageshack.us/img208/3001/105gj.jpg (http://imageshack.us/)
http://img208.imageshack.us/img208/8222/112pt1.jpg (http://imageshack.us/)
http://img208.imageshack.us/img208/985/129nb.jpg (http://imageshack.us/)
http://img208.imageshack.us/img208/8058/98er.jpg (http://imageshack.us/)
http://img208.imageshack.us/img208/1849/100gw1.jpg (http://imageshack.us/)

http://img208.imageshack.us/img208/1278/112ll.jpg (http://imageshack.us/)
http://img208.imageshack.us/img208/9892/126nx.jpg (http://imageshack.us/)
http://img208.imageshack.us/img208/8480/131yu.jpg (http://imageshack.us/)
http://img220.imageshack.us/img220/6282/145zc.jpg (http://imageshack.us/)
http://img220.imageshack.us/img220/7359/157dz1.jpg (http://imageshack.us/)
http://img220.imageshack.us/img220/5623/160bc.jpg (http://imageshack.us/)
http://img220.imageshack.us/img220/1184/178sa.jpg (http://imageshack.us/)
http://img220.imageshack.us/img220/3383/186ov.jpg (http://imageshack.us/)
http://img220.imageshack.us/img220/3249/195ic.jpg (http://imageshack.us/)
http://img220.imageshack.us/img220/9185/205bh.jpg (http://imageshack.us/)
http://img220.imageshack.us/img220/8577/218ck.jpg (http://imageshack.us/)
http://img220.imageshack.us/img220/6325/223nw.jpg (http://imageshack.us/)
http://img220.imageshack.us/img220/3804/233hf1.jpg (http://imageshack.us/)
http://img220.imageshack.us/img220/7527/247nd1.jpg (http://imageshack.us/)
http://img220.imageshack.us/img220/5992/258tu.jpg (http://imageshack.us/)
http://img220.imageshack.us/img220/1729/265bn.jpg (http://imageshack.us/)
http://img220.imageshack.us/img220/2832/278mm.jpg (http://imageshack.us/)
http://img220.imageshack.us/img220/7859/283am.jpg (http://imageshack.us/)
http://img157.imageshack.us/img157/5701/291xc.jpg (http://imageshack.us/)
http://img136.imageshack.us/img136/2825/309sb.jpg (http://imageshack.us/)
http://img153.imageshack.us/img153/7369/304in.jpg (http://imageshack.us/)
http://img224.imageshack.us/img224/7969/314oe.jpg (http://imageshack.us/)
http://img224.imageshack.us/img224/4829/326hu1.jpg (http://imageshack.us/)
http://img224.imageshack.us/img224/4502/337gz.jpg (http://imageshack.us/)
http://img224.imageshack.us/img224/8725/346lj1.jpg (http://imageshack.us/)
http://img224.imageshack.us/img224/1683/351pu.jpg (http://imageshack.us/)
http://img224.imageshack.us/img224/360/362ks.jpg (http://imageshack.us/)
nirvana115
19-04-2007, 12:27 AM
بارك الله فيك على مجهودك
في إنتظار المزيد
thegust2000
19-04-2007, 12:30 AM
بسم الله الرحمن الرحيم
السلام عليكم ورحمه الله وبركاته
اخوانى الكرم هذه دروس للفيجول
لم تنشر من قبل على الانتر نت لانها من شرحى
ومن يرد المتابعه معانا فاهلا به وفى اى سؤال انا حاضر للاجابه عنه فى نطاق الدرس المشروح او ما سبقه من الدروس وارجو عدم السؤال فى موضوع لم يتم شرحه بعد حتى لا نقفز ونضيع شرح قد يكون احد اخوننا فى حاجه اليه ومن وجد منى خطاء فليرشدنى فنحن بشر ونخطئ




الدرس الاول


http://img383.imageshack.us/img383/1241/53657078ir1.jpg (http://img383.imageshack.us/img383/1241/53657078ir1.jpg)



- ما هو الفيجوال بيسك؟


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

فى تصنيع البرامج مع مراعاه انها تقبل ادوات خارجيه يطلق عليها

مكتبات DLLوتقنيات ActiveXولذلك فهى تعبر مرنه مع البرامج اثناء

استخدام تلك الادوات كما يمكنك اثناء التعامل معها ان تقوم انت بتصنيع ادوات جديده وهذا ينبطق على العديد

من اللغات وليس الفيجوال بيسك فقط ومن اهم مميزاتها انه يمكنك من التعامل مع جميع انواع قواعد البييانات مثل (ORACEL-SQL2000Server-ACCESS-وغيرهم (
كما سنتطرق لهم بعد ذلك

اذن يتبين لك عزيز المشاغب ان الفيجول بيسك به عباره
عن حقيبه لمستلزمات المبرمج(شنطه عده)
ي تمكنك من البرمجه بطريقه سهله ويمكنك الحصول على ادوات اضافيه
عن طريق شركه ميكرو سوفت او من طريق النت احدى الشركات او المبرمجين او ان تقوم انت بعمملها وسوف نرى كيف يمكن ذلك باذن الله


2- ما هى ادوات البرمجه؟


http://img383.imageshack.us/img383/8086/45989763dl1.jpg (http://img383.imageshack.us/img383/8086/45989763dl1.jpg[/IMG])





ماذا نرى فى الشكل نرى شكل للاله الحاسبه التى توجد
مع نسخه الويندوز

هل يمكن ان تصنع عن طريق الفيجول ؟
نعم
كيف اذا لاحظنا ان الاله الحاسبه قد تم
انشاءه عن طريق اربعه ادوات وهى
1- Menu Editor
2- Form
3- Command Button
4- Text box

قمنا باستخدام الاده Menu Editor
لعمل القوائم الموجده فى الشكل


http://img169.imageshack.us/img169/8843/64705279qf6.jpg (http://img169.imageshack.us/img169/8843/64705279qf6.jpg[/IMG])


Form
الفورم هو بمثابه اللوحه الام التى توضع عليه كل الادوات

Command Button

هو الزر الذى يقوم بتفيذ الامر المكتوب عليه
اذا ضغطنا على 1 ثم ضغطنا على 0 مرتين
ماذا نلاحظ نلاحظ ان Command Button
قد قام بالفعل بانشاء الرقم 100

Text Box
هى الاده التى يطهر بها الناتج او يمكن ان ناخذ منها بيانات ولكن فى هذا المثال يظهر لنا الناتج بها ولكن فى بعذ الامثله
سوف يظهر لنا اننا سوف نكتب فيها



3- الادوات الاساسيه فى الفيجوال بيسك


http://img407.imageshack.us/img407/9330/84073142xs5.jpg (http://img407.imageshack.us/img407/9330/84073142xs5.jpg[/IMG])




1-الاده الرئيسيه عندنا الا وهى Form
فبدوناه لانستطيع ان نضع باقى الادوات لانشاء المشروع

2- اده Project Explorerوهى يكون فيها كل فورم نقوم بانشاءه او موديول

3- propery window او شاشه الخصائص ومنها نقوم بتغير اسم الاده او مكانها او الحجم الخ
4- Tool Box وبها يكون معظم الادوت التى نقوم باستخدما مثل الـ Command Button - Text Box الخ



الـ Form
اذا لاحظنا ان شكل الفورم هو نفس شكل الاله الحاسبه التى تاتى مع الويندوز وهى ايضا نفس شكل برنامج الرسام
ومعظم البرامج التى نفوم باستخدمها
الـ Tool Box

بها مجموعه ازرار
مثل الـ Command Button - Text Box –label-Image Box
كما يمكنا ان نضيف مزيد من الادوات بالضغط علىTool )Box صندوق الادوات)
واضافه ما نريد ان نضيفه مثل Calendar
(النتيجه)
سوف تلاحظ انها ظهرت معنا فى صندوق الادوات واصبح لها ايكونه جاهزه للاستعمال

http://img441.imageshack.us/img441/9228/90323362hn3.jpg (http://imageshack.us/)


Property window
شاشه الخصائص
كما ذكرنا مسيقا انه تقوم بالتحكم فى خصائص اى اده موجوده على الفورم وحتى الفورم نفسه
مثال

http://img383.imageshack.us/img383/4706/35915690jj2.jpg (http://img383.imageshack.us/img383/4706/35915690jj2.jpg[/IMG])
http://img383.imageshack.us/img383/152/96959594hu3.jpg (http://imageshack.us/)
thegust2000
19-04-2007, 12:33 AM
بسم الله الرحمن الرحيم

السلام عليكم ورحمه الله وبركاته

الدرس الثانى
بعد ان تعرفنا على فكره عامه عن الفيجوال بيسك


نذهب لنفتح الفيجوال بيسك وتظهر لنا اول شاشه


http://img187.imageshack.us/img187/6358/65328715hq5.jpg (http://imageshack.us/)




قائمه New تضم مايلي


1- Standard EXE :وهو يقوم بإنشاء برنامجتنفيذي بعد طلبك لذلك من ( Make EXE) في قائمة ( File ) .


2 -Activex EXE : وهو أيضاً يقوم بإنشاء ملفاًله الامتداد ( DLL ) وهو ملف ذو برامج فرعيه مساعدة و هو لا يعمل بنفسه بل مع exe .


3- Activex DLL : وهوينشئ ملفات لها امتداد EXE تعمل مع برامج إخرى لكي يعمل في شكل ( OLE ) .


4- Activex control : وهو يساعدعلى إنشاء ملف من نوع ( ocx ) و هي مهمة وتساعد على إحتواء واجهة مستخدم أو برامجفرعية .


5- Activex Document DLL : وهو يساعد على إنشاءملف ذو امتداد ( DLL ) يقوم بتشغيل برامج على موقع في الانترنت .


6- Activex Document exe : يقوم بإنشاء ملفاتتظهر على الانترنت .


7- Add In : وهو خاص بالفيجوال بيسك حيث يمكنكإضافة واجهة مع ما ذكر سابقاً خاصة بك .


8 -VB Application Wizard : وهو معالج تلقائي في هذه اللغة يساعدك على إنشاء نوافذ عدة دون كتابةسطر واحد من النوع ( exe ) .


9 - ISS Aplication : نقصد بـ ( ISS ) إختصارلكلمة ( Internet Information Server ) و يقوم بالتحضير لتصميم ( web class ) وهوما يسميه المستخدم صفحات ( HTML ) .


10 - Data project : تضع مشروعاً لقواعد بياناتوتهيئة في بيئة متكاملة من أدوات الربط وصنع التقارير دون الحاجة لفتح برامج أخرى .


11- Vb wizard manager : و تبدو مشابهة لمعالجات ( Microsoft ) يمكنك إستخدامه .


12- DHTML Application : تسهل عليك صنع صفحات ( HTML ) ديناميكية للإنترنت دون تعلم لغة Java .


13- Vb Enterprise Edition controls :وهي تساعد على وضع جميع الأدوات المستخدمة بكثرة لقواعد البيانات والاتصال ومن ثم تطبيقها وهي للمحترفين.






http://img149.imageshack.us/img149/6203/91727539ec3.jpg (http://imageshack.us/)


الان نبداء بالفورم او النموذج
نلاحظ ان عنوان الفورم form1
نذهب الى شاشه الخصائص الى الخاصيه caption(العنوان)
http://img95.imageshack.us/img95/8162/14079801ly1.jpg (http://imageshack.us/)

http://img95.imageshack.us/img95/4237/28789315ij7.jpg (http://imageshack.us/)

بعد الانتهاء من خاصيه caption
ياتى دور الخاصيه control box
وهى لتكبير وتصغير وإغلاق البرنامج ونجدها فى الاعلى على اليمين

http://img187.imageshack.us/img187/2529/49340431ym1.jpg (http://imageshack.us/)


وبمكنا ان نخفيها او نلغيها باختيار القيمه من true الى false (حقيقى او زائف)
http://img100.imageshack.us/img100/2066/97687297et2.jpg (http://imageshack.us/)
اذا قمنا باختيار القيمه flase
نجد ان Control Box قد اختفت


http://img245.imageshack.us/img245/3870/33880875bo6.jpg (http://imageshack.us/)

خاصيه Enabled
وهى لجعل الفورم غير نشيط
ماذا تعنى اى ان المستخدم لا يستطيع تحريك الفورم من مكنها اذا قمنا بتغير قيمه الخاصيه كم true الى false
وقمنا بتشغيل المشروع عن طريق playاو بالضغط على F5

http://img141.imageshack.us/img141/8893/26042193bc1.jpg (http://imageshack.us/)

بعد الضغط على F5 او play
نجد ان الفورم لا يتحرك


خاصيه back color
وهى لتغير لون خلفيه الفورم
كما تحب

http://img95.imageshack.us/img95/8788/61415570xz3.jpg (http://imageshack.us/)
http://img95.imageshack.us/img95/4291/10lc5.jpg (http://imageshack.us/)

خاصيه BorderStayl

وهى لتغير شكل الفورم
مثال

عند فتح خاصيه Border Stayl
نجد ست خيارت
الاولى

http://img245.imageshack.us/img245/9848/11cc2.jpg (http://imageshack.us/)
الخيار الثانى
http://img245.imageshack.us/img245/544/12kf8.jpg (http://imageshack.us/)

الخيار الثالث
يقوم بتنشيط التكبير والتصغير والاغلاق مع امكانيه اعاده تحجيم(resiz)
يجب ان تقوم بعمل play للفورم حتى تسطيع ان تشاهد عمليه التحجيم
http://img153.imageshack.us/img153/6501/13hx7.jpg (http://imageshack.us/)
http://img176.imageshack.us/img176/8079/14pz5.jpg (http://imageshack.us/)




الخيار الرابع
هو نفسه الخيار الثانى مع امكانيه تغير الحجم
الخيار الخامس
يقوم بتصغير الشريط حتى يصلح ان يكون نافذه داخل برنامج مثل نافذه الخصائص
http://img141.imageshack.us/img141/5378/15tg3.jpg (http://imageshack.us/)


الخيار السادس
هو نفسه الخيار السابق ولكن مع امكانيه تغير الحجم
thegust2000
19-04-2007, 12:36 AM
بارك الله فيك على مجهودك
في إنتظار المزيد



العفو وارجو ان تكونى متابعه معانا ان شاء الله





والان خاصيه Icon
وهى لتغير ايكونه البرنامج

http://img245.imageshack.us/img245/6917/16js7.jpg (http://imageshack.us/)
http://img182.imageshack.us/img182/2816/17bb9.jpg (http://imageshack.us/)
http://img245.imageshack.us/img245/2402/18an8.jpg (http://imageshack.us/)
http://img145.imageshack.us/img145/5290/19in9.jpg (http://imageshack.us/)

والان خاصيه Max Button

وهى لتنشيط او خمول الزر Max Button
عن طريق true او false

http://img182.imageshack.us/img182/5846/20ok8.jpg (http://imageshack.us/)
Min Buttonالخاصيه

وهى نفس طريقه زر Max Button




خاصيه Moveable
وهى شبيه بخاصيه Enabled
لكن فى خاصيهMoveable يكون الفورم نشط
بعكس الوضع فى خاصيه
Enebaled

خاصيه Right to Left
وهى لتغير مكان العنوان من اليمين الى اليسار


http://img182.imageshack.us/img182/103/21hp9.jpg (http://imageshack.us/)

خاصيه visible
وهى لاخفاء الفورم اثناء عمليه التشغيل للبرنامج ولكنه موجود

http://img241.imageshack.us/img241/8885/22tl2.jpg (http://imageshack.us/)
خاصيه MousePointer
وهى لتغير شكل الموس على الفورم
اذا قمنا باختيار اى قيمه موجوده بالبرنامج سوف تتحقق فور مرورك على الفورم (طبعا لازم اكون مسوى تشغيل قبلها F5)


مثال

http://img241.imageshack.us/img241/844/23mf2.jpg (http://imageshack.us/)


اما اذا اردنا ان نغير شكل الفاره على حسب ما نريد نحن من اشكال فنختار القيمه Custem
وبعد ذلك نذهب الى الخاصيه
Mouse Icon

http://img141.imageshack.us/img141/3100/24fr8.jpg

ثم نقوم بعمل Run
للبرنامج
ونمرر الموس لنرى شكله


خاصيه Pictuer
وهى لاضافه صوره على الفورم

http://img141.imageshack.us/img141/1469/25zm3.jpg (http://imageshack.us/)
http://img245.imageshack.us/img245/811/26ft1.jpg (http://imageshack.us/)

خاصيه Show in Task Bar

http://img243.imageshack.us/img243/1900/27du6.jpg (http://imageshack.us/)
يجب عليك ان تقوم بتشغيل البرنامج لترى ما فعلته هذه الخاصيه






خاصيه Startup Position
وهى عند عمليه تشغيل للبرنامج من اين يظهر

http://img140.imageshack.us/img140/3089/28jy5.jpg (http://imageshack.us/)


خاصيه WindowState


وهى لطريقه بدء تشغيل البرنامج
هل تريد ان تبداء وتكون Maxmiz OR Minemaiz
او عاديه

http://img182.imageshack.us/img182/4528/29fx0.jpg (http://imageshack.us/)




الان لدينا
خاصيه
Height
وهى ضيط ارتفاع الفورم بالبيكسل
وايضا خاصيه Width
وهى لضبط عرض الفورم بالبيكسل
خاصيه left
وهى لبعد الفورم عن جانب الشاشه من تجاه اليسار الى منصف الشاشه بالبيكسل
خاصيه
Top
وهى لبعد الفورم من فوق الى تحت بالبيكسل
وهذه كانت اهم الخصائص التى سوف نستخدمها حاليا وهى معظمها متشابه ولذلك قمنا بشرحه لانها تنطبق على معظم الـ Tools
qweasdyxc2004
19-04-2007, 12:39 AM
يشرفني ان اكون ثاني من يرد عليك اخي الكريم بارك الله فيك وجعل هذا العمل في موازين حسناتك يا رب
جزاك الله الجنه ورحم الله والديك
والله ابداع في الشرح
تحياتي
thegust2000
19-04-2007, 12:40 AM
بسم الله الرحمن الرحيم
السلام عليكم ورحمه الله وبركاته
الدرس الثالث
Tool Box(صندوق الادوات)
وهو كما بالشكل

http://img241.imageshack.us/img241/4741/63649790py6.jpg (http://imageshack.us/)



ونبداء مع اول اده وهى Cmmand buton(اداه المفتاح)
نقوم بالضغط عليها مرتين لتضهر على الفورم

http://img248.imageshack.us/img248/7919/88549128vl0.jpg (http://imageshack.us/)


ويمكنا ان نغير حجم المفتاح على حسب رغبتك انت
http://img174.imageshack.us/img174/1272/65254831uu4.jpg (http://imageshack.us/)
عندما نضغط على اده المفتاح نجد ان شاشه الخصائص
قد تغيرت الى خصائص المفتاح تلاقائيا
ونفس الشئ مع الفورم
او اى اداه موجوده على الفورم
نبداء الان مع خصائص اداه المفتاح Command Button
توجد قيم كثيره متاشبها مع بعض الادوات
وهناك خصائص متاشبها مع الفورم والمفتاح
مثل خاصيه Caption
http://img68.imageshack.us/img68/4117/74879692qc1.jpg (http://imageshack.us/)


والان خاصيه Tip Tool Text
وهى لاظهار رساله للمستخدم تخبره عن عمل المفتاح
http://img174.imageshack.us/img174/7034/62340822gs7.jpg (http://imageshack.us/)
http://img255.imageshack.us/img255/331/47094463sk5.jpg (http://imageshack.us/)
والان خاصيه Right To Left
وقد قمنا بشرحها فى درس الفورم وهى ايضا موجوده مع هده الخصائص
ملحوظه
ادا قمنا بتفعيل هده الخاصيه فى الفورم فاى اده يعد دلك سوف تاخد نفس القيمه الا لو احببت ان تغيرها



خاصيه Enabled
وهى كانت ايضا موجوده بالفورم
http://img248.imageshack.us/img248/4377/47340117sr0.jpg (http://imageshack.us/)
http://img174.imageshack.us/img174/8641/35726125an1.jpg (http://imageshack.us/)
خاصيه Style
http://img161.imageshack.us/img161/615/11690381bs5.jpg (http://imageshack.us/)
خاصيه Picture
بعد تنشيطها يمكنك ان تختار اى صوره لتضعها على المفتاح
مثل
http://img174.imageshack.us/img174/4033/10gd2.jpg (http://imageshack.us/)
http://img174.imageshack.us/img174/6942/11fe9.jpg (http://imageshack.us/)
خاصيه Picture Disablad
وهى لوضع ايكونه او صوره للمفتاح فى ان تكون خاصيه Enabledقيمتها False
http://img174.imageshack.us/img174/9620/12fg3.jpg (http://imageshack.us/)
http://img255.imageshack.us/img255/6854/13tc6.jpg (http://imageshack.us/)
http://img176.imageshack.us/img176/9181/14mt6.jpg (http://imageshack.us/)
خاصيه DownPicutre
وهى لاطهار صوره للمفتاح اثناء الضغط عليه
http://img248.imageshack.us/img248/594/15sy9.jpg (http://imageshack.us/)
http://img126.imageshack.us/img126/679/16yz5.jpg (http://imageshack.us/)
خاصيه Back Color
http://img248.imageshack.us/img248/9597/17as4.jpg (http://imageshack.us/)
خاصيه Font
http://img126.imageshack.us/img126/1069/18oz7.jpg (http://imageshack.us/)
http://img176.imageshack.us/img176/5646/19ss3.jpg (http://imageshack.us/)
خاصيه visible
وهى قمنا بشرحها فى درس الفورم وتقوم بنفس العمل
لعدم ظهور المفتاح اثناء تشغيل البرنامج
والان يعتبر انتهينا من اهم خصائص اداه المفتاح
ونبداء الان مع اول اومر كتابته الكود
وهذا هو اهم الاجزاء فى الفيجوال
thegust2000
19-04-2007, 12:43 AM
يشرفني ان اكون ثاني من يرد عليك اخي الكريم بارك الله فيك وجعل هذا العمل في موازين حسناتك يا رب
جزاك الله الجنه ورحم الله والديك
والله ابداع في الشرح
تحياتي


العفو اخى الكريم وارجو ان يكون الموضوع على المستوى المطلوب
وان شاء الله فى دروس اكثر اهميه غدا ان شاء الله
77ahmed
19-04-2007, 07:51 AM
يعطيك العافيه اخوي
الجوهر الفرد
20-04-2007, 01:36 AM
موضوع في منتهى منتهى الروعه
واصل بارك الله فيك
فنحن تلامذتك
chelsea 200
20-04-2007, 01:54 AM
شرح ممتاز جداً وسهل وجميل - يعطيك العافية
thegust2000
20-04-2007, 02:45 AM
شرح ممتاز جداً وسهل وجميل - يعطيك العافية

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

يعطيك العافيه اخوي



العفو اخوانى الكرام وان شاء الله الدرس القادم خلال ساعات يكون حاضر ان شاء الله
kchlif
20-04-2007, 03:26 AM
baraka allahou feek
nec2000
20-04-2007, 04:55 AM
لك مني كل الشكر والتقدير على هذا الشرح الرائع والمبسط
ارجز منك اخي ان تضع رابط للبرنامج مع ملحقاته.....

جزاك الله كل خير.......ومن المتابعين
thegust2000
20-04-2007, 08:55 AM
بسم الله الرحمن الرحيم

السلام عليكم ورحمه الله وبركاته


انتهينا فى الدرس السابق عند كتابه اول كود لنا

والان لابد لك ان تعرف ان هناك مجموعه احداث


اى ان مرورك على الفورم او المفتاح هذا حدث

ضغطك على المفتاح حدث
رفع يدك عن المفتاح حدث
كل هذه احداث يقوم الكمبيوتر بترجمتها الى اومر


مثال

نقوم بانشاء فورم جديد ونضيف اليه مفتاح Command Button


http://img172.imageshack.us/img172/6497/18642317sj4.jpg (http://imageshack.us)

http://img88.imageshack.us/img88/420/67393848ya4.jpg (http://imageshack.us)

والان نكتب فى مكان كتابه الكود


هذا الكود




Form1.Caption = "منتديات مشاغب التعليميه"


ما معنى هذا الكوده



نحن نقوم ببرمجه Command1
فنقول يا مفتاح 1
اذهب الى الفورم وغير الاسم الى منتديات مشاغب التعليميه

لاحظ ان الاسم داخل علامات تنصيص

http://img174.imageshack.us/img174/6923/32742171zv5.jpg (http://imageshack.us)

هل هناك احداث اخرى

نعم

http://img170.imageshack.us/img170/7647/90709482yf9.jpg (http://imageshack.us)


وهناك احداث اخرى ولكنا نهتم حاليا بهذه الاحداث
وسوف نتانولهم واحد تلو الاخر ان شاء الله



بعد ان قمنا بكتابه الكود نقوم بتشغيل البرناج
طبعا عارفين من F5

http://img172.imageshack.us/img172/2677/72657466qo6.jpg (http://imageshack.us)

http://img174.imageshack.us/img174/9775/82057902sp1.jpg (http://imageshack.us)

لقد طلبنا من المفتاح ان يغير Caption الخاصه بالفورم هل يمكن ان يغير الخصائص من شاشه البرمجه نعم
وعمل الكثير منها

ويمكن ان يغير الاسم الخاص بالمفتاح
كل هذا اتركه لكم للتجربه مع مراعاه تغير اسم الفورم الى اسم الاده المراد تغيرها


فرضا نريد تغير مفتاح رقم 2

على الفورم
بمجرد مرور الموس على المفتاح رقم واحد



http://img167.imageshack.us/img167/5127/43412754wz5.jpg (http://imageshack.us)

http://img184.imageshack.us/img184/4916/98324245xu9.jpg (http://imageshack.us)



http://img172.imageshack.us/img172/763/20712058bk3.jpg (http://imageshack.us)


http://img143.imageshack.us/img143/9199/10ma5.jpg (http://imageshack.us)

ونسطيع ان نظهر زر ونخف الاخر



هذا المثال لذيذ وظريف


ننشئ فورم به ثلاث مفتايح


ونكتب بهم كما بالصور






http://img143.imageshack.us/img143/6008/11ux5.jpg (http://imageshack.us)







ونذهب الى خصائص مفتاح الثالثCommand 3



ونضغط دبل كليك على مفتاح 2



ونكتب فيه





http://img172.imageshack.us/img172/1962/12sa9.jpg (http://imageshack.us)


http://img167.imageshack.us/img167/9061/13mk9.jpg (http://imageshack.us)



Command2.Visible = False
Command3.Visible = True


http://img174.imageshack.us/img174/5633/14uk2.jpg (http://imageshack.us)




Command3.Visible = False
Command2.Visible = True

ثم نقوم بتشغيل البرنامج ونرى ما سيحدث


كلما ذهبت الى واحده بالموس تختفى وتظهر الاخرى


شرح الكود

نقول للمفتاح 2عند مرور الموس

قم بتغير الخاصيه Visible
من القيمه
True الى false

ثم غير قميه الخاصيه Visible
الخاصه بالمفتاح 3 الى من
False الى true

ثم نذهب للمفتاح 3
ونخبره عند مرور الموس يقوم يتغير خاصيته
من القيمه
True الى false

ثم غير قميه الخاصيه Visible
الخاصه بالمفتاح2 الى من
False الى true


ويمكن ان نغير المفتاح رقم 1
الى
label

نكتفى اليوم بهذه الامثله حتى تكون خفيفه عليكم ولا تتعبكم فتنفرو من الشرح والرجاء التطبيق ومن يواجه منكم مشكله يخبرنى وان شاء الله تكون محلوله



الاسئله فى نطاق الدروس
lamine1
20-04-2007, 05:15 PM
بارك الله فيك وجزاك الف خير
nec2000
22-04-2007, 01:42 PM
للرفع
thegust2000
23-04-2007, 03:22 AM
شكرا لكم يا شباب والدرس سيكون لديكم خلال ساعات
«MoRaD»
23-04-2007, 03:29 AM
موضوع في منتهى منتهى الروعه
واصل بارك الله فيك
الجوهر الفرد
23-04-2007, 03:51 AM
متاااااااااااااااااااااااااابع
thegust2000
23-04-2007, 05:02 AM
بسم الله الرحمن الرحيم


السلام عليكم ورحمه الله وبركاته


الدرس الخامس

اده Text Box

http://img186.imageshack.us/img186/6988/72382015wx2.jpg (http://imageshack.us)


اهم خصائص اده النص من صندوق الخصائص


وهى
http://img223.imageshack.us/img223/9200/96263487dr3.jpg (http://imageshack.us)

خاصيه Font

وهى خاصيه اعرض نوع الخط المطلوب عرضه فى صندوق النص



خاصيه Fore Color
وهى للتاثير على لون الخط نفسه


خاصيه Locked

اذا قمنا بتغير القيمه الى true لن يستطيع المستخدم استخدام الكتابه فى النص
اما اذا غيرتها الى falseفسوف يستطيع الكتابه فى صندوق النص



خاصيه Max legth


وهى لعدد الحروف او الارقام فى صندوق النص


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

وهذه تستخدم عاده خانه الرقم السرى

واذا كتبنا 0 ا فهذا يعتب انك تركتها مفتوحه لاى عدد من الحروف والارقام

خاصيه Multi Line
وهى لتعدد الاسطر اى انك تسطيع ان تتيح للمستخدم كتابه اكثر من سطر وايضا يمكنك ان تجعله يكتب فى سطر واحد فقط فاذا كنت سوف تصمم برنامج مثل Word
فسوف تجعل القيمه Trueواذا كنت سوف تجعلها خانه لكتابت الاسم فسوف تغير القيمه الى False





خاصيه Password Char
وهى لاظهار الحروف والارقام نجوم او علامات او على حسب ما تريد انت من علامات



http://img227.imageshack.us/img227/1838/77008041gz6.jpg (http://imageshack.us)



خاصيه Scroll Bars
وهى لاضافه سكرول بار لتحريك الصفحه افقيا او راسيا

http://img186.imageshack.us/img186/6092/89871428hr3.jpg (http://imageshack.us)



والان مع اول دروس لتعمل برمجه صندوق النص
thegust2000
23-04-2007, 08:06 AM
بسم الله الرحمن الرحيم
السلام عليكم ورحمه الله وبركاته


تدريب على صندوق النص فى كتابه الكود

نبداء اولا بانشاء ثلاثه من صندوق النص


http://img147.imageshack.us/img147/8807/53462965uk6.jpg (http://imageshack.us)




وننشئ Command Button
ونسميه موافق

http://img169.imageshack.us/img169/1065/59412479wk8.jpg (http://imageshack.us)


ثم نضغط دبل كليك على المفتاح(Command Buton)

فتظهر لنا شاشه الكود

نكتب هذا الكود

http://img167.imageshack.us/img167/647/78645520jg3.jpg (http://imageshack.us)

3
لاحظ هنا ان الحدث هو كليك اى ان البرنامج لان يعمل الا اذا قام المستخدم بعمل كليك ويمكنك ان تغير الى موس موف اذا ارددت او اى شئ مما قمنا بتعليمه




Text3.text =text1.text+text2.text



شرح الكود

نقول للمفتاح ان النص رقم 3 خانه النص = النص 1خانه النص +النص 2خانه النص




http://img169.imageshack.us/img169/3641/36598846ts2.jpg (http://imageshack.us)


ثم نقوم بتشغيل البرنامج بالضغط على F5


http://img167.imageshack.us/img167/9313/11765629cu8.jpg (http://imageshack.us)


سيظهر لنا

ان البرنامج قام بجمع الخانتين مع بعضهم


http://img221.imageshack.us/img221/6618/84182652ik5.jpg (http://imageshack.us)



اذن البرنامج قام بجمع ما فى الخانتين


هل هذا معنه انه اذا قمنا بوضع ارقام سوف يقوم بجمعهم نجرب

http://img167.imageshack.us/img167/289/48353552st9.jpg (http://imageshack.us)


المفروض المجموع 475

نستنتج اذن من الكود انه يقوم بجمع الخانات بجوار البعض

ولا يقوم بجمعهم
اذن ما هو الكود الصحيح




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


ليصبح الكود هكذا




Text3.text = val(text1.text)+val(text2.text)


http://img169.imageshack.us/img169/2946/79855067qw4.jpg (http://imageshack.us)

http://img221.imageshack.us/img221/5725/76872301fs5.jpg (http://imageshack.us)

Val تعنى value
اى قيمه ما فى صندوق النص


مثال اخر

http://img221.imageshack.us/img221/2650/10xz9.jpg (http://imageshack.us)

http://img216.imageshack.us/img216/397/11dz5.jpg (http://imageshack.us)


ر
ابو المكاكوة
23-04-2007, 08:24 PM
الف شكر على الموضوع الاكثر من رائع

تم حفظ الدروس في الجهاز

لكن نحتاج الى نصيحة منك

هل ابدأ به

ام ابدأ بالدوت نت

نفع الله بك
thegust2000
23-04-2007, 09:04 PM
الفيجوال بيسك دوت نت هو تطور للفيجوال بيسك 6
laaz
23-04-2007, 09:21 PM
اللهم بارك لنا في هذه الدروس
ووفق أستاذنا الكريم
thegust2000
23-04-2007, 09:36 PM
اللهم بارك لنا في هذه الدروس
ووفق أستاذنا الكريم



العفو واتمنى من الله ان تكون الدروس مفيده ولكنى كنت اطمح ان تكون هناك اسئله حول الدروس
الجوهر الفرد
24-04-2007, 05:43 AM
جزاك الله خير

الاسئله جايه بس قداام شويه
زيزوووم
24-04-2007, 06:20 AM
موضوع في منتهى منتهى الروعه
واصل بارك الله فيك
فنحن تلامذتك
thegust2000
25-04-2007, 12:37 AM
شكا لكم والدرس القادم خلال ساعات ان شاء الله
nec2000
25-04-2007, 12:50 AM
اخي الكريم thegust2000
ارجو ان تضع رابط للبرنامج ليتسنى لي العمل مع شرحك....
good killer
25-04-2007, 01:05 AM
اولا اخى اقدر تعبك وجهدك فى عمل الموضوع واشكرا بشدة شدية على ذلك

ثانيا انا الصراحة احترت مش عارف استخدم انى لغة ولحد دلوقتى مش عارف اامبرمجين اللى

بيعملوا برامج رائعة بيعملوها بانى لغة
thegust2000
25-04-2007, 01:31 AM
اخي الكريم thegust2000


ارجو ان تضع رابط للبرنامج ليتسنى لي العمل مع شرحك....



انشاء الله اخى الكريم سوف اقوم برفع السورس كود لشرح اليوم بادن الله


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

ثانيا انا الصراحة احترت مش عارف استخدم انى لغة ولحد دلوقتى مش عارف اامبرمجين اللى

بيعملوا برامج رائعة بيعملوها بانى لغة

والله اخى هناك من يقومو بربط البرامج مع بعضها البعض وليس برنامج بحد ه
ضعضور
25-04-2007, 01:36 AM
يا اخ thegust2000 انا لسة بدرس الفجوال بيسيك وكنت عوز التكلم معاك فى عدة موضوعات فارجوك ممكن تبعتلى ايميلك على شان اتكلم مع حضرتك عن طريق الياهو بس شوف حضرتك فاضى بكرة الساعة كام على شان اقدر اتكلم معاك
ضعضور
25-04-2007, 01:39 AM
على فكرة انا بدرس فى كورس a g c وكنت عوز اعرف اية راى حضرتك فى هذا الكورس
thegust2000
25-04-2007, 03:06 AM
بسم الله الرحمن الرحيم

السلام عليكم ورحمه الله وبركاته


عمل برنامج متوسط حسابى

اولا ماهو المتوسط الحسابى


ابسط امثله المتوسط الحسابى

هى

http://img177.imageshack.us/img177/7163/67089461mc8.jpg (http://imageshack.us)



او كما تعلمنا فى المعادلات تحويل القانون الى رموز


http://img185.imageshack.us/img185/6228/68688114md6.jpg (http://imageshack.us)

ليصبح


http://img185.imageshack.us/img185/5062/11419156tk5.jpg (http://imageshack.us)





ثم نقوم بفتح الفيجوال الخاص بنا
وننشئ 4 Text Box
4label
2Command Buotn
كما فى الصور
http://img412.imageshack.us/img412/7810/15283426tu5.jpg (http://imageshack.us)


ثم قم بتغير الاسماء حسب المطلوب

http://img383.imageshack.us/img383/4242/27712444ae9.jpg (http://imageshack.us)




http://img383.imageshack.us/img383/2512/75421978yv9.jpg (http://imageshack.us)

والان نقوم بتغير اسم التكست (الدى يكون فى البرمجه وليس الظاهر للمستخدم)

http://img383.imageshack.us/img383/4287/50877957fn8.jpg (http://imageshack.us)

ثم نضغط دبل كليك على زر المتوسط الحسابى


http://img383.imageshack.us/img383/6853/33184298bo2.jpg (http://imageshack.us)





m.Text = (Val(x) + Val(y) + Val(z)) / 3




نقوم يتشغيل البرنامج



ونكتب الرقم المطلوب المتوسط الحسابى له


http://img177.imageshack.us/img177/9442/52030040xw7.jpg (http://imageshack.us)



والان دور زر الخروج


وهى فى قمه السهوله
نخبر البرنامج بالنهايه

اى نكتب

End

ليكون شكل الكود هكدا


http://img177.imageshack.us/img177/8544/10ih7.jpg (http://imageshack.us)

الى هنا
انتهى الدرس
وحاضر لاى سؤال
فى نطاق الدرس
او ما سبقه
ان شاء الله


السورس كود للمشروع

امـ (http://eg-az.110mb.com/برنامج%20%20متوسط%20حسابى%20منتدايات%20مشاغب.rar) الظلام ـير
thegust2000
25-04-2007, 03:12 AM
على فكرة انا بدرس فى كورس a g c وكنت عوز اعرف اية راى حضرتك فى هذا الكورس



اخى كيف احكم عليه ولم ادرس فيه ولكن عندى اسطونات منه وهى مفيد لمعرفه البديه فى الفيجوال
الجوهر الفرد
25-04-2007, 03:30 AM
رائع جداً

بس انا عايز اعرف ايه الفرق بين fixed single
fixed dialogالمفروض منطقيا ان سنجل تخلى الفورم فيه اكس بس والدايلوج تخلى الفورم فيه الاكس والماكسمم والمانمايز
بس عمليا عند التجربه الاتنين واحد مفيش اختلاف
وبتمنى منك تخش اكتر في التطبيق وتخلينا نعمل تطبيقات وبرامج فعليه تدينا الفكره وتشرحلنا الكودونعمل احنا البرنامج ونعرضه عليك

وجزاك الله خيرا لان شرحك مميـــــــــــز
thegust2000
25-04-2007, 03:45 AM
رائع جداً

بس انا عايز اعرف ايه الفرق بين fixed single
fixed dialogالمفروض منطقيا ان سنجل تخلى الفورم فيه اكس بس والدايلوج تخلى الفورم فيه الاكس والماكسمم والمانمايز
بس عمليا عند التجربه الاتنين واحد مفيش اختلاف
وبتمنى منك تخش اكتر في التطبيق وتخلينا نعمل تطبيقات وبرامج فعليه تدينا الفكره وتشرحلنا الكودونعمل احنا البرنامج ونعرضه عليك

وجزاك الله خيرا لان شرحك مميـــــــــــز


المفروض ان واحده منهم بتقبل التكبير والتصغير عن طريق الموس والتانيه لاء بس انا مش عارف مش راضيه ليه تقبل عندى كنت وريتهالك


اما بالنسبه للتطبيقات ان شاء كل حاجه هاتيجى بس بشويش مش عايزين نجرى بسرعه وغيرنا مش فاهم احنا عدينا ازاى

انا بحاول على قد ما اقدر اخلى الدرس ابسط من الازم علشان محدش يتخنق من الشرح وممكن البعض يفهم على انه (لات وعجن ) بدون فائده بس علشان فى ناس فعلا مش بتعرف ازاى تتعامل مع الكمبيوتر نفسه
thegust2000
25-04-2007, 08:46 AM
بسم الله الرحمن الرحيم

السلام عليكم ورحمه الله وبركاته

اده Picture Box

http://img367.imageshack.us/img367/7827/28703272iw3.jpg (http://imageshack.us)

الغرض منه هو عرض صور داخل البرنامج




من مميزاته انه يمكنك اضافه ادوات بداخله مثل Command Button



اهم خصائصه هى


عرض صوره بداخل الصندوق

خاصيه Picture



http://img367.imageshack.us/img367/8723/82070512mm3.jpg (http://imageshack.us)



خاصيه Auto Size

بعد اختيار الصوره نجد ان الحجم غير مضبوط مع بعضه البعض

ولذلك يمكننا عمل احتواء مناسب على حسب حجم الصوره عن طريق
الخاصيه Auto Size


http://img367.imageshack.us/img367/2659/64478953xa6.jpg (http://imageshack.us)

http://img367.imageshack.us/img367/2521/47867739bq1.jpg (http://imageshack.us)



طبعا الخصائص بداءت تقل علشان فى عدد كبير متاشبه منهم

والان مع تمرين على Picture Box


نقوم بانشاء
2picture Box
4Command Button
1Label
1Text Box
مثل الشكل الاتى

http://img367.imageshack.us/img367/9579/79414485pz7.jpg (http://imageshack.us)

والان قم بتغير الكابشن

http://img367.imageshack.us/img367/1120/68425810qr0.jpg (http://imageshack.us)





والان نبدا بكتابه اول كود وهو تحميل الصوره





Picture1.picture =loadpicture("c:/absba_logo.gif")



http://img367.imageshack.us/img367/9149/77366986jt5.jpg (http://imageshack.us)

هذا حيث ان الصوره موجوده فى درايف السى

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





Picture1.picture =loadpicture()




كود نسخ الصوره

وهو اسهل مما قبله


Picture2.picture= Picture1.picture

http://img170.imageshack.us/img170/5494/90772900ma5.jpg (http://imageshack.us)


كود لمعرفه عنوان الصوره من صندوق نص




Picture1.picture= loadpicture(text1.text)
ولكن يجب ان يكون عنوان الصوره مضبوط
حتى لا يقف البرنامج عن العمل

http://img367.imageshack.us/img367/4160/12685810cp1.jpg (http://imageshack.us)

هكذا انتهي الدرس وحاضر للاسئله اذا كان فى
thegust2000
25-04-2007, 12:34 PM
السورس كود للمشروع


امـ الظلام ـير (http://eg-az.110mb.com/برنامج%20picture%20Box.rar)
thegust2000
25-04-2007, 05:20 PM
بسم الله الرحمن الرحيم

السلام عليكم ورحمه الله وبركاته

الدرس التاسع
اداه Image Box
http://img263.imageshack.us/img263/171/54016747of2.jpg (http://imageshack.us)

اهم خصائصه واختلافها عن picture Box
كما ذكرنا من قبل ان picture Box يمكن ان تضيف عليه اداه اخرى او اى object
اما بالنسبه للاده Image Box فلا يمكن
وايضا ايمج بوكس شفاف اما صندوق الصوره غير شفاف
كما اننا اذا وضعنا صوره فى Picture Box وكان الحجم غير مضبوط نضبط الحجم من Auto Size
لياخذ نفس حجم الصوره اما فى Image Box
فيمكن ان نجعل الصوره تاخذ حجم الـImag Box
مثال

نضع الاده Image Box على الفورم

http://img86.imageshack.us/img86/9562/41893200rt0.jpg (http://imageshack.us)
http://img86.imageshack.us/img86/5526/59640224fz7.jpg (http://imageshack.us)
http://img263.imageshack.us/img263/3226/76740653bo4.jpg (http://imageshack.us)

الكود هو نفسه كود صندوق الصوره
والان جاء الدور عليكم لعمل مشروع على Image Box
ونر اذا كان هناك من استفاد من الدروس ام لا
واعتقد ان التمرين سهل جدا

فى انتظار مشاريعكم
thegust2000
25-04-2007, 10:02 PM
فين المشاريع يا شباب انا كده هاحس انى مجهودى هايضيع هباء
thegust2000
26-04-2007, 12:54 AM
على كل حال انا هكمل واللى عايز يشتغل معاى يا ريت يحط رد علشان اعرف انى مش بكتب لنفسى
amiro
26-04-2007, 12:58 AM
بارك الله فيك على مجهودك
thegust2000
26-04-2007, 01:52 AM
بارك الله فيك على مجهودك


العفو اخى الكريم وشكرا لمرورك
الجوهر الفرد
26-04-2007, 02:38 AM
http://img174.imageshack.us/img174/6025/ggggum5.gif

اتفضل اخي الكريم ده صورة تطبيق المشروع الى انت شرحته
thegust2000
26-04-2007, 02:48 AM
http://img174.imageshack.us/img174/6025/ggggum5.gif



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






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

بس عملك منسق فعلا قمت باختيار ايكونه وقمت بتغير خاصيه right to left
ماشاء الله عليك

بس للاسف انت قمت بالتطبيق على نفس الكود
Picture Boxوليس Image Box
thegust2000
26-04-2007, 02:57 AM
بس كويس انك حطيت صوره للتعديل على المشروع ده معناه انك متابع معايا
الجوهر الفرد
26-04-2007, 03:17 AM
http://img297.imageshack.us/img297/6533/ggggjk5.gif

وده تطبيق البرنامج بال imagebox
thegust2000
26-04-2007, 03:23 AM
عظيم جدا بس انت عملت كده مفتاح اسمه انسخ الصوره وحطط مكان Image Box واحده بس
nec2000
26-04-2007, 03:31 AM
تطبيق على Image Box
http://www.w30w.com/up-pic/uploads/a6f33a53f6.jpg

http://www.w30w.com/up-pic/uploads/c5840efb46.jpg

هل هناك خطأ
الجوهر الفرد
26-04-2007, 03:45 AM
عظيم جدا بس انت عملت كده مفتاح اسمه انسخ الصوره وحطط مكان Image Box واحده بس

انا عامل 2 اميج بوكس

بس مضغطش نسخ

http://img297.imageshack.us/img297/9862/ggggic8.gif
nec2000
26-04-2007, 04:07 AM
وهذا تطبيق اخر

http://www.w30w.com/up-pic/uploads/7e248ac9fc.jpg
thegust2000
26-04-2007, 04:13 AM
شغل جميل جدا والله بس الاخ nec2000
عمل المشروع على picture بس كويس انكو بداتو تعملو المشاريع ان شاء الله كمان ساعه يكون الدرس العاشر جاهز Combo Box
thegust2000
26-04-2007, 05:15 AM
بسم الله الرحمن الرحيم
السلام عليكم ورحمه الله وبركاته


اده Combo Box


http://img20.imageshack.us/img20/8563/30708097df6.jpg (http://imageshack.us)


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

اول مثال

ننشئ مشروع جديد ونضع عليه
3Command Button
1textbox
1Combo Box

لتصبح مثل هذا الشكل

http://img263.imageshack.us/img263/3968/92508429vx6.jpg (http://imageshack.us)


قم بتغير اسم Caption
لكل اده على حسب وظيفته

واضغط على اول مفتاح لبدء البرمجه



http://img257.imageshack.us/img257/1548/48629420yn7.jpg (http://imageshack.us)

http://img264.imageshack.us/img264/4941/89471668ex8.jpg (http://imageshack.us)





Private Sub Command1_Click()
Combo1.AddItem "منتديات مشاغب"
Combo1.AddItem "امـ الظلام ـير"
Combo1.AddItem "جوهر الفرد"
Combo1.AddItem "nec2000"
End Sub



مفتاح نقل الاسم



http://img261.imageshack.us/img261/8864/61956551gp3.jpg (http://imageshack.us)





Private Sub Command2_Click()
Text1.Text = Combo1.Text
End Sub

مفتاح المسح


http://img263.imageshack.us/img263/355/13684294mo4.jpg (http://imageshack.us)



6

Private Sub Command3_Click()
Combo1.Clear
Text1.Text = ""

End Sub








والان مع شرح الاكواد




Private Sub Command1_Click()
Combo1.AddItem "منتديات مشاغب"
Combo1.AddItem "امـ الظلام ـير"
Combo1.AddItem "جوهر الفرد"
Combo1.AddItem "nec2000"
End Sub

نخبر مفتاح ادخال الاسماء هنا ان يضيف عنصر جديد وهو منتديات مشاغب
ثم امـ الظلام ـير
ثم جوهر الفرد ثم nec2000

مفتاح نقل الاسم

Private Sub Command2_Click()
Text1.Text = Combo1.Text
End Sub

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

مفتاح المسح



Private Sub Command3_Click()
Combo1.Clear
Text1.Text = ""

نخبر المفتاح ان ينظف الكومبو بوكس ويجعل قيمه التكست بوكس فراغ
وكود صندوق النص قد قمنا بعمله من قبل

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

وفى انتظار المفتاح الرابع منكم والمثال القادم سوف ناخذ فيه ان شاء الله
if &msgbox
والقاكم بعد ساعه يكون بقيه الدرس قد اكتمل ان شاء الله
thegust2000
26-04-2007, 05:19 AM
ا السورس كود للمشروع

امـ الظلام ـير (http://eg-az.110mb.com/تدريب على combo box.rar)
thegust2000
26-04-2007, 08:02 AM
بسم الله الرحمن الرحيم


السلام عليكم ورحمه الله وبركاته

المثال الثانى

طبعا نتذكر برنامج الاله الحاسبه الذى قمنا بصنعه فى اول الدروس

الان نقوم بانشاء مشروع جديد
ونضع عليه 5Command Button
3textbox
1frame
1combo Box


ليصبح الشكل هكذا
http://img101.imageshack.us/img101/7614/28524574ok0.jpg (http://imageshack.us)


بعد تغير الـ Caption
اصبحت هكذا


http://img169.imageshack.us/img169/9724/73068180ch1.jpg (http://imageshack.us)
http://img170.imageshack.us/img170/9441/21628595fu4.jpg (http://imageshack.us)


الان نضغط دبل كليك على مفتاح الجمع ونبداء البرمجه
http://img168.imageshack.us/img168/1940/92364424dy7.jpg (http://imageshack.us)

مفتاح الطرح
http://img170.imageshack.us/img170/3251/17289968rw2.jpg (http://imageshack.us)
مفتاح الضرب
http://img168.imageshack.us/img168/7435/78801888uh1.jpg (http://imageshack.us)
مفتاح القسمه
http://img412.imageshack.us/img412/3341/85457675ln8.jpg (http://imageshack.us)
7
ودلوقت خلى قيمه Visible False


والان نضعهم جميعا فوق بعضهم

http://img407.imageshack.us/img407/2365/54437403dd4.jpg (http://imageshack.us)
ونروح للمفتاح الخامس اللى هو اذهب

ونضغط عليه دبل كليك

http://img254.imageshack.us/img254/2184/55128888fd3.jpg (http://imageshack.us)


معناه ايه الكود ده





If Combo1.Text = "جمع" Then
Command1.Visible = True
Command2.Visible = False
Command3.Visible = False
Command4.Visible = False
Frame1.caption="برنامج الجمع"
End If






If Combo1.text=جمع


اذا كانت الكومبو بوكس خانه التكست = جمع

Then

اذن


Command1.visible =true

المفتاح خاصيه الاظهار =حقيقه
(اى اظهر مفتاح رقم واحد)


وقم بتغير كلا من

Command 2,3,4,الى false

اى لا يظهرو

Frame1.caption="برنامج الجمع"

اى غير عنوان الاطار الى برنامج الجمع
كده فهمنا ولا لسه



على كل حال دى صوره للكود كله من الاول للاخر

http://img412.imageshack.us/img412/5674/10vg1.jpg (http://imageshack.us)


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

حطوه زى ده كده

http://img412.imageshack.us/img412/2369/100cy0.jpg (http://imageshack.us)

هو فى مشكله هاتقبلكو بس نشوف يمكن تخرجو منها
thegust2000
26-04-2007, 08:12 AM
السورس كود للمشروع

امـ الظلام ـير (http://eg-az.110mb.com/التمرين الثانى combo Box.rar)
thegust2000
26-04-2007, 08:16 AM
http://img412.imageshack.us/img412/5776/10rm9.jpg (http://imageshack.us)
الجوهر الفرد
26-04-2007, 03:16 PM
السلام عليكم ورحمة الله وبركاته

http://img337.imageshack.us/img337/6768/rdd68is5.gif

اخي الكريم thegust2000

ده صورة اول تطبيق

http://img151.imageshack.us/img151/4969/ggggt6.gif


ودي صورة تانى تطبيق

http://img241.imageshack.us/img241/5715/ggnd3.gif

http://img153.imageshack.us/img153/5562/ggggde4.gif
thegust2000
26-04-2007, 04:01 PM
السلام عليكم ورحمة الله وبركاته

http://img337.imageshack.us/img337/6768/rdd68is5.gif

اخي الكريم thegust2000

ده صورة اول تطبيق

http://img151.imageshack.us/img151/4969/ggggt6.gif


ودي صورة تانى تطبيق

http://img241.imageshack.us/img241/5715/ggnd3.gif

http://img153.imageshack.us/img153/5562/ggggde4.gif


كويس جدا انت ضيفت combo1.text الى Frame1.caption
وعملت زر الخروج
كويس والله انك غيرت فى الكود
thegust2000
26-04-2007, 05:59 PM
بسم الله الرحم الرحيم
السلام عليكم ورحمه الله وبركاته


Message Box

اردت ان اضعه فى درس مفرد حتى لا نتهاون بها

ونستطيع ان ناخذ جميع جوانبها

فى التمرين السابق للكومبو بوكس
تعالو نرجع ليه تانى


http://img185.imageshack.us/img185/4033/92213792sj2.jpg (http://imageshack.us)

نضيف الكود ده


Msgbox من فضلك اختار عنصر" "

الصيغه سهله جدا

Msgbox ونكتب ما نريد""

http://img183.imageshack.us/img183/8986/91882398pp5.jpg (http://imageshack.us)


اختارنا هنا قيمه غير موجوده فى الكود فظهرت لنا الرساله
التى قمنا بكتبتها فى صندوق الرساله



والان اذا اختارنا اى اى قيمه اخرى من الكومبو بوكس


http://img81.imageshack.us/img81/8131/36357618wn9.jpg (http://imageshack.us)


سوف تظهر لنا الرساله ايضا رغم اننا اختارنا قيمه

ليه


http://img81.imageshack.us/img81/1240/76623562uz4.jpg (http://imageshack.us)


اذن المفروض ننهى الكود حتى لا ينزل ليحقق الشرط الذى يليه

فيصبح هكذا

http://img183.imageshack.us/img183/9623/47715729yb8.jpg (http://imageshack.us)


ولكننا اذا وضعنا
End Sub
قبل
End IF


الكود الصحيح

http://img81.imageshack.us/img81/8500/19494316jg7.jpg (http://imageshack.us)


والان قم بتجربه المشروع


لتجد ان كل شئ مضبوط

انتهى والدرس القادم شرح موسع
MSGBOX صندوق الحوار
thegust2000
26-04-2007, 09:22 PM
بسم الله الرحمن الرحيم
السلام عليكم ورحمه الله وبركاته




الدرس الثانى Msg Box



http://img134.imageshack.us/img134/2110/72649457zc1.jpg (http://imageshack.us)


اولا نقوم بانشاء مشروع جديد
ونضع به 7Command Button


ليصبح مثل هذا

http://img253.imageshack.us/img253/4180/82167621er1.jpg (http://imageshack.us)

اردت هنا ان اغير الوان الازرار والفورم لنتذكر سويا
ما قد قمنا بشرحه من قبل

القاعده الاساسيه لصندوق الحوار


MsgBox "MSG", , "TITLE"



MsgBox "الرساله", رقم الايكونه وعدد الازرار , "العنوان"




نضغط اولا على الفورم ونكتب فى الحدث load



http://img168.imageshack.us/img168/6449/56897908ee1.jpg (http://imageshack.us)




فى الجدث Load
تظهر الرساله تلقائيا عند تشغيل البرنامج


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

http://img264.imageshack.us/img264/7035/28605583vc0.jpg (http://imageshack.us)


http://img444.imageshack.us/img444/7478/11899315xt4.jpg (http://imageshack.us)

لا حظ هنا اننا قمنا با ضافه الرقم 1
فظهر لنا خيران ok Cancel


الكود الثانى

http://img361.imageshack.us/img361/2594/15945402hh8.jpg (http://imageshack.us)

http://img387.imageshack.us/img387/2985/52988236wa9.jpg (http://imageshack.us)

تجاهل IGNORE
إحباط ABORT
إعادة RETRY
الكود الثالث

http://img360.imageshack.us/img360/632/70329519st4.jpg (http://imageshack.us)


http://img361.imageshack.us/img361/7829/29697455kc9.jpg (http://imageshack.us)

نعم YES
لا NO
إلغاء الأمر CANCEL


الكود الرابع

http://img387.imageshack.us/img387/3028/10ko4.jpg (http://imageshack.us)
http://img134.imageshack.us/img134/2906/11ki6.jpg (http://imageshack.us)

نعم YES
لا NO

الكود الخامس

http://img387.imageshack.us/img387/8881/12yr0.jpg (http://imageshack.us)

http://img361.imageshack.us/img361/5626/13lh0.jpg (http://imageshack.us)

إلغاء الأمر CANCEL
إعادة RETRY



هذه هى الخمس ازرار لصندوق الحوار


والان مع الايكونات

لكل ايكونه رقم مثل الازرار


وهذه هي الأرقام التي يمكنك استخدامها :

16- علامة http://img360.imageshack.us/img360/1195/index3in9.jpg (http://imageshack.us)
32- علامة http://img361.imageshack.us/img361/8450/index4me5.jpg (http://imageshack.us)
48-علامة http://img387.imageshack.us/img387/9062/index5jw2.jpg (http://imageshack.us)

64- علامة http://img360.imageshack.us/img360/7062/index6ky1.jpg (http://imageshack.us)



فإذا أردت إظهار صورة وعدد من المفاتيح فاجمع العددين
ليصبح الكود


Msgbox "الرساله",رقم المفتاح + رقم الايكونه,"عنوان الرساله"

مثال
MsgBox "ايكونه تحذيريه", 17, "كود زر وايكونه"
http://img264.imageshack.us/img264/6858/14av0.jpg (http://imageshack.us)



http://img387.imageshack.us/img387/2647/15kg3.jpg (http://imageshack.us)


الرساله السابعه هى لكم للتجربه

ان شاء الله


والان فى كل الاحوال يتم الرجوع الى نفس المشروع اى انه
اذا قمنا بالضغط على yes نرجع للفورم
واذا ضغطنا على no ايضا نرجع للفورم

هذا هو موضوعنا القادم ان شاء الله سيكون باذن الله يوم السبت وناخذ الجمعه راحه
اركم يوم السبت ان شاء الله وساكون متابع معكم ولكن بدون دروس

وفقكم الله
حمدي أبوزيد
26-04-2007, 09:25 PM
إبداع أخي العزيز ... تم التقييم بخمس نجوم .
thegust2000
26-04-2007, 11:25 PM
إبداع أخي العزيز ... تم التقييم بخمس نجوم .



شكرا لك اخى الكريم واتنمى من الله ان اكون وفقت فى الشرح
الجوهر الفرد
27-04-2007, 01:04 AM
ممتـــــــــــــــــــتاز

رائع شرح في منتهى الرووووعه
ده التطبيق

http://img245.imageshack.us/img245/3239/ggsf0.gif


لو عايز اخلى مسج بوكس تفتح مع فتح البرنامج هحطها في الفورم لود
بس هل ممكن احط تشك بوكس المسخدم ياشر عليها ان المسج دى متظهرلوش تانى؟؟؟؟؟
thegust2000
27-04-2007, 08:05 PM
اخى الكريم يمكن ان تصنع Form2
وتضعها فى الحدث لود وتضع ما تشاء معها من ازرا و بيانات كما تشاء
الجوهر الفرد
28-04-2007, 11:44 PM
الرجاء من الاخوه تطبيق الشرح حتى تعم الفائده وحتى يستمر الاخ الكريم thegust2000 في شرحه

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

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

http://www.absba.org/vb/showthread.php?t=447841
thegust2000
29-04-2007, 04:11 AM
الرجاء من الاخوه تطبيق الشرح حتى تعم الفائده وحتى يستمر الاخ الكريم thegust2000 في شرحه

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

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

http://www.absba.org/vb/showthread.php?t=447841


شكرا لك اخى الكريم ولتفاعلك معى فى الموضوع وعلى حرصك على يتم

فانا باذن الله سوف اكمل الموضوع حتى لو بقى معى واحد والدرس القادم خلال ساعات باذن الله فانا اقوم بتحضيره
thegust2000
29-04-2007, 07:35 AM
بسم الله الرحمن الرحيم

السلام عليكم ورحمه الله وبركاته


بعد الواحد ما اخد يوم اجازه

جيت اكتب الموضوع لاقيت ان احنا مش هانخلص من MsgBox
دلوقت
علشان كده فى كام موضوع كده دول اهم حاجه فى صندوق الحوار ناخدهم ونكتفى بيهم دلوقت علشان احنا خرجنا من اللى كنا فيه


وان شاء الله هاتضيف برنامج تقدرو تعملو بيه صنديق الحوار اللى انتى عايزنها

برنامج للاخ الشكرى جزاه الله خيرا

اما الان مع اهم ما تيقى فى صندوق الحوار

اولا ما نكتبه من ارقام هو مدلول عن قيمه مكتوبه نختصره نحن بالارقام

فمثلا
لنقوم بعمل صندوق حوار مثل هذه كتبنا


الرقم 1 ولكن فى الحقيقه قيمته الاصليه هى
(http://imageshack.us/)
(http://imageshack.us/)http://img264.imageshack.us/img264/7035/28605583vc0.jpg (http://imageshack.us/)
(http://imageshack.us/)http://img444.imageshack.us/img444/7478/11899315xt4.jpg (http://imageshack.us/)
(http://imageshack.us/)الرقم 1 ولكن فى الحقيقه قيمته الاصليه هى
vbOKCancel
يعنى نكتب الكود هكذا

Masgbox "الرساله الاولى", vbOKCancel,"الكود الاول لصندوق الحوار


http://img412.imageshack.us/img412/9126/39685469cm5.jpg (http://imageshack.us)

الرقم 1 ولكن فى الحقيقه قيمته الاصليه هى
vbOKCancel
يعنى نكتب الكود هكذا

Masgbox "الرساله الاولى", vbOKCancel,"الكود الاول لصندوق الحوار




1

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

وهذا جدول بالقيم الموجوده للمعرفه بها

الأزرار Buttons : انظر الجدول التالي :
الثابت
بالأرقام
vbOKOnly
0
vbOKCancel
1
vbAbortRetryIgnore
2
vbYesNoCancel
3
vbYesNo
4
vbRetryCancel
5


الأيقونة : أنظر الجدول التالي :
الثابت
بالأرقام
vbCritical
16
vbQuestion
32
vbExclamation
48
vbInformation
64









والان هذه ابسط صور لصندوق الرسائل


اما الان فمازلنا اما المشكله فكل زر نضغطه يرجع بنا الى الفورم فاين هو زر الغاء مثلا للخروج من البرنامج



مثال على برمجه ازرار صندوق الحوار


اولا نحن نعلم ان الفيجوال ينفذ معادلات

فيجب ان نعطى صندوق الحوار رمز
حتى نستطيع ان نضعه فى معادله والا لن يقوم بتنفيذ الامر



نضع هذا الكود فى Command Button






a = MsgBox("برمجه صندوق الحوار", 36, "اول كود")
If a = vbYes Then
End
ElseIf a = vbNo Then
Form1.Show
End If
او شئ نقول للفيجوال ان حرف Aيساوى
msgBox
واذا كانت A تساوى
نعم اذن انهاء البرنامج

واذا كانت تساوى "لا"
اذن اظهر الفورم مره اخى




وهذا شرح بسيط وسريع لصندوق الحوار

وان شاء الله مع الدروس سوف نتعرف امثر على امكانيات صندوق الحور وكيف يمكن ان نكتب كود ليظهر لفتره معينه ثم يغلق
واشياء اخرى كثيره

والان رابط البرنامج

وهو سهل وبه مظم ما تحتاجه من اكود لصندوق الراسائل

امـ الظلام ـير (http://eg-az.110mb.com/رسائل التنبيه.exe)

بيانات تسجيل البرنامج هى



2112-MH-4all-AB-12



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


وجارى التحضير للدرس الجديد
ali120
29-04-2007, 08:26 AM
اخي الفاضل جزاك الله كل خير واثابك بكل حرف تعلمنا به
ولي طلب صغير وهو القاء الضوء علي الجداول والتقارير وكيفيه عمل جمع تلقائي وايجاد نسبه مئويه مثال ذلك درجات الطلبة في المواد الدراسية ولي طلبات اخري ولكن لااوريد ان اثقل عليك فان كان لديك متسع من الوقت ابعث لك بما اوريد
وتقبل شكري مرة اخري
thegust2000
29-04-2007, 01:23 PM
اخي الفاضل جزاك الله كل خير واثابك بكل حرف تعلمنا به
ولي طلب صغير وهو القاء الضوء علي الجداول والتقارير وكيفيه عمل جمع تلقائي وايجاد نسبه مئويه مثال ذلك درجات الطلبة في المواد الدراسية ولي طلبات اخري ولكن لااوريد ان اثقل عليك فان كان لديك متسع من الوقت ابعث لك بما اوريد
وتقبل شكري مرة اخري



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

امـ الظلام ـير (http://absba.org/vb/افtp://eg-az.110mb.com/Taqdeerpercent.rar)
الفضل ابو الفضل
29-04-2007, 01:33 PM
بارك الله فيك
thegust2000
29-04-2007, 01:46 PM
بارك الله فيك
العفو اخى الكريم
thegust2000
29-04-2007, 10:22 PM
بسم الله الرحمن الرحيم
السلام عليكم ورحمه الله وبركاته



توقفنا اخر مره عند Combo Box من صندوق الادوات

والان مع List Box


http://img91.imageshack.us/img91/8615/12716662yq6.jpg (http://imageshack.us)

الكومبو والليست يستخدمان لضم قائمة للإختيار منها



لايختلف الكومبو عن الليست كثيراً سوى أن الكومبو لايظهر القائمة إلى عند النقرعليه ويستخدم الكومبو أيضاً للكتابة بداخله.

طريقة الإضافة إلى الأداتين هينفس الطريقة:
عن طريق الخاصية List يمكنككتابة العناصر

كما كان فى Combo Box
ولكن نجرب الان شيئا اخر فلقد قلنا من قبل اننا يمكن ان نضيف او نغير اى شئ من شاشه الكود
اولا فكره عن البرنامج هو لعرض مدن الدول العربيه

اذن يجب ان نكتب اسماء الدول
هنا


http://img411.imageshack.us/img411/6616/15306218dj6.jpg (http://imageshack.us)



ولكن لنجرب اليوم ان نضيفها من شاشه الاومر
او شاشه كتابه الكود

ننشئ مشروع جديد زنضيف به
comboBox1
listBox1

فناتى فى الحدث فورم ونكتب هذا الكود




List1.AddItem "مصر"
List1.AddItem "العراق"
List1.AddItem "فلسطين"




اى اضف فى اليست بوكس عنصر اسمه "ونكتب ما نشاء"






الان فى اليست بوكس نكتب
هذا الكود








Select Case List1.ListIndex
Case 0
Combo1.AddItem "القاهره"
Combo1.AddItem "الاسكندريه"
Combo1.AddItem "اسوان"
Combo1.AddItem "العريش"



Case 1
Combo1.AddItem "بغداد"
Combo1.AddItem "كربلاء"
Combo1.AddItem "البصره"

Case 2
Combo1.AddItem "القدس"
Combo1.AddItem "غزه"
Combo1.AddItem "رفح"
Combo1.AddItem "بيت لحم"
End Select





ملحوظه
جملة Selectتشبه تقريباً جملة Ifإلا أنها تستعمل حالات متعددة وفي كل حالة تكتب تعليمة مختلفة.

الشكل العام للعبارة:

Select Case (العنصر)

Case (الحالة)

التعليمة

End select



يمكنك إضافة الكثير من الحالات ولاكن قبل EndSelect










قم بتشغيل البرنامج لتجد ان كل شئ جاهز
http://img337.imageshack.us/img337/3257/98252665dn9.jpg (http://imageshack.us)


ولكن هناك مشكله ما هى


اذا ضغطا على البلد اكثر من مره او اختارنا بلد اخرى يقوم بجمع المدن بجوار البعض



http://img364.imageshack.us/img364/9471/44081086hr8.jpg (http://imageshack.us)


اذن لنتخطى هذه المشكله يجب اولا ان ننظف اليست بوكس من المدن السابقه


فنضيف امر

Combo1.Clear


ليصبح الكود هكذا

http://img364.imageshack.us/img364/4527/67076864ta3.jpg (http://imageshack.us)


ويمكنك تعديل اليستListBox للسماح بتحديدات متعددة. أنظر الشكل في الأسفل

وذلك عن طريق تعديل الخصائصStyle وMultiSelect

http://img364.imageshack.us/img364/8309/10671054sy2.jpg (http://imageshack.us)




والكومبو بوكس واليست بوكس كلاهما متشايه تقريبا فى الخصائص والاكواد



List1.AddItem 'النص هنا'
Combo1.AddItem 'النص هنا'


والان دوركم فى عمل نفس المشروع ولكن العكس خلى Combo Box مكان list Box


وهناك درس بسيط عن Select Case
سوف اقوم بتحضيره لكم ان شاء الله


وحاضر للاجابه عن اى سؤال
الجوهر الفرد
30-04-2007, 02:04 AM
اخي الكريم thegust2000

ارجو توضيح هذا الجزء من الكود
Select Case List1.ListIndex
وهل هناك خطا في هذا الكود لان البرنامج لا ينفذ
http://img96.imageshack.us/img96/9332/55rc3.gif
thegust2000
01-05-2007, 12:57 AM
اخي الكريم thegust2000

ارجو توضيح هذا الجزء من الكود
Select Case List1.ListIndex
وهل هناك خطا في هذا الكود لان البرنامج لا ينفذ
http://img96.imageshack.us/img96/9332/55rc3.gif


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

لانه سوف يكون هناك كود كبير وسيكون صعب شرح حاليا لاننا فى البدايه

واذا اردت مثال لهذا ارسلته لك لتراه

واذا كنت تريد شرح للكود هذا اخبرنى
الجوهر الفرد
01-05-2007, 01:38 AM
استازي الكريــــــــــــــــم

انا عايز اتعلم ازاى اعمل اتنين كمبو كل ما اغير في الكمبو الاولانى يتغير الكمبو التاني يعني نفس البرنامج بس يكون بالطريقه الصحيحه

يعني ازاى استخدم جملة سليكت في هذا المثال(اتنين كمبو) وليه منفعتش معايا
thegust2000
01-05-2007, 02:19 AM
استازي الكريــــــــــــــــم

انا عايز اتعلم ازاى اعمل اتنين كمبو كل ما اغير في الكمبو الاولانى يتغير الكمبو التاني يعني نفس البرنامج بس يكون بالطريقه الصحيحه

يعني ازاى استخدم جملة سليكت في هذا المثال(اتنين كمبو) وليه منفعتش معايا



اخى الكريم هذا هو المشروع مفتوح لتعرف ما هو خطئك



امـ الظلام ـير (http://eg-az.110mb.com/combo to combo.rar)
الجوهر الفرد
01-05-2007, 02:27 AM
اللـــــــــــــــــــــــــــــــــه

منتهى الروعه

انا كنت هتجنن لو مكنتش حليت الموضوع ده

انت فعلااااااااااا استاااااااااااااااااز

الفرق كان انى كنت حاطط الكود في حدث CHANGE
وانت حطيته في كليك راااااااائع
Nabil shat
01-05-2007, 02:33 AM
رااااااااااااااااائع بلا محاااااااااااااااله

وفقك الله يا غالى
الجوهر الفرد
01-05-2007, 02:35 AM
اتفضل ده التطبيق
http://dl8.ohshare.com/v/7096882/New_Folder.rar.html
thegust2000
01-05-2007, 02:48 AM
تطبيق جميل ولو عايز حاجه زى اللى احنا طبقنها خد شوف ده بس انا مش عايز ابعد عن الدروس الاساسيه علشان منتهوش


امـ الظلام ـير (http://eg-az.110mb.com/___A_Bette7928954200.zip)
thegust2000
01-05-2007, 03:31 AM
رااااااااااااااااائع بلا محاااااااااااااااله

وفقك الله يا غالى


شكرا لك على مرورك ورد الكريم
thegust2000
01-05-2007, 03:39 AM
بسم الله الرحمن الرحيم
السلام عليكم ورحمه الله وبركاته

Drive list Box


http://img237.imageshack.us/img237/8774/97982452kj1.jpg (http://imageshack.us)

http://img257.imageshack.us/img257/8923/76602011tw4.jpg (http://imageshack.us)


انتهى الدرس حلو مش كده
thegust2000
01-05-2007, 04:31 AM
بسم الله الرحمن الرحيم
السلام عليكم ورحمه الله وبركاته



DirListBox
http://img237.imageshack.us/img237/5627/74717227gf3.jpg (http://imageshack.us)
http://img406.imageshack.us/img406/2641/94611082qi4.jpg (http://imageshack.us)

مثال على ذلك


قم بانشاء مشروع جديد وضع به drive list Box
و
dirlistBox

http://img257.imageshack.us/img257/8555/78151093ue1.jpg (http://imageshack.us)


نضغط دبل كليك على drive list box

نكتب فى شاشه الكود



http://img412.imageshack.us/img412/1285/89756838mp5.jpg (http://imageshack.us)



نقوم بتشغيل الجهاز والتجربه لنجد مثل هذا الشكل
http://img406.imageshack.us/img406/8171/65224534ql1.jpg (http://imageshack.us)




انتهى الدرس
عصام ابوهيبه
01-05-2007, 04:50 AM
مشكور والشرح ممتاز
thegust2000
01-05-2007, 05:26 AM
مشكور والشرح ممتاز


العفو وشكرا للمرور
thegust2000
01-05-2007, 07:04 AM
بسم الله الرحمن الرحيم

السلام عليكم ورحمه الله وبركاته



File List Box

http://img261.imageshack.us/img261/8992/10656324iq5.jpg (http://imageshack.us)

وهو يقوم بسرد الملفات من dirlistfile


والان ربط الثلاثه مع بعضهم البعض


drivelistBox
dirlistbox
filelistbox
ننشئ مشروع جديد ونضع به

drivelistBox
dirlistbox
filelistbox
picturebox
Command Button
ونغير اسم الفورم الى مستعرض الصور




ونذهب الى خاصيه

Pattern
الخاصه filelistbox
ونغير ها من

*.*

الى jpg.*
ليعرض لنا هذا الامتدات فقط




ونلغى خاصيه الاغلاق ليصبح الشكل مثل هذا


http://img82.imageshack.us/img82/5223/81781381rh6.jpg (http://imageshack.us)



ونضغط دبل كليك على drivelist box
ونكتب





Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub







وفى DirlistBox





Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub





وفى FileListBox


Private Sub File1_Click()


Picture1.Picture = LoadPicture(Dir1.Path & "..\" & File1.FileName)


End Sub





وفى commandButton


end





http://img174.imageshack.us/img174/1852/25510306vd7.jpg (http://imageshack.us)



احنا كده اكيد عارفين الكود اللى مكتوب كله مافيش حاجه جديده علينا لانه كله مشروح فى الدروس اللى قبل كده
اما اللى متعلم عليه فى الصوره ده مش ففاهمين لازمته ايه
اقولك انا ده يا سيدى علشان المسار بتاع filelist

لانه لو دخل يجيب ملف من الفولدر على طول مش هايعرف يعنى هو كده يجب الملف من البارتيشن بس
من غير الدخول فى اى مجلد


فلما بنضيف الرمز ده بنخليه يدخل يجب اى ملف من جوه المجلدات



http://img261.imageshack.us/img261/7240/99206268og7.jpg (http://imageshack.us)

ارجو ان يكون الدرس واضح
thegust2000
02-05-2007, 06:47 AM
اسف لم اتمكن من وضع درس اليوم
الجوهر الفرد
02-05-2007, 06:58 PM
السلام عليكم ورحمة الله وبركاته
اتفضل رابط التطبيق

http://dl8.ohshare.com/v/1714265/_.rar.html
بس ازاى اخلى ال file1
تجيب كل انواع الصور مش شرط يكون نوع واحد بس
thegust2000
02-05-2007, 09:13 PM
السلام عليكم ورحمة الله وبركاته
اتفضل رابط التطبيق

http://dl8.ohshare.com/v/1714265/_.rar.html
بس ازاى اخلى ال file1
تجيب كل انواع الصور مش شرط يكون نوع واحد بس



ممكن تضيفه من شاشه الاومر
حاول ولو معرفتش قولى ابعتلك الشرح او اشرحه هنا علشان كله يستفاد
saad90
02-05-2007, 09:32 PM
شكرا كثيرا على مجهودك الجبار
لو سمحت رابط التحميل احب لو البرنامج بالفرنسية
وشكرا شكرا:) :) :) :) :) :)
thegust2000
02-05-2007, 10:42 PM
شكرا كثيرا على مجهودك الجبار
لو سمحت رابط التحميل احب لو البرنامج بالفرنسية
وشكرا شكرا:) :) :) :) :) :)



اعرف انه هناك نسخ فرنسيه واعتقد انك سوف تجد منها فى المنتدى جرب وابحث سوف تجد ان شاء الله
thegust2000
02-05-2007, 11:15 PM
بسم الله الرحمن الرحيم
السلام عليكم ورحمه الله وبركاته


الاده Time


وهى لتنفيذ حدث معين خلا وقت معلوم د


طيب ناخد فكره الاول بعيد عن الاده


تمرين

ابدء مشروع جديد

الوقت Time

واضف عليه 1Command Button
1TextBox

http://img389.imageshack.us/img389/8455/64758462mx9.jpg (http://imageshack.us)


ثم انقر على المفتاح لبدء البرمجه


http://img389.imageshack.us/img389/9007/29099860zi8.jpg (http://imageshack.us)


اكتب


Text1.text = time$()




ثم شغل البرنامج واضغط المفتاح


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

http://img353.imageshack.us/img353/980/63862664qj6.jpg (http://imageshack.us)

اذان الامر Time يظهر الساعه الموجده بالجهاز


نجرب امر اخر

وهو now الان

نضيف تكست اخر للفورم ونكتب

http://img352.imageshack.us/img352/1859/84261348dt4.jpg (http://imageshack.us)




Text2.text=now()



ثم نشغل البرنامج

لتجد انه قام بكتابه اليوم والسنه والشهر والساعه اذا كانت صباحا او مساء


http://img372.imageshack.us/img372/826/77923354in8.jpg (http://imageshack.us)

امر اخر

السنه Year
اضف تكست بوكس
واضف امر

http://img389.imageshack.us/img389/1490/17270015lz6.jpg


Text3.text=year(now())


http://img389.imageshack.us/img389/6614/63328895dk7.jpg (http://imageshack.us)



الامر الشهر month

اضف تكست رابع الى الفورم وكتب الكود التالى الى المفتاح


Text4.text=month(now())



http://img452.imageshack.us/img452/730/33514928rr3.jpg (http://imageshack.us)


http://img370.imageshack.us/img370/115/93062836ht1.jpg (http://imageshack.us)

الامر اليومDay


اضف تكست خامس الى الفورم
واضف الامر Dayالى المفتاح




Text5.text=day(now())



http://img370.imageshack.us/img370/8172/10jh1.jpg (http://imageshack.us)


http://img370.imageshack.us/img370/3458/11nb5.jpg (http://imageshack.us)



الامرالساعه Hour



اضف تكست سادس الى الفورم

واضف الكود الى المفتاح


Texte6.text = hour(now())

http://img400.imageshack.us/img400/2125/12dq6.jpg

http://img452.imageshack.us/img452/2747/13oj3.jpg

الامر دقيقه Minute



اضف تكست سابع الى الفورم واضف هذا الكود الى المفتاح



Text7.text= minute(now())



http://img389.imageshack.us/img389/2294/15xu8.jpg (http://imageshack.us)

http://img389.imageshack.us/img389/2680/16hv8.jpg (http://imageshack.us)


الامر ثانيه Second

اضف تكست ثامن الى الفورم واضف الكود الى المفتاح




Text8.text=second(now())



http://img389.imageshack.us/img389/2680/16hv8.jpg

http://img369.imageshack.us/img369/1214/17od4.jpg

ويمكن ان تضيف مفتاح خروج


اذا احببت


والان تعرفنا على اومر Time


ولكن لا نظهر الا عندما نقوم الضغط على الزر (المفتاح)

كيف نفعلها تقائيا دون تدخل منا

هذه هى اده الــ Time

تقوم بعمل محدد خلا وقت معلوم مسبقا قد قمنا بتحديده





كيف

ننشئ فورم جديد ونضيف اده الوقت

ثم نضغط دبل كليك عليها ونضع بها الكود الذى قمنا بتصميمه منذ قليل



شكل الفورم سيكون كالتالى



http://img400.imageshack.us/img400/6084/18tm4.jpg (http://imageshack.us)



نقوم بقص الكود ولصقه فى مكان الوقت



هكذا


http://img353.imageshack.us/img353/3203/19bq3.jpg (http://imageshack.us)



نقوم بتشغيل البرنامج لنجد انه لا يوجد شى قد حدث ولا اى تغير

ما هى المشكله

المشكله اننا لم ننحدد الوقت المطلوب لعمل الاده


شاشه الخصائص الخاصه باده الوقت لم نقوم بالتعديل عليها



http://img353.imageshack.us/img353/9030/20vw5.jpg (http://imageshack.us)


لما قمنا بتغيرها الى الف

كل الف هنا تساوى ثانيه
اى لو غيرنا القيمه الى 5000 اصبحت 5 ثوانى


والان قم بتشغيل المشروع وشوف هاتلاقى انها بتتغير كل ثانيه



اترككم للتجربه والتحضير لدرس اخر عن اده الوقت
الجوهر الفرد
03-05-2007, 02:03 AM
دي صورة برنامج الساعه
http://img412.imageshack.us/img412/6075/55bh9.gif

وبانتظاااااااااااااار المزيـــــــــــــــــــد
thegust2000
03-05-2007, 02:31 AM
رائع يا جوهر
HASSAN70
03-05-2007, 03:05 AM
مشكوووووووووووووووووووووووور
thegust2000
03-05-2007, 12:13 PM
مشكوووووووووووووووووووووووور



العفو
thegust2000
05-05-2007, 04:07 AM
تم اضافه رابط الدرس الجديد فى اول الموضوع
ahmedhamama
05-05-2007, 05:27 AM
ما شاء الله دروس رائعة وقيمة أخى الكريم :)
جزاك الله كل خير
thegust2000
05-05-2007, 06:46 AM
ما شاء الله دروس رائعة وقيمة أخى الكريم :)
جزاك الله كل خير


العفو وشكرا لمرورك الكريم اخى العزيز
thegust2000
05-05-2007, 10:30 AM
بسم الله الرحمن الرحيم


السلام عليكم ورحمه الله وبركاته



اليوم درسنا مع اده الوقت مره اخرى

Time



تعرفنا على وظيفه اده الوقت فى الدرس السابق واليوم درس بسيط لتغير مكان ليبل على الفورم


نقوم بفتح مشروع جديد واضافه 2 ليبل عليه

واده وقت

لتصبح مثل هذا الشكل




http://img511.imageshack.us/img511/1342/84874682ie6.jpg

ونضبط الوقت على 1000
كما تعلمنا فى الدرس السابق


ونضغط دبل كيلك على اده الوقت


ونكتب فيها


Label1.Left = Label1.Left – 100



Label2.Left = Label2.Left + 100


معنى الكود هو تحريك اليبل واحد الى اليمين والاخر الى اليسار


حتى الان سهل


ولكن اليبل يذهب ولا يظهر مره اخرى
ولكن اذا اردنه ان يظهر مره اخرى

نكمل الكود


حتى يصبح هكذا


http://img412.imageshack.us/img412/6840/75401273wm0.jpg (http://imageshack.us)


Label1.Left = Label1.Left - 100

If Label1.Left <= 0 Then
Label1.Left = Form1.Width
End If

هذا بالنسبه لليبل واحد

اما لليبل 2
فهو يختلف تماما

http://img515.imageshack.us/img515/1895/81715928hs6.jpg (http://imageshack.us)




Label2.Left = Label2.Left + 100

If Label2.Left > Form1.Width Then

Label1.Left = -Label2.Height


End if




ليصيح الكود كله هكذا


http://img515.imageshack.us/img515/3696/53161848nx1.jpg (http://imageshack.us)





Private Sub Timer1_Timer()

Label1.Left = Label1.Left - 100

If Label1.Left <= 0 Then
Label1.Left = Form1.Width
End If



Label2.Left = Label2.Left + 100

If Label2.Left > Form1.Width Then

Label1.Left = -Label2.Height

End If
End Sub



قم بتشغيل البرنامج لترى انه كل من اليبل يذهب فى اتجاه اخر




http://img511.imageshack.us/img511/87/88534385nu9.jpg (http://imageshack.us)
الدرس سهل وبسيط
الجوهر الفرد
05-05-2007, 09:50 PM
السلام عليكم ورحمة الله وبركاته

استازي الكريم امير الظلام

الموضوع ده شاغلنى من فتره بعد ما قريت عنه في احد المنتديات
طريقة تحريك الليبل لمرة واحده
وحاولت انى اخلى الليبل يتحرك علطول فعملت الكود ده

http://dl8.ohshare.com/v/4228165/_.rar.html
بس مشاكله كتيره جدا

وطبعا طريقتك هيا الصح بس انا مفهمتش الجزء ده من الكود
Label2.Left = -Label2.Height
ايه العلاقه بين خاصية اللفت وخاصية الهايت
thegust2000
06-05-2007, 05:08 AM
السلام عليكم ورحمة الله وبركاته

استازي الكريم امير الظلام

الموضوع ده شاغلنى من فتره بعد ما قريت عنه في احد المنتديات
طريقة تحريك الليبل لمرة واحده
وحاولت انى اخلى الليبل يتحرك علطول فعملت الكود ده

http://dl8.ohshare.com/v/4228165/_.rar.html
بس مشاكله كتيره جدا

وطبعا طريقتك هيا الصح بس انا مفهمتش الجزء ده من الكود
Label2.Left = -Label2.Height
ايه العلاقه بين خاصية اللفت وخاصية الهايت



لا دى كده غلطه منى انا اسف غلطه املائيه

اصل انا بقعد فتره كبيره احضر فى الدرس وبحاول اعمل اسهل طريقه للشرح فاكيد دى غلطه اعذرنى
thegust2000
06-05-2007, 05:57 AM
على فكره انا شوفت التطبيق بتاعك جميل بس انا كنت متوقع منك انك تخليها واحده تطلع والتانيه تنزل علشان عرفك بتغير على طول
thegust2000
06-05-2007, 06:20 AM
معلش انا هطول شويه فى موضوع التايمر ده علشان ناخد اكبر جزء منه لانه بيبقى فى شغل كتير جدا و الدرس الجاى عن التايمر برضو
thegust2000
06-05-2007, 12:11 PM
بسم الله الرحمن الرحيم
السلام عليكم ورحمه الله وبركاته

درس اخر من دروس التايمر



ننشئ مشروع جديد ونضيف اليه مجموعه ليبل

بأى عدد


نفرض 4 ليبل


ونضع لهم BackColor

http://img154.imageshack.us/img154/9516/61626831vx4.jpg


ونمسح الكابشن الخاص بهم

ونضيف تايمر الى الفورم


http://img510.imageshack.us/img510/38/75284757ii0.jpg (http://imageshack.us)


نبداء اولا بالفورم ونكتب

ونكتب فى الحدث لود



Private Sub Form_Load()
Timer1.Interval = 100
End Su
b

ملحوظه
بعد كده هاكتب الكود من غير ما اقول هانكتبه فين لان المفروض ان احنا كده عرفنا ازاى على الاقل نقرءه الكود ونعرف ده بيتحط فين وده بيتحط فين



نضغط دبل كليك على اده الوقت
نكتب هذا الكود




Private Sub Timer1_Timer()
Label1.Left = Rnd * Form1.Width
Label1.Top = Rnd * Form1.Height



Label2.Left = Rnd * Form1.Width
Label2.Top = Rnd * Form1.Height
Label3.Left = Rnd * Form1.Width
Label3.Top = Rnd * Form1.Height
Label4.Left = Rnd * Form1.Width
Label4.Top = Rnd * Form1.Height
End Sub

http://img515.imageshack.us/img515/7600/11223043pm0.jpg (http://imageshack.us)




Rnd =random=عشوائي


يعنى حرك اليبيل فى اتجهات عشوائيه

كود سهل ومش صعب


ثم نضغط تشغيل

ولمزيد من التجميل ممكن نعمل ايه نخلى اتنين ليبيل افقى وراسى(2 واقفين واتنين نايمين )



http://img412.imageshack.us/img412/3973/51278532nj9.jpg (http://imageshack.us)


وفى امثله نخلص ده واشوف التطبيق وناخد كمان وندخل فى غيره على طول ان شاء الله انا عارف انه التايمر طول معانا
الجوهر الفرد
06-05-2007, 07:15 PM
اللـــــــــه عليـــــــــــــــك
روووووووووووعه درس روووووووووووووووعه

ده التطبيق

http://dl8.ohshare.com/v/3509005/rnd_.rar.html

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

عايزين نتعمق اكتر في اداة التايم علشان ممتعه جدا
thegust2000
07-05-2007, 04:24 AM
اللـــــــــه عليـــــــــــــــك
روووووووووووعه درس روووووووووووووووعه

ده التطبيق

http://dl8.ohshare.com/v/3509005/rnd_.rar.html

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

عايزين نتعمق اكتر في اداة التايم علشان ممتعه جدا



تطبيقك جميل ياجوهر
thegust2000
07-05-2007, 07:48 AM
بسم الله الرحمن الرحيم
السلام عليكم ورحمه الله وبركاته

درس اليوم ايضا عن التايمر ولكن ان شاء الله معه اده اخر وهى

HscrollBar او VscrollBar



نفتح مشروع جديد ونضيف به

1تايمر
1تكست بوكس
1 سكرول بار


http://img171.imageshack.us/img171/4157/38138318vn4.jpg (http://imageshack.us)

نحن تعرف كل من خصائص التكست بوكس والتايمر ولكن هذه خصائص السكرول بار المهمه

http://img517.imageshack.us/img517/3861/88976477gf1.jpg (http://imageshack.us)




1- وهى اذا ضغطنا على مكان فى البار يتجرك بمقدار ( ونحدد ما نريد)
2- وهى قيمه البار كله اذا اعطينا مثلا للبار قيمه 10 فانه لن يزيد عن ذلك ويصل الى 11 ابدا
3- وهى اقل قيمه للبار اى انه لا ينزل بعدها
4- وهى اقل قيمه للبار عند الضغط على راسى البار

والان نرجع الى المشروع
نضط دبل كليك على الفورم ونكتب فى الحدث لود




Private Sub Form_Load()
Timer1.Interval = 100
End Sub


اى جعل الحركه فى اقل من ثانيه نحن نعلم ان الثانيه تساوى الف
ان انه يقوم بتقسيم الثانيه الى عشر اجزاء واذا اختارنا القيمه واحد فانه يجزء الثانيه الى الف جزء

فى الحدث تايم





http://img517.imageshack.us/img517/2524/53252821ji3.jpg (http://imageshack.us)


Private Sub Timer1_Timer()
On Error Resume Next
Dim a
Dim b
a = Rnd * Form1.Width
b = Rnd * Form1.Height
Form1.DrawWidth = Text1
Form1.PSet (b, a), QBColor(Rnd * 15)
Form1.Circle (b, a), QBColor(Rnd * 15)

End Sub




الكود ده لازم شرح ليه

اولا بقوله Dim اى احفظ عندك فى الذاكره
واكتب اى رمز احبه (abcdefg jktnyz) اى حاجه انا احبها


a = Rnd * Form1.Width
Aتكون عشوائيه فى عرض الفورم


b = Rnd * Form1.Height

Bتكون عشوائيه فى ارتفاع الفورم


Form1.DrawWidth = Text1

عرض الرسم ما فى تكست واحد

Form1.PSet (b, a), QBColor(Rnd * 15)

Pset تعنى نقطه
(QB)كويك بيزيك وهى تحدد قيمة الالوان طبقا لجدوال الالوان الموجودة فى ميكروسوفت كويك بيزك


وهى الالوان من 0 الى 15،


Form1.Circle (b, a), QBColor(Rnd * 15)

وهى لرسم الدوائر

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

لو فى اى مشكله فى الكود اسئلو



دلوقت مع السكرول بار الاده الجديده وبتاعت درس النهارده

اولا لازم نغير القيم بتاعتها ممكن نحطها على طول فى الفورم بس حاليا نكتبها م شاشه الخصائص
هانخلى Large Change
مثلا 5
و Max اى عدد ممكن 100 او 50 زى ماتحب
و Min دائما تكون صفر الى اذا كانت هناك ظروف اخرى
و Small Change خليها واحد
واحنا لسه فاهمين دول بتوع ايه

وبعد كده نضغط دبل كليك على السكرول بار


Private Sub HScroll1_Change()
Text1.Text = HScroll1.Value
End Sub


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


طيب احنا لو جربنا على كده هايشتغل البرنامج وكله تمام

بس فى كماليات فى البرنامج
زى ايه احنا ممكن نكتب القيمه من غير ما ندوس على السكرول بار بس السكرول بار مش هايتحرك من مكانه طيب لو عايزين نحرك السكرول بار من مكانه مع تغير قيمه التكست بوكس نكتب الكود ده



Private Sub Text1_Change()
HScroll1.Value = Text1.Text
End Sub


ومعناه تغير قيمه السكرول بار عند تغير قيمه التكست بوكس

ولو عايزين نمسح الشاشه ممكن نضيف زر لمسح الشاشه نخليها ليكو تجربوها ونشوفها المره الجايه



بكده يبقى الدرس انتهى
الجوهر الفرد
08-05-2007, 01:59 AM
السلام عليكم ورحمة الله وبركاته

استازي الكريم أمير الظلام

الحمد لله اليوم اتهيت من برنامج الشيخ الشعراوىىى
ودي صورة البرنامج
http://img527.imageshack.us/img527/8495/111cw7.gif

والفضل يرجع لحضرتك وللاخ الكريم MicroPro

بكره ان شاء الله سأضع له اللمسات الاخيره علشان يبقى مكتمل
وارفعه لحضرتك علشان التقييم


واعذرني في درس انهارده ان شاء الله هعملة تطبيق بكره باذن الله


http://img145.imageshack.us/img145/7620/wrd24wn4.gif
thegust2000
08-05-2007, 04:38 AM
السلام عليكم ورحمة الله وبركاته

استازي الكريم أمير الظلام

الحمد لله اليوم اتهيت من برنامج الشيخ الشعراوىىى
ودي صورة البرنامج
http://img527.imageshack.us/img527/8495/111cw7.gif

والفضل يرجع لحضرتك وللاخ الكريم MicroPro

بكره ان شاء الله سأضع له اللمسات الاخيره علشان يبقى مكتمل
وارفعه لحضرتك علشان التقييم


واعذرني في درس انهارده ان شاء الله هعملة تطبيق بكره باذن الله



http://img145.imageshack.us/img145/7620/wrd24wn4.gif



ربنا يوفقك يا جوهر والى الامام اعزك الله
thegust2000
08-05-2007, 08:16 AM
الدرس اليوم عن تغير الوان الفورم او صندوق الصور عن طريق السكرول بار مباشره دون الرجوع الى صندوق النص وجارى ضبطه ورفعه لكم ان شاء الله
thegust2000
08-05-2007, 11:02 AM
بسم الله الرحمن الرحيم
السلام عليكم ورحمه الله وبركاته



موضوعنا اليوم عن scrollbar
ومثال اخر له
وهو تغير لون الفورم او اى كائن على الفورم حسب رغبتنا

ننشى مشروع جديد ونضيف اليه
1 scroll bar )مش فارق افقى او راسى(
1fram
1picturebox
1timer



http://img520.imageshack.us/img520/624/53248794rb8.jpg (http://imageshack.us)




المره دى نكتب خصائص السكرول بار فى الفورم فى الحدث(load)




HScroll1.LargeChange = 5
HScroll1.Min = 1
HScroll1.Max = 15
HScroll1.Value = 1




احنا طبعا عارفين ان احنا ممكن نغير فى الخصائص من شاشه الكود




ونضغط دبل كليك على الأسكرول بار
ونكتب الكود ده




Private Sub HScroll1_Change()
Frame1.BackColor = QBColor(Rnd * 15)
Form1.BackColor = QBColor(Rnd * 15)
Picture1.BackColor = QBColor(Rnd * 15)


End Sub



وده لتغير لون الفورم على حسب الوان كويك بيزك (تم شرحها فى الدرس السابق)
وتكون عشوائيه

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




Private Sub Timer1_Timer()
Picture1.Top = Rnd * Form1.Height
Picture1.Left = Rnd * Form1.Width
Frame1.Top = Rnd * Form1.Height
Frame1.Left = Rnd * Form1.Width
End Sub







وده لتحريك الصوره والفرام اللى احنا حطينه بشكل عشوائى على الفوره

طبعا لا زم نظبت الوقت من الخصائص او شاشه الكود انا احب شاشه اللكود علشان يبقى دايما دماغنا فى المشروع كتابه اكتر منها ادوات ونفهم ازاى نقراه الكود وعرف كل حاجه بتكتب ازاى وايه الغلط لو فى

ممكن كمان نضيف الكود بتاع السكرول بار فى الحدث
Mouse Down
وكل ما نضغط على الفورم تغير الوان معانا برضو



http://img522.imageshack.us/img522/4731/98756978wo4.jpg (http://imageshack.us)


نجرب ونطبق ونشوف


كمان درس علشان نخلص من الاداه دى

احنا خدنا ازاى نغير الوان منها طيب لو عايزين نحرك كائن على الفورم



نعمل

نعمل مشروع جديد ونضيف اى كائن احنا عايزنه



مثلا نضيف
Frame
ونحط فيها
Label

ونضيف سكرول بار
يبقى الشكل كده

http://img228.imageshack.us/img228/8995/21682305ds8.jpg (http://imageshack.us)



نضغط دبل كليك على الفورم فى الحدث لود



VScroll1.Max = (Label1.Height - Frame1.Height)

Label1.BackColor = QBColor(5)
VScroll1.SmallChange = 50
VScroll1.LargeChange = 120



اول سطر بيقول ايه
خلى خاصيه الماكس للبار تساوى( قمه العنوان(الليبل) – ارتفاع الفيرام)

السطر التانى خلى اداه العنوان خاصيه الوان الخلفيه تساوى الوان كويك بيزك اللون رقم ( اختار اى رقم من واحد الى 15)
السطر الثالث يجعل التغير فى قيمه البار تساوى 50 ممكن تغير براحتك انت
السطر الرابع يجعل التغير فى قيمه البار عند الضغط على اى مكان فيه تساوى 120 برضو ممكن نغير براحتنا
ده تعريف السكرول بار فى الحدث لود فورم





نضغط دبل كليك على السكرول بار




Label1.Top = -VScroll1.Value

قمه العنوان (الليبل) تساوى – قيمه البار
اى ان كل ما نقص البار تحرك العنوان
Active_uae
08-05-2007, 09:00 PM
شرح ممتاز جداً وسهل وجميل - يعطيك العافية
thegust2000
08-05-2007, 09:10 PM
شرح ممتاز جداً وسهل وجميل - يعطيك العافية


الله يخليك بس لسه الدروس هاتصعب بعد كده
thegust2000
09-05-2007, 07:49 AM
بسم الله الرحمن الرحيم
السلام عليكم ورحمه الله وبركاته

برنامج الرجل والمرءه به 3 او 4 اكواد مخدنهمش ممكن تشوفوه وتحولو تعملو زيه


فى الموضوع ده



http://www.absba.org/vb/showthread.php?t=471520 (http://www.absba.org/vb/showthread.php?t=471520)
thegust2000
09-05-2007, 10:46 AM
بسم الله الرحمن الرحيم
السلام عليكم ورحمه الله وبركاته

درس اليوم مع اده CheckBox
تشيك بوكس

خانه اختيار

وهى تكاد تكون من اسهل الادوات

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

ونضع به


2 تايمر
1 تشيك بوكس

http://img179.imageshack.us/img179/1597/23357343gx4.jpg


ونكتب فى الحدث لود للفورم

ان التايمر ةاحد واثنين يساوى 100





Private Sub Form_Load()
Timer1.Interval = 100
Timer2.Interval = 100
End Sub



وخاصيه Enabled
False

للاثنين
ونكتب فى تايمر1
هذا الكود

http://img179.imageshack.us/img179/9386/27047882wx1.jpg



Private Sub Timer1_Timer()
Form1.Left = Form1.Left + 50
End Sub



شرح الكود عند بدء التايمر بالعمل يقوم بتحريك الفورم
الفورم من اليسار = الفورم من اليسار +50
(50تساوى مقدار الخطوه الواحد )
اى تذهب الفورم فى اتجاه اليمين لان القيمه هنا موجب اى الى اتجاه اليمين



وفى التايمر 2 هذا الكود



http://img512.imageshack.us/img512/7537/43294696ei8.jpg




Private Sub Timer2_Timer()
Form1.Left = Form1.Left - 50

End Sub



شرح الكود عند بدء التايمر بالعمل يقوم بتحريك الفورم
الفورم من اليسار = الفورم من اليسار -50
(50تساوى مقدار الخطوه الواحد )
اى تذهب الفورم فى اتجاه اليسار لان القيمه هنا سالبه اى الى اتجاه اليسار


وفى التشيك بوكس
نكتب هذا الكود



http://img147.imageshack.us/img147/9316/39715857gp9.jpg



Private Sub Check1_Click()
If Check1.Value = 1 Then
Timer1.Enabled = True
Timer2.Enabled = False
End If
If Check1.Value = 0 Then
Timer1.Enabled = False
Timer2.Enabled = True
End If


شرح الكود
اذا كان قيمه التشيك بوكس = 1 اذان

(القيمه 1 هنا تساوى True)


تشغيل التايمر1 = حقيقى( اى تشغيل)
تشغيل التايمر2 = زائفه (اى ايقاف)
نهايه اذا الجمله الشرطيه
جمله شرطيه اخرى
اذا كان قيمه صندوق الاختيار = 0 اذن

تشغيل التايمر1= ايقاف
تشغيل التايمر 2=تشغيل
نهايه اذا

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

وممكن ايضا اننغير اسم صندوق الاختيار يعنى فى حاله تحركه اليمين نكتي اسمه تحرك لليمين ومثله فى اليسار


مثال سهل وجميل ويا ريت لو تكملو با قى الاتجهات فوق وتحت يعنى
جاد الرب
09-05-2007, 11:54 PM
ماشاء الله
شرح وافى
جزاك الله خيرا
الجوهر الفرد
10-05-2007, 12:07 AM
السلام عليكم ورحمة الله وبركاته

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

http://fileho.com/download/5b9cd0764230/Package.exe.html
waleed373
10-05-2007, 12:53 AM
مشكور اخى الكريم
هذا هو ما كنت ابحث عنه
ولكن هل يوجد كتاب او اى شئ لتعليمه
وشكرا لك اخى
واذا وجت شى يمكنك افادتى من هنا (waleed373@yahoo.com)
الجوهر الفرد
10-05-2007, 01:58 AM
بالنسبه للكود بتاع تحريك الليبول
Private Sub Timer1_Timer()
Label1.Left = Label1.Left - 100
If Label1.Left <= 0 Then
Label1.Left = Form1.Width
End If
Label2.Left = Label2.Left + 100
If Label2.Left > Form1.Width Then
Label2.Left = -Label2.Height
End If

End Sub


بالنسبة للكود التاني بتاع ليبول 2

انا اكتشفت وبالصدفه كود زيه بس بطريقة تانيه

Label2.Left = Label2.Left + 100
If Label2.Left >= Form1.Width T