أرشــــــيـــف حوار الخيمة العربية

أرشــــــيـــف حوار الخيمة العربية (http://hewar.khayma.com/index.php)
-   خيمة الحاسوب والبرمجيات (http://hewar.khayma.com/forumdisplay.php?f=12)
-   -   من يريد منكم التعلم على visual basic 6 ؟ (http://hewar.khayma.com/showthread.php?t=37134)

الحرية 25-12-2003 06:35 AM

من يريد منكم التعلم على visual basic 6 ؟
 
السلام عليكم ورحمة الله وبركاته
بم أني أنظممت للمنتدى بسببين أحدهمالشعبية المنتدى العالية ومكانته وثانياُ لوجود منتدى الحاسب ! تمنبت لو وضع قسم خاص لمنتدى المبرمجين ولاكن مش مشكلة ، وأعذروني على الأخطاء الأملائية لأن خظ الشاشة صغير وما أبي أعدله والكيبورد ( لوحة المفاتيح ) لا تحوي على حروف عربية .

قررت بسبب خيرتي المتواضعة أن أعلم بعض الأساسيات في هذه اللغة العظيمة وسيكون أول درس أحتمال بدون صور ولكن أرجو التحمل قليلاً .

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

حالياً لن أكتب الدرس لأن هناك وجبة غذاء تنتظرني :D:D:D

الحرية 25-12-2003 07:24 AM

بسم الله الرحمن الرحيم
 
حياكم على الغذاء ! أووووه خلصته كله :D
على كل حال دعنا نبدأ ، أولاً ما هو VisualBasic6 ؟ هو بأختصار من أبسط لغات البرمجة على الكمبيوتر ، ووضيفته صنع البرامج البسيطة والمعقدة ، مثل آلة الحاسبة وبرامج التحويلات وقد برامج متصفح الإنترنت والألعاب والكثير الكثير، ولكي تتعلم هذه اللغة يجب الحصول على نسخة من البرنامج ، وبعد ذلك أعمل التنصيب في القرص على جهازك
ما تخلص التنصيب البرنامج أذهب إلى
START>Microsoft Visual Basic 6.0 >Microsoft Visual Basic 6.0
سيشتغل البرنامج وستظهر لك نافذة عنوانه new project وبه خيارات كثيرة وقد تكون ثلاث خيارات على حسب نسختك ، وسوف نستخدم هنا standard.exe قثط ، هذه الناقدة تسألك عن نوع المشروع الذي تريد بنائه ، ولكن ما هو المشروع ؟ حسنن سأخذ نفس وسوف أشرح الشرح الممل للمبتدأين ( أو المتعلمين ) ما هو المشروع .

عندما تريد تصميم برنامج قد تحتاج لنوافذ (قوالب) كثيرة FORMS وقد تحتاج إلى Module أو حتى Control أو Class - وقد نستخدم Forms فقط - وكلها مترابطة معاً ، ولكن هل هي مبعثرة ؟ لا ، إنها جميعاً يجب أن تكون في مشروع واحد ، فالمشروع يشمل كل ما تريده في برنامج واحد .

ما هو Form ؟
هي نافذة التي توضح الأدوات فمثلاً عندما تريد معرفة تفاصيل القرص الصلب وتضغط زر الماوس اليمين وأختيار من القائمة properties سيفتح لك نافذة بها الخواص .

على كل حال عند فتح new project ستظهر لك أيقونات كثيرة وحوايج واجد ، يمكن من الخلعة تطلع على طول :confused: ، بس أستني أشوي يمكنك بعد التحويس والعفس التعود عليها ، وسوف أحاول بقد المستطاع الشرح بالتبسيط كل القوائم بالمورة القادمة .

الحرية 25-12-2003 08:14 AM

السلام عليكم ورحمة الله وبركانه
 
كنت أمزح معاكم :D:D:D بأشرح ألحبن ، بس ما بأشرح كل شيء ، لازم أنت تداور شوي
ستجد بالأعلى قوائم منسدلة والكثير من الأيقونات وهي :
File: وهي قائمة لوضع مشاريع جديدة وحغظها وفتحها ، وبمكنك تحوبل مشروعك إلى برنامج exe وهذا شيء مهم جداُ لإرسال برامجك للمنتدى والبريد ولأصدقائك على الأقراص ، ويمكنك فتح المشاريع الأخيرة التي كنت تعمل بها هنا .

Edit: من هذه القائمة يمكنك التراجع والتقدم في الخطوات ، ويمكنك النسخ واللصق الأدوات وحدفها أيضاً ، ويمكتك تحديد جميع الأدوات التي في Form ، ويمكنك البحث في الأوامر ووضع نقاط مرجعبة للرجوع لها ، على كل حال يمكنك الأستغناء عن هذه القائمة وذلك بالضغط على الكيبورد .... ألا تعرف كيف :rolleyes: ؟ حسناً يمكنني مساعدتك :
Ctrl + C : للنسخ ، Ctrl + X : للقص ، Ctrl + V : للصق ،
وهذه للأوامر ==> Ctrl + H : للبحث والتغيير ، Ctrl + F : للبحث .
Ctrl + Z : للتراجع ، أعذروني ما أعرف للتقدم لأني ما أستخذمها أصلاً :D .

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

Project: هذه الصفحة مهمة لإضافة حوايج لمشروعك الخاص كـ Forms و Class وغيرها ، وفي الأخير يمكتك بوضع مواصفات المشروع.

Format: يمكنك هنا تعديل وضع التصميم في الـ Form وإقفاله أيضاً لكي لا يتم تغيير التصميم .

Debug: عملية بحث الأخطاء من هنا ، وفي الحقيقة عمري كله ما فتحت هالقائمة ؟ يمكن تفيدكم ، لما أقتح بأقول ليكم ويش ممكن نستفيد منها .

Run: من هنا يمكنك تشغيل البرنامج لأختباره ويمكنك أيقاف الأختبار كلياً أو مؤقت لإضافة أوامر والرجوع للأختبار ، وأيضاً إعادة الرنامج في الأختبار .

Query: هذه القائمة ليست لنا هنا !؟

Diagram: وهذه القائمة أيضاً لا يمكننا أستخدامها ، لأنها خصصت هي والتي قبلها لقواعد البيانات ولن نستخدمها هنا أبداً .

Tools: هذه القائمة لتحرير القوائم وكتابت الإجرائات وبها خيارات VB نفسه ولن نستخدمه هنا أيضاً ، هذا لا يعني أن لا تعبث بها :D .

Add-ins: هذه القائمة لإضافة برامج مستقلة عن البرمج لتطوير برامجك .

Window: ألا تعرف فائدتها ؟؟؟ خبل ! روح بس أشان تعرف فايدتها .

Help: لا تقول لي أنك ما تعرف قائمة Help أيضاً ! يمكنك أستخدامها عندما تملك السيدي الثاني .

حسناً ، بقت الأيقونات عبارة عن أختصارات مقيدة من الخيارات التي موجودة في الثوائم أصلاً ، يعني ................... ما بأشرحها :D .

على كل حال ، بأشوفكم بعد صلاة المغرب وبأشرح ما هو موجود على اليمين واليسار.

الشبح 25-12-2003 09:24 AM

اولا .. نرحب بك بين اخوانك واخواتك اعضاء الخيمة العربية .. فاهلا وسهلا بك ..

ثانيا ... توكل على اللة وادلو بدلوك ... بس رح نكثر عليك الاسئلة .. انا ابرمج بلغة فيجول .. وهى لغة ممتازة جدا جدا .. ورح ارجع لك .. اكيد فى حالات كثيرة جدا ..

كمل بارك اللة فيك .. وياليت تبدا بطرق ربط قاعدة المعلومات بالبرنامج .. يعنى ربط اكسس بالفيجول بيسك ... ينعى مثال :

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


الشــــــ VaMpIrE ــــــــبح



المعرفـــة ملك للجمـــيع .. وليس حكــر للاخــــرين !!!

الحرية 26-12-2003 09:40 AM

بسم الله الرحمان الرحيم
 
عذراً شباب أنقطع الإنترنت وما قدرت أواصل ، بس بأكمل لكم ألحين ، وأعذرني يا شبح ما أقدر أنط للقاعدة البيانات بهالسهولة بس بأحاول .
----------------------------------------------------------
عند يدك اليسار صفحة مهمة جداً وهي صفحة الأدوات ، ومن أهمها :-
Poniter: في الحقيقة هذه ليست أداة ، بل الحالة الطبيعية للماس لكي تستطيع مسك الأدوات وتكبيرها يجب أن تكون محددة :D

Picture: وهي أداة الصورة ، وستتمكن بواسطتها أدخال صور للبرنامج ، وهي تختلف عن image ببعض الخواص ، فهي أقوى وأبطء منها ، وكذلك ممكن تدخل بداخلها الأدوات ويسمى ذلك بالأحتضان .

Label: وهو شريط العنوان ، وبواسطه لا يمكن للمستخدم إدخال البيانات بداخله ، ويستفاد منه للتوضيح الأشياء للمستخدمين .

Text: وهو شريط البيانات ، وبواسطه بمكن للمستخدم إذخال البيانت للبرنامج ، وهو مفيد جداً جداً جداً مثل الزر ، مثل ذلك شريط البيانات في الآلة الحاسبة ، أو الشريط بالأسفل عندما تريد وضع ملف بالرسالة في المنتدى موضح بفائدته شريط العنوان ( إرفاق ملف).

Frame: وهو اسم على مسمى فريم ، ووضيفته الأساسية الإحتضان وترتيب البرنامج .

Commandbox: من منا لا يعرف الزر ؟ الزر هو الزر ! فهمت ؟

Checkbox : وهو مربع الأختيار ، وفائدته تعيين المستخدم لصفة معينة ، مثلاً عندما تريد فحص القرص الصلب ستجد عدة مربعات أختيارات قبل الفحص .

Optionbutton : زر الأختيار ، وفائدته تحديد أحد اللميزات الذي يريدها المستخدم ، مثلاً عندما تريد الترشيح لشيء ما في الإنترنت ، فتنقر على زر الأختير ، وليس مربع الأختيار !

Combobox : وهي أداة مشابهة لزر الأختيار بنسبة لي ، وفائدتها تحديد أحد الخيارات ، ولكن الفرق إنها تحوي عدة خيارات في أداة واحدة ، وقد تتغير ولا تكون ثابتة ، وستجدها عندما تريد الأشتراك في منتدى ، ويسئلونك من أي بلد أنت ؟ فستجد هذه الأداة.

Listbox: قائمة الأختيارات ، وستعرض لك عدة نصوص وهي فائدتها ، ستعرص لك عدة نصوص .

Hscroolbar,Vscroolbar: وهما شريط التمرير العامودي والأفقي ، ألا تعرف فائدتهما ؟ هما في كل مكان يوجدان محادة الأدوات لكي ترى ما أسفلها و أعلاها .

Timer: المؤقت ، وهي أداة جميلة جداً ، وفائدتها توقيت ، أي تعمل الأوامر بعد مرور وقت محدد ، مثلاً عندما تقف الماوس عدة دقائق وتفتح خلفية وقوف ! .

DriveListBox: مربع الأقراص الصلبة ، وسيعرض لك الأقراص الصلبة التي بجهازك ، وتستخدمها عندما تريد حذف ملف معين أو نسخ ملف معين أو تحديده لقرائته .

DirListbox: مربع المجلدات ، ويمكن أيصاله بمربع الأقراص الصلبة لكي يحدد المجلدات التي بالقرص نفسه .

FileListBox: وهو زميلهما لتحديد الملفات التي بداخل المجلدات ، ويمكن ربطه بقائمة المحلدات ، وعند وضع هذه الأدوات الثلاث سيحدد موقع البرنامج الذي تعمل عليه .

Shape: وهو أدة الشكل ، يمكنك صنع مربع أو دائرة أو مستطيل كشكل ، ما فائدته ؟ لا أعلم بالضبط ! .

Lind: وهو زميل الأداة السابقة ، الخط ، وبهما يمكن تصميم برنامج أفضل .

Image: أداة الصورة ، وتكلمت عنها سابقاً .

Data: وهي أداة المستخدمة للوصول لقاعدة البيانات ، وأخشى أني لن أتكلم عنها هنا .

Ole: أداة واسعة جداً ، وفائدتها إدخال البرامج في برنامجك !

حسناً أراكم في الموضوع التالي

الحرية 26-12-2003 10:03 AM

بسم الله الرحمن الرحيم
 
حسناً ، دعنا ننتقل للخرابيط التي باليمين .
---------------------------------------
ستجد بالأعلى على اليمين صفحة مكتوب عليها project - project1 ، هذه النافذة نعرض لك النوافذ وكل الخرابيط التي في مشروعك هذا ، وقد تشمل على أكثر من مشروع وتسمى مجموعة Group ، والمجموعة عبارة عن عدة مشاريع مرتبطة مع بعضها ، على كل حال يمكنك التنقل بين form و class و module في هذه النافذة .

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

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

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

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

الحرية 26-12-2003 03:44 PM

بسم الله الرحمن الرحيم
 
هناك خطأ في بداية الرسالة مكتوب خيرتي بدال خبرتي !
أوه ما هذا الموضوع :D ، حسناً دعوني أكمل لكم .
----------------------------------------------------------
أنت الآن تعرف الأدوات والمميزات ( المفروض ! ) بس قبل ما أشرح المميزات بأشرح بأختصار بعض الأشياء المهمة في برمجة VB ، ومنها :-

الأوامر: الأمر هو وحدة برمجة ! بعبارة أو بأخرى هو البرمجة ، مثلاً عندم تضغط على وزر وتغير لونه فقد حدث أمر ، أي أن تغير اللون أو الحجم أو الخروج من البرنامج كلها أوامر .

الحدث: الحدث هي طريقة حدوث الأمر ، فهناك الكثير من الأحداث منها المشتركة ومنها الخاصة ، فمثلاً في الزر حدث الضغط ، فعندما تضغط عليه فقد يتغير لونه ، وحدث الكتابة فقد يحدث أمر عندما تكتب في مربع النص ، وحدث الوقت ويحدث عندما يمر الوقت اللازم على المؤقت ويحدث الأوامر .
ولكل أداة حدث قياسي ، أي من الطبيعي عندما تضع الأداة يكون الأستخدام الأفضل له ، مثلاً الزر له حدث الضغط ، والمربع النص له حدث الكتابة عليه ، والمؤقت له حدث الوقت.

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

صفاتالأدوات: هذا الموضوع سنفهمه في الدرس القادم أكثر ، لكل أداة صفات وأحداث ، لكي ترى الصفات اللازمة يجب بعد كتابة اسم الأداة كتابة (( . )) لكي ترى صفات الأداة وأختيارها على حسب المطلوب .

المتغيرات: المتغيرات هي عبارة عن صندوق وهمي في البرنامج ، يمكنه حفظ رقم أو نص في داخل البرنامج ولكن لن تراه بعينك ، يمكن أستدعاء الرقم أو تغييره ، وللمتغير اسم ، ولكي نضع متغير سأقول لكم فيما بعد :D.

ملاحظةبسيطة: إن لغة VB6 مختلفة تماماً عن VB.net فإذا أرد ت تعلم VB.net فلا يمكنك ذلك هنا ولن تستفيد من تعليمي لك ، لأن الدروس التي سأقدمهم خاصة إلى VB6 فقط ، قد تعمل على VB5 أو VB4 لكن الأفضل على VB6 ! .

الحرية 26-12-2003 04:14 PM

بسم الله الرحمن الرحيم
 
المرفقات 1
أراكم متلهفين مثلي عندما أردت تعلم هذه اللغة ، بس للأسف ما أحد أراد تعليمي ، ولكني أجتهدت بدون كتاب ولا مدرس ولا إنترنت وتعلمت جزء من هذه اللغة ، والحمد الله سوف أعلمكم إنشاء الله ما تعلمته .
وين رحت :D ما عليه بأرجع للموضوع .
---------------------------------------------------------
عندما تريد برمجة أحدى الأدوات فأولاً ضع الأداة بالنافدة ، ثم أضغط على الأداة مرتين وسوف تجد صفحة بيضاء تسمى Code وهذه الصفحة لن تستخدمها إلا في زمن التصميم ، على كل حال ستجد قائمتين بالأعلى ، التي باليسار توجد بها كل الأدوات التي في البرنامج ، مع العلم إن الـ General ليس بأداة بل هو أول سطر في البرمجة وتستخدمه في تعريف المتغيرات كم قلت ، أو حتى تعريف أشياء أخرى ، بالقائمة التالية ستجد بها كل الأحداث للأداة التي أخترتها ( مع العلم إن النافذة بكبرها أداة ! ) .
وعلى فكرة لكل نافذة لها صفحة Codeخاصة بها وبأدواتها .

ضع زر على النافدة وأضغط عليه مرتان وسترى بالصفحة Code ما يلي :-
Private Sub Command1_Click()

End Sub
ما معنى كل هذه الهدرة ؟ حسناً سأشرح هنا بقليل من التفاصيل :-
private sub : جملة ثابته لتعريف الأدوات .
Command1 : اسم الأداة .
_Click : اسم الحدث ، وهنا الحدث القياسي للزر وهو الضغط .
End Sub : أنتهى ، وتفيد لأنتهاء الأوامر ، ولو لاهاا لواصل البرنامج .

يجب كتابة الأمر وسط هذين السطرين ، والأوامر ليست صعبة أبداً ، فأبسط نوع الأوامر هو تغيير الخصائص للأدواة ، ولمعرفة ذلك يجب أن تعرف بعض الخصائص ومنها :
Name: لا يمكنك تغيرره من الأوامر ولكن لو أردت تغييره فغيره من النافذة التي باليمين ، ولتغيير الأسم فوائد عظيمة وهي الأختصار ، فبدلاً من أكتب Command1 ممكن أغيره إلى C1 ، مو كذه أحسن :D .

Caption: هذه الميزة هي الأسم الظاهر على الأداة ، ويجب التفريق بينها وبين Name ، فهذا الأسم الظاهر لن تستدعيه هنا بل سيراه المستخدم على الأداة .

backcolor: وهي ميزة اللون الأداة ، وسوف أعلمكم فيما بعد كيف نغيير الألوان.

Enable: هذه الميزة لها قيمتان True و False ، وفائدتها تمكين الأداة من الأستخدام ، ألم ترى أداة رصاصية شفااقة لا يمكن أستخدامها ؟ هذه حالة False .

Visiable: هذه الميزة لها نفس القيمتان ، وهي صفة لتجعل الأداة قابلة للرؤية أم لا .

RightToLeft: هذه أهم خاصية لكي تحول من جهة إنجليزية إلى جهة عربية .

هناك الكثير من الخصائص ، ويبدو إني أفقلت عليكم وأبخلت ، ولكن هذا لمصلحتكم لكي تتعلموا البرمجة يجب تعلم الأساسيات أولاً ، على كل حال هذا أول مثال أكتب التالي :-
Private Sub Command1_Click()
Command1.Caption = "لقد ضغطني !"
End Sub
هذا المثال لكي تغيير الاسم الظاهري للزر ، على كل حال خذ هذا المثال معك .
أراكم فيما بعد

الحرية 27-12-2003 04:36 PM

السلام عليكم ورحمة الله وبركانه
 
المرفقات 1
المفروض الحين تداور شوي وتحاول بنفسك الكشف عن مميزات وصفات الأدوات بعد ما شرحت لك فوائد النوافذ الموجودة معاك ، على كل حال بأبدا درس اليوم .
-----------------------------------------------------------
البعض عند دراسة VB6 في المدرسة في العلوم الطبيعية الصف ثالث ثانوي ، ما تكون عنده أي خبره ، ويجي متخوف ومو فاهم أي شيء ويحسب البرمجة لغة سحر أو شيء من الهقبيل ، بس أنا بأحاول أقول له إن التفاهم في لغة البرمجة أسهل بكثير من التعامل والتفاهم مع الناس !؟! ما تصدق :confused::confused::confused: بأعطيك مثال :-
خذ أداتين قي مشروع جديد ( مثلاً مربع نص ) وغير أسميهما الظاهرين ( مع العلم إن الاسم الظاهري للعنوان Caption ، ولاكن للمربع النص Text ) وأكتب الأمر التالي في زر (في وسط السطرين ) :
Text1.Text = Text2.Text
هذا الأمر يقول :
الاسم الظاهري للمربع النص الأول = الاسم الظاهري للمربع النص الأول

قد لا تفهم ما عنيته بس بأشرح بصورة ثانية :-
الاسم.الصفة=الأسم.الصفة
كم قلت سابقاً عندما تكتب اسم الأداة وتكتب نقطة بعدها مباشرتاً يفتح لك صندوق الصفات ، ولو أردتها أوتماتيكياً إضعط فقط Ctrl + Space وسوف تظهر لك في صفحة Code.

هذه أسهل طريقة للبرمجة عرفتها اليوم ، ولكن الدرس القادم بأعطيك أوامر مختلفة ، أهم شيء تفهم هذه الطريقة ، ولكي أساعدك نزل هذا البرنامج معاك ( مع العلم لو وضعت للصفة top أو left قيمة حرفية بيعطيك error :D:D:D! )

عابر سبيل 27-12-2003 08:10 PM

الاخ الحريه مجهوداتك رائعة بارك الله فيك :heartpump

الحرية 28-12-2003 06:23 AM

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

فتحنافذةجديدة : أولاً لكي تجعل برنامجك ( مشروعك ) يحوي أكثر من نافذة يجب الذهاب إلى قائمة Project وتضغط على Add new Form ، كم قلت سابقاً يجب أختيار أول نوع وهو العادي ، والنافذة عبارة عن أداة حاضنة كبيرة أي لها أسم وعنوان ( اسم ضاهري ) ولون خلفية وصورة وهكذا ، عندما يكون عندك مشروع له صفحتان وتشغل البرنامج لن يفتح لك إلا النافذة الأولة في زمن التشغيل ، لماذا :confused:؟ لأن المشروع بشكل أو بآخر لن يفتح لك إلا نافذة واحدة ، كيف يمكننا تغير النافذة التي سيبدأ بها المشروع ؟
بسيطة إذهب لقائمة Project وأختر آخر خيار ، سيفتح لك نافذة صفات المشروع ، سترى قائمة عليها عنوان Startup Object من هنا يمكن أختيار Form الذي سيبدأ به المشروع ، وأيضاً قد لا يكون Form أصلاً .
على كل حال ، عندم يفتح الصفحة ما هو الأمر الذي يفتح النوافذ ؟ الأمر هو الآتي :
Form1.show
صفة Show خاصة بالنوافد وهي صفة فتح الصفحة ، ويمكن كنابة الأمر كالتالي :-
اسم النافذة . show
كما قلت سابقاً إن البرمجة تعتمد على صفة Name وليس Caption في الأوامر .
هناك إضافة غير ضروية ، يمكنك كتابة 1 بعد show بينهما فراع ، وفائدته إنه لا يمكنك الرجوع للصفحة التي كانت موجودة سابقاً إلا إذا أغلقت النافذة الجديد ، سيكون واضحاً في المثال التابع للدرس إنشاء الله .

إغلاقالنوافد : بما إنك عرفت كيف تفتح النافذة يجب أن تعرف كيف تغلقها !
Unload اسم النفذة
مثل unload form1 ، هذا الأمر لا يأتي بعده بنقطة لأنه ليس أداة ليكون له صفات ، هذا الأمر يعمل مع النوافذ ويغلقها ، ويمكن كتابة الأمر التالي :-
Unlaod me
هذا الأمر مضحك بعضاً ما ! إنه يأمر البرنامج أن يغلق نفسه ! وبذلك سيغلق النافذة التي وجد بها الأمر .

إغلاقالبرنامج: لإغلاق البرنامج بكل بساطة أكتب End :)

شباب قبل ما أرحل بأقول ليكم بعض الأشياء ، البعض يتسائل : لماذا لم أضع الأوامر السابقة في زر وقلت لكم ضعوه في رز ؟؟؟ :confused:

سؤال المليون ! مين يجاوبه له مليون ! كنت أمزح :D:D:D

الجواب بسيط يا شباب ، هذه لغة برمجة ويمكن وضع الأوامر في أي حدث كان ، إنشالله لو أقول إذا كانت قيمة الشريط التمرير الأفقي = 20 بيغلق البرنامج في وجهك !؟ هو ماله شغل كان الأمر منطقي وإلا لا ! تذكر أنت من له سيادة في الموضوع مش البرنامج .

الحرية 29-12-2003 03:18 PM

بسم الله الرحمن الرحيم
 
المرفقات 1
:حسناً شباب ، هذا اليوم بنتوسع شوي ، فلو أي واحد مو فاهم أي درس سابق ، فليرسل رسالة أو سوؤال في موضوع : من مهتم منكم في تعلم لغة visual basic ، وشكراً .
-------------------------------------------------------------------
في الدرس السابق تعلمنا كيف نغلق النافذة وكيف نفتحها ، أداة الشرط هذه موجودة تقريباً في جميع اللغات ، وتستخدم بكثرة، اليوم سنتعلم كيف تضع شرط :
then + أمر + if


end if

حسناً أرجو أن يكون هذا الدرس سهل ، دعني أشرح الخرابيط التي بفوق :-
if : أداة الشرط ، وهي ثابتة عند عمل الشرط .
then : تأتي بعد الأوامر في الشرط نفسه ليعطي الحكم .

ببساطة هذا الشرط يجوي على شرط ما ( أنت تضعه ) ، عندما تكون قيمته صحيحة ( أي قد تنفذت ) فإن الأوامر التي ستأتي بعده ستعمل بإذن الله ، أما إذا كانت خاطئة فإنها لن تعمل . مثلاً نقول هذا الشرط :-
If text1.text = 1 then
text2.text = 5
end if
لقد فرض الشرط إذا كان الصندوق الأول يحوي على رقم واحد ، فإن الصندوق الثاني ستكون قيمته 5 .
أو هذا مثال آخر :
If text1.text = 5 then
text2.text = text1.text * 3
end if
هذا الشرط يقول إن إذا كان صندوق الأول قيمته 5 ، ستكون قيمة الصندوق الثاني مساوية للصندوق الأول × 3 أيضاً ..... هل هناك شيء ما خطأ ! :confused::confused

أوه نعم نسيت شيءً مهماً :D
نسيت ما أقول يمكن عمل عمليات حسابية مثلاً :
text1.text = 1 * 3 / 4 + 6
أو حتى :
text1.text = text4.text / label2.caption + command1.left
ولكن إذا كانت إحداها ليست قيمة عددية سيكون هناك خطأ في البرنامج ، ومن العمليات :
/ قسمة ، + زائد ، - طرح ، * ضرب ( وليس × ) ، ^ أس

على كل حال ، أراكم في الدرس القادم .

الحرية 31-12-2003 04:34 AM

بسم الله الرحمن الرحيم
 
إذا فهمت الدرس السابق ممكن تكمل معانا ، بس إذا ما فهمته مني أرسل لي رسالة خاصة وبأراسلك بالأمثلة التوضيحية أكثر ( كان في هذا الموضوع أو غيره ، أنا ما بأكسح أحد)
---------------------------------------------------
ماذا لو أردنا وضع أكثر من شرط ؟ لو قالت الوالدة لأولادها : اللي يحفظ الدرس أو يكتب الواجب له خمسة ريال ، كيف تسوي هذه الشغلة برمجة ؟؟؟

حسناً ، عندما نكتب أمر برمجي شرطي سيكون هكذا :-
if .... then
جواب الشرط

end if


... هو الشرط ، ولكن هناك عدة طرق لكتابة أكثر من أمر في البرمجة ، وهي حروف العطف ، ( يا كافي الشر يا الله ، أنقلب الدرس لقواعد :confused: ) :

And: وهو الحرف "و" ، وفائدته الجمع المطلق ، أي لن يتنفد جواب الشرط إلا إذا كان الشرطين صحيحين كلها .

Or: وهو الحرف " أو " وفائدته حدث صحة أحد الشرطين ، ول حدث الأثنان تنفذ جواب الشرط أيضاً .

Xor: وهو لا رمز له في العربية :D ، وهو مثل الي قبله إذا تنفذ أحد الشرطين نفذ جواب الشرط ، ولكن لو تنفذ كلهما لن يتنفذ جواب الشرط .

Not: وهو الحرف " لا " ، أي سيتنفذ جواب الشرط إذا لم يتحقق الحاذث .

حسناً شباب هذا درس اليوم ، تمنيت لو كان أطول لأني ولله الحمد أحب الكلام في هذه الأمور ، لا تخافوا إنشاء الله بيكون الكلام واضح في المثال التالي .

الحرية 31-12-2003 04:51 AM

المرفقات 1
عذراً نسيت الدرس ...

الحرية 31-12-2003 01:47 PM

بسم الله الرحمن الرحيم
 
المرفقات 1
لو سمحتوا شباب ، أتمنى لو واحد يساعدني بالبحث عن طريقة ما لتنزيل لغة برمج Visual basic 6 على النت لكي يستفيد الجميع وشكراً .
------------------------------------------------------
درس اليوم بسيط ، وهذه ثانية مرة أكتبة بس بالغلط طار ! ، على كل حال ، لو ... لو ...
لا سأل الأب أبنه الوحيد : هل نجحت ؟ فقال الابن : نعم . فسأل الأب مجدداً : هل تفوقت ؟ فقال : نعم ، فيكرمه الأب على حسب مزاجك ! ، لو تلاحظ لو أن الابن قال لا في السؤال الأول لما سئله الأب عن تفوقه ، لأن التفوق لا يحدث إلا مع النجاح ، ولكن النجاح قد يحدث بدون تطور .

ودرس اليوم سنتعلم اسلوب شرط متتابع مماثل لهذه الحالة ، وتكتب هكذا :-
if .... then
جواب الشرط
if .... then
جواب الشرط
end if
end if

يجب كتابة عباره End if لكل شرط متتابع وإلا طلعت رسالة Error - إلا هذه :angryfire - ، ولا يتأكد من الشرط الثاني إلا إذا كانت قيمة الشرط الأولى صحيحة ، وعلى كل حال شباب هذه لغة برمجة أي يمكننا توصيل الشروط المتتابعة بحروف جر :-
If .... And ... Xor ... then
جواب شرط
IF Not ... And ... Or not ... then
جواب شرط
جواب شرط
If ... then
جواب شرط
end if
end if
end if

على كل حال ، لو سأل الأب أيضاً : من معه مال ؟ ، فقال بعض ابناه : نحن معنا ! فسأل مجدداً : من غيرهم ؟

هنا نوضع صيغة جديدة وهي Else ، وتمثل هكذا :-
if .... then
جواب الشرط
else
جواب الشرط
end if


ولكن يمكن أيضاً وصل غيرهم بشرط هكذا :-
if .... then
جواب شرط
ElseIF .... then
جواب شرط
end if


مع العلم إذا وصلت بإذا بمكننا توصيلها بحروف الجر ، ولكن إذا كان Else منفردة لا يمكنك ربطها بحروف الجر ، وأيضاً else لجميع الحالات التي لا يكون بها الشرط الأول صحيح ، ولا يضاف End if لعبارة else أو ElseIf .

وهذا هو المثال

الحرية 01-01-2004 04:09 PM

بسم الله الرحمن الرحيم
 
المرفقات 1
على فكرة شباب الدرس السادس ( السابق ) مكتوب فيه حروف الجر ، نحن لا نملك حروف جر هنا بل عطف !
---------------------------------------------------------------
قبل ما أبدأ الدرس يجب إطلاعكم على سر خطير جداً ، إن لغات البرمجة كلها عندما تنفذ الأوامر في حدث ما فإنها تبدأ من السطر الأول وتنزل للأوامر كما في المثال التالي :-

10:Text1.Text = 1
20:Text1.Text = Text1.Text + 5
30:Text1.Text = Text1.Text * 2

ففي هذا المثال ، سيتم وضع قيمة للمربع النص أولاً في السطر الأول ، وكما تلاحظ لكل سطر يرمز له بأرقام متتابعة ولكن هذا ليس ضرورياً الآن بل كان ضرورياً في لغة Basic القديمة ، ويمكننا أستخدام بعضها للضرورة ، على كل حال ثم سيتم إضافة 5 على الرقم السابق = 6 ، ثم سيضربها × 5 فتصبح = 30 .

قد يعرف البعض إن الأوامر متتابعه هكذا منذ البداية ، ولكن عند التطبيق لا يعطيه أي أهمية مما يحدث كثير من الأخطاء في البرنامج ، وتذكروا البرنامج الجيد هو الخالي من الأخطاء وسهل الأستخدام هو المعقد في البرمجة ! ( مو لازم ! )

قبل أن أبدأ الدرس ، سأقول : عندما يكون الشرط له جواب شرط واحد يمكننا الإستغناء عن End if وذلك بالطريقة التالية :-
If الشرط Then جواب الشرط

وبهذه الطريقة توفر سطران وهما جواب الشرط و End if أليس هكذا منظم أكثر !

على كل حال ، درس اليوم متعلق بالشرط وهو الإنتقال المشروط ، وفائدته الإنتقال إلى سطر أوامراً ما إذا تحقق الشرط ، وصيغته الأتية :-
If ............. Then GoTo #


ويكتب بدلاً من # رقم معبن ، وكما قلت في بداية الدرس يجب وليس ممكن ، يجب وضع رقم السطر المراد بالذهاب إليه ، ويمثل كالآتي :-


If .... Then GoTO 10:
............
.............
10:.............

في هذا المثال سيتجاوز الأمران بعد الشرط إذا كان الشرط صحيحاً وسينفذ الأمر المكتوب بجانبه 10 وسيستمر لتحت كما في العادة ، ولكنه إذا كانت قيمة الشرط غير صحيحة سيذهب لتحته مباشرة سطر تلوى سطر حتى يصل للعشرة ، وبهذه الطرية لن يفيدك كثيراً ، فإذا أردت طريقة لكي يمر على العشرة فقط إذا كانت قيمة صحيحة أعمل التالي :-

If ........... Then GoTo 10 :
...........
...........
Then (شرط مستحيل) IF
10: ....................
end if


ماذا أقصد بالشرط مستحيل ! ، مثلاُ إذا كان 1 = 2 !!! ، الغرض من الشرط المستحيل هو عندما تكون الشرط في الأول خاطئً سيستمر البرنامج حتى يصل للشرط فلن يحققه فيتجاوزه ، ولكن لو كان الشرط صحيح سينتقل إلى 10 مما يؤذي للتجاوز عن هذا الشرط!

المراد به هذا المثال هو إن المكان الذي سينتقل إليه قد يكون في أي مكان إلا إذا كان في صفحة آخرى فلن يمكنك الإنتقال اليه بهذه الطريقة .

قد يكون الإنتقال قبل الشرط مثل :-

10 : .................
...............
...............
IF ........ Then GoTo 10
:

بهذا المثال سوف ينتقل لشرط قد حققه مسبقاً ، فبهذه الطريقة قد يعود كل مرة للخلف مما يؤذي للتخريف ( يجيم ) الكمبيوتر ! .

لو تلاحظ في بداية الدرس الجدي قلت الإنتقال المشروط ، فهل هناك إنتقال غير مشروط ؟
نعم هناك إنتقال غير مشروط وهو كالتالي :-

GoTo 10:
.........
10: ...........


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

ولكن إنتبه هذه الأداة سبب في كثير من الأخطاء مثل :-
10: ........
..............
GoTo 10:


لو تلاحظ في المثال السابق ستتم حلقة لا منتهية من الأوامر ، وقد هذا يؤذي لتجيم الجهاز .

قد تكون الـأمثلة غير واضحة سابقاُ بسب تشابك اللغة العربية والإنجليزية ! ، ولكن الأرقام مثل 10 تكون أول السطر .

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


Powered by vBulletin Version 3.5.1
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.