اخر المواضيع :
|
الزعيم Vs فريق البومبي (كل ما يختص باللقاء ) |
اخر المواضيع :
|
النصر ماضي وانتهى وليس من الاربعه الكبار |
اخر المواضيع :
|
آقـوى نـسـخـة آسـيـويـة !! |
اخر المواضيع :
|
فضفضة MeXavissi نعم العمر مرة وحده فعيش حياة الغرب!! |
اخر المواضيع :
|
[::] Arsenal FC News Center - 2009 | 2010 [::] |
اخر المواضيع :
|
تأجيل ديربي الغربية |
اخر المواضيع :
|
الدريم بوكس .. ولا .. الفورتكـ ستار ؟ |
اخر المواضيع :
|
[::] Rafael Nadal News Center - 2009 [::] |
اخر المواضيع :
|
مـقـهـى الأعـضـاء [ نـقـاشـات + إسـتـفـسـارات + آراء ] |
اخر المواضيع :
|
عمرو زكي : لا يشرفني اللعب في أي ناد يضم لاعب جزائري |
اخر المواضيع :
|
[::] Roger Federer News Center - 2009 [::] |
اخر المواضيع :
|
[::] Real Madrid C.F News Center - 2009 | 2010 [::] |
اخر المواضيع :
|
اللي يكذب ياخالد الفيصل يروح فيييين .. يروح النار .. صح ..؟؟ |
اخر المواضيع :
|
●●●الجزيرة نصيرة الفقراء تنتصر●●● |
اخر المواضيع :
|
[::] AC Milan News Center - 2009 | 2010 [::] |
اخر المواضيع :
|
إدارة قسم الكرة السعودية تهنئكم بحلول عيد الاضحى المبارك |
![]() |
![]() |
![]() |
||
![]() |
|
![]() |
||
![]() |
![]() |
![]() |
|
|||||||
| الكمبيوتر والبرامج جميع البرامج التي تم شرحها ، تجدها هنا |
|
|
LinkBack | أدوات الموضوع | انواع عرض الموضوع |
|
|
|
|
#1 (permalink) | ||
|
كاتب نشيط
|
بسم الله الرحمن الرحيم...
أول شيء، اعتذر لكم عن عدم تقديم دروس جديدة في الفترة السابقة، وكما أقدم هذا الشرح لاخواني الاعضاء للاستفادة منه. قبل ما نبدء بالشرح هذه وصلة لتنزيل برنامج الفيجوال بيسيك <p><a href="http://www.arabteam2000.com/prog/badwi/vbArabic.EXE">لتنزيل برنامج الفيجوال بيسيك</a></p> الاصدار السادس، ويكون الشرح عليه. هذه الواجهة هي بداية فتح البرنامج وفيها ثلاث اختيارات ياتفتح مشروع جديد،،او تفتح مشروع محفوظ مسبقاً،،أو فتح أخر مشروع قمت بالعمل عليه.. <p><img border="0" src="http://logeen.8k.com/Visual_Sun1.jpg" width="456" height="430"></p> فالانفترض انك أخترت جديد واخترت القالب (Standard EXE) فسوف تفتح معاك هذه الصفحة::: <p><img border="0" src="http://logeen.8k.com/Visual_Sun2.jpg" width="794" height="557"></p> <p><b><font color="#800000"><u>وهذا شرح بعض الادوات::</u></font></b></p> <p> <b> <p><b> <b>.إلان سوف نعمل برنامج ساعة قياس الزمن<br> بسم الله:<br> واجهة البرنامج</b></b></p> </b></p> <p><img border="0" src="http://logeen.8k.com/Visual_Sun4.jpg" width="408" height="343"></p> وظيفة البرنامج في تسجيل الوقت الذي ننقر فيه بالماوس فوق (مفتاح البدء) وعرض ذلك الوقت في أعلى إطار من الإطارات الثلاثة التي تقع على يمين (مفتاح البدء) و (مفتاح الإيقاف).. ويبداء البرنامج بعد ذلك في حساب الفترة الزمنية التي بين لحظة بدء تسجيل الوقت، وحتى اللحظة التي تنقر فيها بالماوس على (مفتاح الإيقاف، وعند الضغط على مفتاح الإيقاف يسجل البرنامج زمن الإيقاف، ويعرضه في ثاني الإطارات الثلاثة التي تقع على يمين مفتاح البدء ومفتاح الإيقاف، ويحسب البرنامج أخيراً، الوقت الذي استغرقناه منذ لحظة البدء، حتى لحظة الإيقاف، ويعرض المدة الزمنية المذكورة في ثالث إطار من إلإطارات الثلاثة. ومعنى ذلك أن برنامجنا يعمل مثل أي ساعة لقياس الزمن Stop Watch . فهو يسجل وقت البدء ووقت الإيقاف ويحسب لنا الفارق الزمني بين لحظتي البدء والإيقاف. <p><font color="#800000"><u><b>مكونات البرنامج</b></u></font></p> يتكون برنامجنا من ستة كائنات.. الكائن الأول هو النموذج الكبير (الإطار الرئيس الذي رسمنا فوقه باقي إطارات البرنامج)، الذي أطلقنا عليه أسم ( ساعة قياس الزمن ) بعد أن كان أسمه الأصلي (Form1). والكائن الثاني هو مفتاح البدء والثالث مفتاح الإيقاف. أما الكائنات الثلاثة المتبقية، فهي إطارات النصوص الثلاثة الشاغرة، التي تقع على يمين مفتاح البدء ومفتاح الإيقاف.. شيء آخر يجب ألا ننساه، يتعلق بالأسماء التي نطلقها على تلك الكائنات.. فللكائن عنون (Caption) وأسم (Name).. والعنوان هو ألاسم الذي يظهر لنا على الشاشة، مما يعني أن (مفتاح البدء) عنوان وليس أسماً.. ولكن للكائن الذي يحمل عنوان (مفتاح البدء) أسماً خاصاً به وهو (Start) ، يستخدم للإشارة إلى الكائن عند كتابة الشفيرة. فألاسم (Start) هو الوسيلة التي يتعرف بها ((فيجوال بيسك)) على الكائن. أما العنوان فهو الوسيلة التي يتعرف بها مستخدم البرنامج على الكائن.. فعندما نريد أن نقول للمستخدم ((أنقر بالماوس فوق الكائن الأول الموجود على يسار الشاشة)) نقول له: (( أنقر بالماوس فوق (مفتاح البدء)).. ولكن حين نكتب شفيرة ونريد أن نطلب من ((فيجوال بيسك)) القيام بعمل يتعلق بالكائن ذاته، فإننا نشير إلى ذلك لكائن بالاسم الذي أخترناه لهُ، وكتبناه في حاشية (Name) الموجودة في نافذه الخصائص. والحين تتذكر أننا أطلقنا أسم (Start) على الكائن المذكور.. وإذا نسينا أسم الكائن، واردنا معرفته، فما علينا سوى النقر فوقه نقرة واحدة لتحديده ثم الضغط على مفتاح الوظائف F4 لإظهار نافذه الخصائص (Properties Window)، والبحث عن حاشيه (Name). وسنجد في الحقل الواقع أمام تلك الحاشية ألاسم الذي اخترناه للكائن. <p><b><font color="#800000"><u>لأضافة كائن نص</u></font></b></p> <p><img border="0" src="http://logeen.8k.com/Visual_Sun5.jpg" width="199" height="409"></p> <p><font color="#800000"><u><b>وظيفة الشيفر:</u><br> </font></p> <p><b><font color="#008080">أولاً</font></b></p>يجب أن نعلمه أن الشفيرة في لغة ((فيجوال بيسيك)) أنها تعطي التعليمات التي تحدد تصرفات البرنامج، في الأحوال المختلفة.. فهي تحدد على سبيل المثال، كيف يتصرف البرنامج إذا نقر المستخدم بالماوس على (مفتاح البدء)؟. أو كيف يستجيب (مفتاح الإيقاف) لنقرة الماوس عليه؟ وماذا يحدث إذا نقر المستخدم بالماوس على (مفتاح الإيقاف) قبل أن ينقر على (مفتاح البدء)؟....ألخ. فوظيفة الشفيرة إذاً هي توجيه عمل وسلوك الكائنات التي يتكون منها البرنامج، في الظروف المختلفة التي يمكن أن يحدث أثناء تشغيله من قبل المستخدم. يجب أن نعلمه أن الشفيرة في لغة ((فيجوال بيسيك)) أنها تعطي التعليمات التي تحدد تصرفات البرنامج، في الأحوال المختلفة.. فهي تحدد على سبيل المثال، كيف يتصرف البرنامج إذا نقر المستخدم بالماوس على (مفتاح البدء)؟. أو كيف يستجيب (مفتاح الإيقاف) لنقرة الماوس عليه؟ وماذا يحدث إذا نقر المستخدم بالماوس على (مفتاح الإيقاف) قبل أن ينقر على (مفتاح البدء)؟....ألخ. فوظيفة الشفيرة إذاً هي توجيه عمل وسلوك الكائنات التي يتكون منها البرنامج، في الظروف المختلفة التي يمكن أن يحدث أثناء تشغيله من قبل المستخدم. <p><b><font color="#008080">ثانياً</font></b></p> سوف نبداء بكتابة ثلاثة بلاغات في شاشة البلاغات العامة (General) فيمكننا الوصول إلى هذه الشاشة بأي كائن آخر موجود على النموذج (مثل نافذه البلاغات الخاصة بمفتاح الإيقاف). فنحن نفتح نافذه بلاغات الكائن بالنقر فوقه نقرتين سريعتين بالماوس. ثم ننتقل إلى الشاشة المطلوبة بالنقر بالماوس فوق السهم المتجه إلى أسفل..(يمين كلمة Object) والذي يقع على يمين الإطار الذي يحوي أسم الكائنات ، فتظهر قائمة بأسماء الكائنات الموجودة على النموذج، بلإضافة إلى كلمة (General) التي تشير إلى شاشة البلاغات العامة. وعندما ننقر بالماوس على كلمة (General) ينقلنا ((فيجوال بيسيك)) إلى شاشة البلاغات العامة. والبلاغات الثلاثة هي: <p><img border="0" src="http://logeen.8k.com/Visual_Sun6.jpg" width="382" height="156"></p> وتنتمي هذه البلاغات العامة إلى نوعية البلاغات الإعلانية أو الاعلامية Delclarations ، ويقصد به التعليمات التي تخص البرنامج بشكل إجمالي ولا تخص كائناً محدداً من كائناته. مادام تكلمنا عن البلاغات سوف نتكلم بشكل مبسط عن المتغيرات المستخدمة في البرنامج. <p><u><b><font color="#800000" size="4">الـــمـــتـــغـــــيـــرات<br> </font></b></u></p> تعتبر كلمة Dim واحدة من الكلمات المستخدمة في قاموس لغة (فيجوال بيسيك) وتعطي عند استخدامه تعليمات للكمبيوتر بحجز مكان في الذاكرة للمتغير (Variant)، الذي نختار له الاسم الذي نريد. وقد أخترنا في الحالة السابقة كلمة (StartTime)، كأسم للمتغير الذي قررنا استخدمه. ولكن ماهو (المتغير)؟ وما هي وظيفته؟ المتغير هو مكان نحجزه في الذاكرة، لتخزين بيانات معينة، يمكن أن نجري عليها تغييرات في وقت لاحق.. المهم أن أسم المتغير هو ألاسم الذي نختاره للمكان الذي حجزناه في الذاكرة، وليس أسم البيانات التي نضعها في المكان.. فإذا قررنا، مثلاً، أن نخـزن العدد 6 في المكان الذي حجزناه في ذاكرة الكمبيوتر بأسم (Start Time)، فأننا نعطي الأمر التالي للكمبيوتر: <p><b><font color="#808000">StartTime = 6<br> </font></b><br> </p> وبناء على الإمر السابق، يقوم الكمبيوتر بتخزين العدد 6 داخل المكان في الذاكرة المسمى (StartTime) فإذا طلبنا من الكمبيوتر في وقت لاحق، أن يكتب لنا على الشاشة البيانات المخزنة في المكان المسمى (StartTime)، فإننا نكتب الأمر التالي: <br> <b><font color="#808000">Print StartTime<br> </font></b><br> ويكتب الكمبيوتر، بناء على الإمر السابق، الرقم 6 على الشاشة.. ولكننا قلنا أن المكان الذي حجزناه في الذاكرة وأسميناه (StartTime) (متغير) Variant . فما المقصود بهذه الكلمة؟ ومالذي يتغير؟ لنحاول فهم المقصود، من السطور الثلاثة التالية: <p><font color="#808000"><b><br> StartTime = 6<br> StartTime = StartTime + 2<br> Print StartTime<br> </b><br> </font></p> لو أننا كتبنا السطور السابقة في مفسر لغة (فيجوال بيسيك)، أو أي مفسر أي لغة من اللغات المشتقة من لغة (بيسيك)، لكتب لنا الكمبيوتر على الشاشة العدد 8 . لماذا؟؟؟ السبب بيسط، ويمكن فهم منطقة عندما نفهم عمل كل سطر من السطور السابقة.. يطلب السطر الأول حجز مكان في الذاكرة بأسم StartTime، وتخزين العدد 6 في ذلك المكان الذي تم حجزه. ويقول السطر الثاني للكمبيوتر: أجعل القيمة الموجودة داخل المكان المسمى StartTime، مساوية للقيمة الموجودة في المكان المسمى StartTime، مضافاً إليها العدد 2 .. فإذا ترجمنا السطر الثاني إلى معادلة حسابية بسيطة تصبح كما يلي: <p><b><font color="#808000">StartTime = 2 + 6<br> </font></b><br> </p> وهكذا نكون قد غيرنا القيمة التي خزَّناها داخل المكان الموجود في الذاكرة، والذي أسميناه StartTime. ففي الخطوة الأولى، جعلنا المكان المذكور يخزن العدد 6، وفي الخطوة الثانية جعلناه يضيف غلى القيمة الموجودة في ذلك المكان القيمة الموجودة في ذلك المكان قيمة أخرى هي 2 ، لذلك حين نصل إلى الخطوة الثالثة التي تقول للكمبيوتر: أطبع العدد على الشاشة القيمة المخزنة داخل المكان المحجوز بالذاكرة بأسم StartTime، فإن الكمبيوتر سيكتب لنا العدد 8 . والمهم من ذلك أن نفهم أن في الذاكرة أماكن مخصصة لحفظ البيانات القابلة للتغيير والتعديل (نطلق عليها Variable)، وأماكن أخرى لحفظ البيانات التي لا ننوي أجراء تغييرات عليها (نطلق عليها ثوابت Constant) وغالباً ما نلجأ في بداية البرنامج إلى أستخدام التعليمات الإعلانية أو الإعلامية (Declaration) التي نخبر بها (فيجوال بيسيك) بالمتغيرات والثوابت التي سنستخدمها في برنامجنا.. وقد أستخدمنا في برنامج ((ساعة قياس الزمن)) ثلاث متغيرات وهــي: <p><b><font color="#808000"><br> StartTime<br> EndTime<br> ElapsedTime<br> </font></b><br> </p> أي حجزنا ثلاثة أماكن في الذاكرة، وأطلقنا على كل مكان منها أسماً مميزاً.. وقدأخبرنا (فيجوال بيسيك) بأسماء تلك المتغيرات، في السطور الثلاثة التي كتبناها في شاشة البلاغات العامة:.: <p><b><font color="#808000">Dim StartTime As Variant<br> Dim EndTime As Variant<br> Dim ElapsedTime As Variant</font></b></p> <p><font color="#800000"><b><u>نعود إلى الكائن الأول</u></b></font></p> <p><img border="0" src="http://logeen.8k.com/Visual_Sun7.jpg" width="458" height="212"></p> __________________ التعديل الأخير تم بواسطة Php4Mee ; 24-03-2002 الساعة 21:24 |
||
|
|
|
|
#2 (permalink) | ||
|
كاتب نشيط
|
قلنا أننا نستخدم الشفيرة لإعطاء (فــيجوال بيسيك) تعليمات حول الأسلوب المطلوب من الكائن أن يتصرف به، وعندما يقوم مستخدم البرنامج بعمل معين يتعلق بهذا الكائن (مثل النقر فوقه بالماوس)... وسنجد تأكيداً لهذا في الشفيرة المستخدمة في شاشة الكائن (مثل النقر فوقه بالماوس).. وسنجد تأكيداً لهذا في الشفيرة المستخدمة في شاشة الكائن Start إذا أنتقلت إلى تلك الشاشة لإلقاء نظرة متفحصة على التعليمات (الشفيرة) المكتوبة فيها ، ستجد السطر الأول كالتالي: <p><b><font color="#808000">Sub Start_Click()<br> </font></b><br> </p> ويخبرنا ذلك السطر أن نتائج التعليمات التالية ستنعكس على الكائن Start ، حين ينقر المستخدم Click بالماوس فوقه.. ثم تأتي السطور الأخرى ليشرح كل منها جزءاً من تلك التعليمات، فنجد أن السطر الثاني يطلب من الكمبيوتر أن يخزن في المتغير StartTime القيمة التي تعرف بأسم Now : <p><br> <b><font color="#808000">StartTime = Now<br> </font></b><br> </p> وتنتمي كلمة Now إلى الكلمات التي تؤدي وظائف محددة في لغة (فيجوال بيسيك) فهي كلمة تقوم عند أستخدمها بتنفيذ وظيفة محددة. وتتلخص هذه الوظيفة في إعطاء الوقت عند لحظة معينة. ففي هذه اللحظة التي يستخدم فيها (فيجوال بيسيك) الوظيفة Now، تقوم Now بتسجيل الوقت الذي يمكن أن نتصرف به بطرق متعددة (نعرضه على الشاشة أو نحفظه في الذاكرة أو نطبعه على الورق...إلخ)، ويعطي السطرالثالث تعليمات للكمبيوتر بعرض الوقت الذي تأتينا به كلمة Now ، والذي يتم تخزينه في المكان المسمى StartTime في الذاكرة، داخل أعلى إطار في الاطارات الثلاثة الموجودة على يمين (مفتاح البدء) و (مفتاح الايقاف): <p><b><font color="#808000">txtStart.Text = Format (StartTime, "hh:mm:ss" )<br> </font></b><br> </p> لاحظ في السطر السابق أن كلمة txtStart هي أسم إطار النصوص رقم 1، الذي نتحدث عنه (ستجد هذا الاسم مسجلاً في حاشيته Name في نافذة الخصائص).. لاحظ أيضاً أن كلمة Text تعني (نص).. وبـالتالي فأن الكلمتين المدمجتين txtStart.Text تشيران غلى النص المطلوب عرضه داخل الإطار txtStart . كما يلاحظ أن كلمة Format تعني (طريقة العرض).. فكأن الخطوة السابقة تقول للكمبيوتر أن النص الذي سيعرض داخل الإطار المسمى txtStart ، يتكون من البيانات المخزنة في الجزء الذي حجزناه في الذاكرة وأسميناه StartTime . كما أن الطريقة التي تستخدم في عرض تلك البيانات هـي hh:mm:ss التي ترمز إلى (الساعات والدقائق والثواني). أما السطر الرابع، فيطلب من الكمبيوتر ترك إطار النصوص الثاني شاغراً: <p><b><font color="#808000">txtStop.Text = ""<br> </font></b><br> </p> لاحظ أن كلمة txtStop هي اسم إطار النصوص رقم 2 ، وأن الكلمتين المدمجتين txtStop.Text تشيران إلى النص المطلوب عرضه داخل الإطار txtStop. ويؤدي السطر الخامس وظيفة شبيهة بوظيفة السطر الرابع، حيث يقول للكمبيوتر: أترك إطار النصوص الثالث شاغراً وبهذا السطر نكون قد أنتهينا من الشفيرة الخاصة بالكائن Start ، الذي يحمل عنوان (مفتاح البدء)، ويكون علينا الانتقال إلى الشفيرة الخاصة بالكائن Stop ، الذي يحمل عنوان (مفتاح الإيقاف). <p><font color="#800000"><b><u>الكائن الثاني<br> </u></b></font></p> <p><img border="0" src="http://logeen.8k.com/Visual_Sun8.jpg" width="458" height="205"></p> تعطي الشفيرة الخاصة بالكائن Stop (مفتاح الايقاف) تعليمات لـ(فيجوال بيسيك) حول الطريقة المطلوب أن يتصرف بها الكائن، عندما يتقر المستخدم فوقه بالماوس .. وخلاصة ما تقوله تلك التعليمات أن على الكمبيوتر، حين يقوم المستخدم بالنقر بالماوس فوق الكائن Stop أن يفعل مايلي: <p><font color="#008080"><b><u>أولاً</u></b></font>:</p> يقوم بتخزين الوقت في لحظة النقر داخل المكان بالذاكرة المسمى EndTime <p><font color="#808000"><b>EndTime = Now<br> </b></font><b><font color="#008080"><u><br> </u></font></b></p> <p><font color="#008080"><b><u>ثانياً</u></b></font>:</p>يقوم السطر الثاني يتحديد الطريقة التي يحسب بها الكمبيوتر الفارق الزمني بين الوقت في لحظة البدء والوقت في لحظة الايقاف وتسجيل هذا الفارق في المكان المحجوز بالذاكرة بأسم ElapsedTime <p><font color="#808000"><b>ElapsedTime = EndTime - StartTime</b><br> </font><br> </p> <p><b><u><font color="#008080">ثالثاً</font></u></b>:</p> يخبر السطر الثالث للكمبيوتر بطريقة عرض البيانات المخزنة في المتغير EndTime ، داخل إطار النصوص المسمى txtStop (إطار النصوص الثاني): txtStop.Text = Format (EndTime "hh:mm:ss" ) <p><b><u><font color="#008080">رابعاً</font></u></b>:</p> يُبلغ السطر الرابع الكمبيوتر بطريقة عرض البيانات المخزنة في المتغير ElapsedTime داخل إطار النصوص المسمى txtElapsed . <b><u><font color="#ff0000" face="Andalus" size="4">وطريقة تشغيل البرنامج</font></u></b> ولان نشغل البرنامج وعن طريق (Run) والتي محدده بالون البني.. وأطفاء البرنامج عن طريق (Stop) والمحدده بالون الحمر <p><img border="0" src="http://logeen.8k.com/Visaul_Sun9.jpg" width="121" height="46"></p> الواجهة النهائية للرنامج، كما تبدوا للمستخدم. <p><img border="0" src="http://logeen.8k.com/Visual_Sun1011.jpg" width="361" height="262"></p> لتحميل برنامج حساب الزمن <p> </p> <p><a href="http://logeen.8k.com/Program%20Colck.zip">Program Colck</a></p> وفي الختام، أعذرونا عن التقصير والشرح الطويل بس يستحق أكثر من ذلك. وأدعو لنا بالتوفيق والصلاح في الدنيا والاخرة....اللهم آمين <p align="center"> </p> <p align="center"> <u><b><font color="#ff0000">جميع الحقوق محفوظة</font></b></u></p> <p align="center"><font color="#800000"><i> susnound2002</i></font><br> <br> </p> <p> </p> __________________ |
||
|
|
|
|
#4 (permalink) | ||
|
كاتب نشيط جداً
|
شكرا sunsound2002 للشرح المميز
وتصدق انا هجرت الفجوال بيسك من سنين مع اني كنت أموت فيه
![]() تحب الأزرق ودوريـــه؟؟؟ بالقلب الأزرق بتلاقيه!! اضغط على الصورة فوق!! ولا تنس تشوف سباقه!! http://www.leganow.com/fourm __________________ |
||
|
|
| الذين يشاهدون محتوى الموضوع الآن : 1 ( الأعضاء 0 والزوار 1) | |
| أدوات الموضوع | |
| انواع عرض الموضوع | |
|
|
|
الساعة الآن 18:50.
العاب - العاب بنات - الفراشة - عالم حواء - الحياة الزوجية - منتديات - طيران - سفر - ابراج – حظك اليوم - اخبار - كليبات - العاب فلاش - اغيثو غزه |
||
| Powered by vBulletin® Copyright ©2000 - 2009, Jelsoft Enterprises Ltd.
Content Relevant URLs by vBSEO 3.1.0 جميع الحقوق محفوظة لموقع الرياضة إلى الأبد |