تعلم Visual Basic.NET خطوه بخطوه من الصفر حتى الاحتراف

[iMido]

بدون مقدمات طويله هذا الموضوع لتعلم لغه ال Visual Basic .NET
الموضوع مقسم على عده اجزاء
الجزء الاول
لمحه تعريفيه

***************************************
في هذا الفصل سوف نتحدث عن:

الجديد في الدوت نت
تركيبة برنامج الفيجوال بيسك
انواع المشاريع في فيجوال بيسك دوت نت
برنامج Hello World

لا أخفي عليكم أني قمت بالاستعانة من مصادر عديدة لتركيب هذا الفصل ليصدر بالشكل الحالي:


والآن دعونا نناقش ما هي الدوت نت وما جد فيها؟

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


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


2.ما يبن الفيجوال بيسك دوت نت والفيجوال بيسك 6 وما قبل
لا يمكن اعتبار الفيجوال بيسك دوت نت امتداد لفيجوال بيسك فبدخولك الدوت نت فإن فيجوال بيسك 6 ليس لها اي اعتبار سوى الصيغة المشتركة في قواعد البرمجة.

كما أن فيجوال بيسك 6 يستخدم التقنية (Component Object Model) COM أي تقنية برمجة المكونات وهى ActiveX Controls و ActiveX DLL ....إلخ
أما الفيجوال بيسك دوت نت فيعتمد تقنية الدوت نت التي كانت في يوما من الايام ستصدر باسم COM2 ولكن بسبب الاختلاف الجذري مقابل تقنية الCOM عزفوا إلى تسميتها بالاسم الحال .NET




3.ما هو محتوى بيئة التطوير فيجوال بيسك دوت نت؟


كأي برنامج كبير فان الفيجوال بيسك دوت نت يحتوي:

1. شريط القوائم.
2. شريط الأدوات القياسي
3. نافذة الأدوات التي تستخدم في تطوير البرامج
4. نافذة التطوير
5. محرر الكود الخاص باللغة
6. حانة لعرض أخطاء الكود أو اخطاء اخرى وعرض التحذيرات وعرض رسائل موجهة من البرنامج للمطور
7. مستكشف المشروع والذي يوضح تركيبة المشروع من نوافذ ووحدات نمطية ومصادر
8. نافذة الخصائص والتي يمكن بواستطها تعديل خصائص الأدوات المعروضة
9. وصف الخاصية التي يتم التعديل عليها

.أنواع المشاريع في فيجوال بيسك دوت نت

تنقسم المشاريع بشكل عام في بيئة الدوت نت باختلاف اللغة إلى :

أولا: مشاريع الونيدوز

تطبيقات الويندوز
خدمات الويندوز
تطبيقات WPF
تطبيقات الConsole والتي تعمل تحت بيئة الدوت نت والعديد..

ثانيا:مشاريع الويب

تطبيقات الويب
خدمات الويب
أدوات السيرفر
أيضا أدوات الأجاكس والعديد ايضا....

ثالثا:مشاريع الجهاز الذكي




5. البرنامج الشهير Hello World

سوف نتعلم صياغة هذا البرنامج باستخدام الConsole وتطبيق الويندوز

أولا : باستخدام الConsole
أنشئ مشروع Console جديد
جرب الكود التالي:

كود PHP:

Sub Main()
 Console.Write("Hello World") 
 End Sub 


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

كود PHP:

Console.ReadKey() 


ومهمة هذا الكود الانتظار الى أن يقوم المستخدم بادخال مفتاح وبالتالي مهمة هذا الكود قراءة نقرة

ليصبح الشكل الأخير للكود

كود PHP:

Sub Main()
 Console.Write("Hello World")          
    Console.ReadKey()      
    End Sub 


ثانيا:باستخدام تطبيقات الويندوز المرئية


أنشيء مشروع Windows Application

قم باضافة زر Button وواحد TextBox وغير بالخصائص ليصبح بالشكل التالي



وفي هذا الببرنامج يلزمنا عند الضغط على الزر Buttin1 أن يعرض رسالة Hello World في مربع النص
وسيكون بالشكل التالي:

كود PHP:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    TextBox1.Text = "Hello World"      
End Sub 


انتهى الجزء الاول

[iMido]

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


عند فتح الفيجوال بيسك 2008 ستظهر لنا هذه النافذة هنا ويمكنك من خلالها تحديد اللغة
التي ستبرمج بها والية العمل التي تريدها داخل البرنامج والصورة توضح :_


الدرس الثالث :_ الثوابت والمتغيرات .

اولاً الثوابت :-
تنقسم الثوابت في لغة الفيجوال بسيك 2008 إلى ثلاثة اقسام رئيسية وهي نصية او رقمية ومنطقية
ويمكننا تعريف ثابت في البرنامج من خلال الكلمة المحجوزة

كود PHP:

const 


ولاحظ هنا اخي الكريم في الفيجوال بيسك 2008 لا يمكنك تعريف ثابت إلا من خلال المبدأ التالي

كود PHP:

Const   name  as  type  =  value 


كود PHP:

Const   اسم الثابت       as  قيمته =   نوعه 


ولاحظ هنا عند كتابة الثابت لا يمكنك نسب قيمة له إلا في نفس السطر الذي قمت بكتابة الثابت فيه .



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

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

كود PHP:

Const name As String = "mohammed" 


' ثابت من نوع نص

كود PHP:

Const age As Integer = 22 


' ثابت من نوع عدد صحيح

كود PHP:

Const marry As Boolean = False 


' ثابت من نوع قيمة منطقية


الطرق التي من خلالها تستطيع تعريف ثوابت لبرنامج :-

1 - الطريقة التقليدية تعريف ثابت ونسب قيمة له مثل

كود PHP:

Const name As String = "ali" 


2 - كتابة الثابت بدون تحديد نوع له مثل :-

كود PHP:

Const name = "lo2i" 


3 - كتابة اكثر من ثابت مع تحديد القيمة لها في سطر واحد :- مثل

كود PHP:

Const name As String = "mohammed", age As Integer = 22 


4 - كتابة اكثر من ثابت بودن تحديد نوع الثابت مثل

كود PHP:

Const name = "mohammed", age = 33, marry = False 


لاحظ هنا اننا لم نستخدم كلمة تعريف الثابت إلا في بداية الجملة فقط

فوائد الثوابت في البرنامج :_

1- تسهيل البرمجة عندما تريد التعويض بقيمة ثابتة لعدد غير معين من المتغيرات.

فمثلاً اذا اردت ان ان تعٌرف ثابت لعمر اعضاء في المنتدى
اسماؤهم كالتالي :_ أحمد و محمد و لؤي
ونريد اعطاء عمر واحد لكل الاعضاء

كود PHP:

Const age As Integer = 20
Dim person1 As String = "ahmad"
Dim person2 As String = "mohammed"
Dim person3 As String = "lo2i"
MsgBox(person1 & " = " & age & vbCrLf & person2 & " = " & age & vbCrLf & person3 & " = " & age) 


ووظيفة الدالة VBCRLF
هي كالتالي :-
الدالة تعمل على اعطاء سطر جديد في الرسالة ويمكن ايضاً استخدامها في اكثر من مجال
في التيكست وفي اللابيل وفي اكثر من اداة
وضيغتها كالتالي :_ & VBCRLF &
*********************************






2- انها تتعامل مع المصفوفات بكل يسر وسهولة ويمكنها الوصول إلى مصفوفة معينة


================================================== ==========

الاخطاء المتوقعة حدوثها عند تعاملك مع الثوابت :-

اولاً :-
تغيير قيمة الثابت في البرنامج او اثناء التشغيل مثال لذلك :-

كود PHP:

Const age As Integer = 20
        age = 22 


ثانياً:-
تعريف الثابت في سطر ونسب القيمة له في سطر اخر كما قلنا سابقاً .
مثال لذلك ..

كود PHP:

Const age As Integer 
        age = 18 


ملاحظة هامة جداً جداً :- عند تعاملنا مع الثوابت يجب علينا ادخال القيمة للثابت في نفس جملة تعريف الثابت .


ولا حظ هنا انا الفرق بين النقطة الاولى والثانية هي ماسيوضحه هذا الشكل





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


---------------------------------------------------------------------------------------------------
ملاحظة يمكنك عمل ثابت بالبرنامج
بدون تحديد نوعه اي نصي او حرفي مثل

كود PHP:

Const a = "lo2i" 
Const s = 123 
Const x = true 


ولكن في هذه الحالة يمكنك اعطاء اي قيمة كانت له حرفية نصية منطقية(اي قيمة صحيحة او خاطئة)

==================================

ثانياً المتغيرات :-

تعريفها :- موقع محدد في الذاكرةيمكن ان يحتوي بيانات من اي نوع فالمتغير لايعطي قيمة ثابتة بل يمكن تغييرها بعكس الثابت .

الشروط اللازمة لكتابة اسماء المتغيرات في البرنامج:

1 - عدم استخدام الكلمات المحجوزة في البرنامج

كود PHP:

(if       dim      while     do      ......) 


2 - عدم البدء برقم في اسم المتغير مثل لذلك :-

كود PHP:

Dim 1a as string 


3 - يمنع استخدام الرموز في اسماء المتغيرات مثل

كود PHP:

Dim ? as Integer 


4 - يمنع استخدام النقطة او الفاصلة في اسم المتغير مثل :-

كود PHP:

Dim a.1 as string
        Dim a,1 as String 


طرق تعريف المتغيرات في البرنامج باستخدام الكلمة المحجوزة Dim

1 – الطريقة الافتراضية لتعريف المتغيرات

كود PHP:

Dim name As String 


2 - طريقة تعريف متغير منفصل مع نسب القيمة له في نفس السطر

كود PHP:

Dim name As String = "ali" 


3 - طريقة تعريف اكثر من متغير في سطر واحد ويكونوا لنفس النوع (اي كلاهما من نوع نصي او كلاهما من نوع رقمي) مثل لذلك

كود PHP:

Dim f_name, l_name As String 


في هذا المتغير عرفنا متغيريين من نوع نص اسم المتغير الاول
والثاني L_name F_name

4 - تعريف متغيرات مختلفة في نفس السطر (اي مختلفة في النوع اي متغير نصي ومتغير رقمي ومتغير منطقي) مثل

كود PHP:

Dim name As String, age As Integer, marry As Boolean 


لاحظ هنا اننا كتبنا المتغيرات جميعها بكلمة واحد فقط للتعريف وهي Dim

5 - تعريف متغيرات من غير نوع في سطر واحد ونسب القيم لها مثل

كود PHP:

Dim name As String = "mr.mohammed", age As Integer = 12, marry As Boolean = True 


لاحظ اننا عرفنا 3 متغيرات من انواع مختلفة منها النصي ومنها الرقمي ومنها المنطقي..
6 - تعريف متغير من دون ذكر الكلمة Dim مثل :-

كود PHP:

Name="lo2i" 


طرق تعريف المتغيرات في البرنامج :_

باستخدام الكلمة المحجوزة static

1 - يمكنك استخدمها بهذه الطريقة

كود PHP:

Static name As String 


وسيبقى البرنامج محتفظاً بها داخل البرنامج من لحظة تشغيله إلى لحظة ايقافه
المعلومات المستخدمة لاضافة المتغيرات باستخدام الامر Dim
لاتختلف عن طرق اضافة المتغيرات في الاستاتيك static


الفرق بين الكلمتين Dim و static

عندما تريد من المتغير ان يحتفظ باقيمة داخل اجراء خاص فقط تستخدم له هذه الكلمة Dim

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

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


انواع المتغيرات التي يمكن التعامل معها نوضح كل ذلك
من خلال الجدول التالي



ويمكننا القول هنا ان انواع المتغيرات تنقسم إلى ثلاث اقسام رئيسية وهي كالتالي :-
1 - متغيرات عددية .
2 - متغيرات نصية .
3 - متغيرات منطقية.
4 - متغير عام ويحمل كل هذه القيم .

*******************************

سوف اعطي هنا امثلة بسيطة عن المتغيرات النصية

كود PHP:

Dim NAME As String
        Static NAME2 As String
        NAME = "ali"
        NAME2 = "MOHAMMED"
        MsgBox(NAME )& "   " & NAME2 


امثلة عن المتغيرات الرقيمة :_

كود PHP:

    Dim num1 As Integer
        Static num2 As Integer
        num1 = 10
        num2 = 10
        MsgBox(num1) * num2 


امثلة عن العمليات المنطقية في المتغيرات :-

كود PHP:

Dim value As Boolean
        value = True
        value = false
        MsgBox(value) 


مثال على تعريف المتغير العام في البرنامج :-

كود PHP:

Dim s As Object
        s = 12345
        s = 12.345
        s = "mohammed"
        s = "lo2i"
        s = True
        s = False
        MsgBox(s) 


كما قلنا سابقاً يمكننا الاستعان بهذا النوع من المتغيرات اذا كنا غير متأكدين من المدخلات التي يدخلها المستخدم .

*************************************
المتغيرات والمساحات التخزينية التي تأخذها من الذاكرة توضحها الصورة التالية :-



طبعاً اخواني لن نستطيع ان نحصر كل خصائص المتغيرات والثوابت في هذا الدرس

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

منقول #

[iMido]

السلام عليكم ورحمة الله وبركاته
بسم الله الرحمن الرحيم
درسنا اليوم دسم بعض الشيء ويحتاج لشيء من التركيز.
بداية علينا أن نتيقن أن الأنواع في فيجوال بسيك دوت نت لا تقتصر على ما قد طور مع اللغة مثل short int16 int32 single short integer string date point .......إلخ
فربما احتاج أنواع جديدة من المتغيرات والثوابت التي لا تتواجد في فيجوال بيسك دوت نت....لا مشكلة.....اصنعها بنفسك!

سيحتوي الدرس باذن الله على التالي:

التركيبات من نوع Enums
التركيبات من نوع Structure

أولا: التركيبات من نوع Enums
بالنسبة للتركيبات من نوع Enums فهي تستخدم لتعريف أنواع جديدة من التركيبات على وجه الحصر أو التعميم ....كيف ذلك؟؟!
كما نعرف في السنة 12 شهرًا وبما ان عددها ثابت فيمكننا اختصار جهد تكرارها في الشيفرة كالتالي:

كود PHP:

     Enum Month
          Jan
          Feb
          Mar
          Apr
          May
          Jun
          Jul
          Aug
          Sep
          Oct
          Nov
          Dec
End Enum 


لكن ما الذي حدث وما استفيد؟؟
انظر أخي الكريم:
لقد قمنا بصنع تركيبة جديدة واسميناها بالشهر ووضعنا كل شهر داخل التركيبة كجزء منها....
وماذا بعد...؟
الآن علينا معرفة بعض الأمور:

.عند الاستعلام عن عنصر من عناصر الEnum فاننا نستعلم بالشكل التالي:

كود PHP:

      TextBox1.Text =Month.Jan 


وبما أن الثابت Month.Jan لم يتم اسناد قيمة له فسيتم اسناد القيمة الافتراشية له وهي صفر ..لماذا؟
العنصر الأول من عناصر تركيبة الEnum تبدأ من الصفر والعنصر الثاني يساوي السابق+1 والثالث يساوي السابق+1 وهكذا إلى أن نصل إلى العنصر Month.Dec فسنراه يحمل القيمة 11 ولك التجربة
.يمكن اسناد قيم وقت صنع التركيبة كالتالي:

كود PHP:

     Enum Month
          Jan = 22
          Feb = 5
          Mar = 23
          Apr
          May
          Jun
          Jul
          Aug
          Sep
          Oct
          Nov
          Dec
 End Enum 


كود PHP:

      TextBox1.Text =Month.Mar 


وكما نرى فان العنصر Month.Mar يحمل القيمة 23 والعنصر التالي سيحمل القيمة السابقة + 1 حسب ما ذكرنا في الأعلى .

كود PHP:

      TextBox1.Text =Month.Apr 


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

ونص رسالة الخطأ يقول:Constant cannot be the target of an assignment أي أنه الثابت لا يمكن أن يكون هدفا لعملية تعيين.(أي اسناد قيمة)
اذن يمكن استخدام الEnum في استخدامات الثوابت

ملاحظة : جميع قيم الEnum في المثالين السابقة من النوع Integer كما يمكن تغيير نوعها لLong او Short او ما الى ذلك(أقصد المتغيرات العددية الصحيحة)
مثال:

كود PHP:

Enum Month as Long
Jan
Feb
....
....
 End Enum 


والآن دعونا نتطرق قليلا الى موضوع مرتبط بالمتغيرات والثوابت ألا وهو محدودية المتغيرات والثوابت (بمعني آخر أين يمكنني استخدامها) .... يمكنك تحديد محدودية الEnum كالتالي:
عندما تريد الEnum عامة ومستخدمة من جميع وحدات المشروع عليك سبقها ب Public أو بلا شيء
مثال:

كود PHP:

Public Enum Month As Long
Jan
Feb
....
....
 End Enum 


أو

كود PHP:

     Enum Month As Long
Jan
Feb
....
....
End Enum 


وإن كنت حصرها داخل الوحدة البرمجية المعلنة بها فعليك سبقها ب Private
مثال:

كود PHP:

     Private Enum Month As Long
Jan
Feb
....
....
End Enum 


ملاحظة أخيرة: علينا وضع التركيبة خارج أي حدث لان ذلك سوف يحدث خطأ برمجي:
مثال:

كود PHP:

     Public Class Form1
 'لا مشكلة
     Enum Month
        Jan
        Feb
        Mar
        Apr
....
....
End Enum
End Class 


[PHP] Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'هنا المشكلة
Enum Month
Jan
Feb
Mar
Apr
....
....
End Enum
End Sub
[/PHP]
___________________________________
ثانيا: التركيبات من نوع Structure
يعرف هذا النوع من التركيبات بالانواع المعرفة من قبل المستخدم(User Defined Type-UDT)
ويمكن دمج العديد من المتغيرات والتركيبات داخل التركيبة الأم باستخدام الكلمة المحجوزة Structure
نعرف انه لدينا متغيرات من النوع String و Integer وDate وما الى ذلك.
لكن هل يمكنني صياغة متغير بالكيفية التي اريدها....لم لا؟
هذا النوع من المتغيرات يسمى Structure والتي دعمت ببيئة الدوت نت اكثر من ذي قبل
الآن نريد صنع متغير من نوع سيارة اي صنع خاص لا يعرفه فيجوال بيسك دوت نت...لكن قبل ذلك علينا تحديد العناصر التي تدخل في مكونات السيارة وهي الاسم والموديل والسعر والسعة وتاريخ الصناعة وتاريخ التصدير..... وما الى ذلك

مثال:

كود PHP:

     Structure Car
        Dim Name As String
        Dim cost As Integer
        Dim Model As String
End Structure 


استخدام المتغير الجديد بالضبط كاستخدام المتغير العادي
مثال:

كود PHP:

     Dim NewCar As Car
        NewCar.Name = "Mercedes"
        NewCar.cost = 15
         'طبعا انا ما بعرف ايش موديلاتها بس للتوضيح مش اكثر
        NewCar.Model = "Gaosdh/#25"

        MsgBox("Name: " & NewCar.Name & vbCrLf & "Cost: " & (NewCar.cost).ToString & vbCrLf & "Model: " & NewCar.Model 


والناتج من هذه العملية:


لعلك لاحظت شيئا: عندما قمنا بربط المعطيات داخل الرسالة فان الجزء NewCar.Cost الحقناه بالدالة .ToString ......ما وظيفتها...؟!
عندما قمنا بربط نصوص في محتوى الرسالة رأينا أن هناك معطى يلزم ربطه لكنه خارج عن الجماعة(جماعة النصوص) ولكي يتم التلاءم قمنا بتطبيق الدالة ToString عليه والتي تقوم بتحويل المعطى من قيمة عددية الي نصية ليتم الربط بسلام (يمكن تشبيهها بالدالة Str()) في لغة الفيجوال بيسك 6



الآن دعونا نتعمق أكثر
يمكن للتركيبة من Structure أن تحتوي على تراكيب داخلية الأمر الذي يطلق عليه تراكيب متداخلة
Nested Structures
كيف ذلك ولماذا..؟
الآن دعنا نرجع قليلا الى السيارة ...نريد ألحاق مكون آخر للسيارة وهو تاريخ الانتاج وتاريخ التصدير..هل يتوجب علينا جعل كل مكون منفصلا عن الآخر؟
ليس تماما .. كما نعلم فان كلا المكونين من النوع Date والذي يمكن اجماله بالشكل التالي:

كود PHP:

     Structure Car
        Dim Name As String
        Dim cost As Integer
        Dim Model As String
  
      Structure DateOfx
            Dim Produce As Date
            Dim Export As Date
        End Structure

Dim DateOf As DateOfx
End Structure 


ما الذي حدث؟
الآن قمنا بادخال تركيبة التواريخ داخل تركيبة مكونات السيارة والذي يمكن استخدامه بالصورة التالية:

كود PHP:

     Dim NewCar As Car
        NewCar.Name = "Mercedes"
        NewCar.cost = 15
        NewCar.Model = "Gaosdh/#25"
        NewCar.Dateof.Produce = #11/29/2003#
        NewCar.Dateof.Export = #11/29/2005#

        MsgBox("Name: " & NewCar.Name & vbCrLf & "Cost: " & (NewCar.cost).ToString & vbCrLf & "Model: " & NewCar.Model & vbCrLf & "DateOf Produce: " & NewCar.Dateof.Produce & vbCrLf & "DateOf Export: " & NewCar.Dateof.Export 


والناتج:

كما يمكننا تضمين أحداث داخل التركيبة والتي ساوجزها وساخصص للاحداث فصل كامل ان شاء الله
مثال بسيط:

كود PHP:

Structure Car
      
        Structure DateOfx
            Dim Produce As Date
            Dim Export As Date
        End Structure
   
     Dim Name As String
        Dim cost As Integer
        Dim Model As String
        Dim Dateof As DateOfx
        
Sub CloseForm(ByVal frm As Form)
        frm.Close()
End Sub 


End Structure


ويستخدم كالتالي:

كود PHP:

      NewCar.CloseForm(Me) 


الذي حصل اننا صنعنا حدث أو اجراء يقوم باغلاق النموذج الذي تم تمريره وهنا مررنا للاجراء النموذج Me وهو النموذج قيد التطوير

بهذا نكون قد انهينا درسنا لهذا اليوم ان شاء الله
بانتظار القادم باذن الله
منقول#

[iMido]

السلام عليكم ورحمة الله وبركاته
بسم الله الرحمن الرحيم
درسنا لليوم ان شاء الله سيتحدث عن المصفوفات(من الموضوعات ذات الأهمية الكبرى في عالم البرمجة)

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

سوف نقوم بشرح هذا الفصل تحت مشروع الConsole
قم بفتح مشروع Console جديد وسوف نوضح تعريفنا السابق...

كود PHP:

Sub Main()
        Dim Days(6) As String
        Dim i As Integer

        Days(0) = "Saturday"
        Days(1) = "Sunday"
        Days(2) = "Monday"
        Days(3) = "Tuesday"
        Days(4) = "Wednesday"
        Days(5) = "Thursday"
        Days(6) = "Friday"

        For i = 0 To 6 Step 1
            Console.Write(Days(i))
            Console.WriteLine()

        Next
        Console.ReadKey()
    End Sub 


مداخلة: بالنسبة لبعض الأكواد
الامر

كود PHP:

 Console.Write(String) 


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

الأمر

كود PHP:

Console.WriteLine() 


يقوم بطباعة سطر جديد

الأمر

كود PHP:

 Console.ReadKey() 


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

بالنسبة للحلقة باستخدام For سوف نضع لها فصلا كاملا ان شاء الله في القريب
كذلك مشروع الConsole سنوضحه في فصل كامل وباختصار هو يستخدم للاشياء البسيطة كدرسنا كما يستخدم في العمليات الخفيفة كالنسخ والحذف وما الى ذلك...





الآن كما نرى فاننا قمنا بحجز مصفوفة كنص باسم Days و وجعلنا عناصرها 7 عناصر...كيف؟؟
في فيجوال بيسك دوت نت نعلن عن المصفوفة بالشكل التالي:

كود PHP:

Dim Array(n) As Type 


بحيث أن عدد عناصر المصفوفة يساوي n+1
والآن هل لاحظت أن أول عنصر تبدأ فهرسته من صفر
لعلك عرفت أن n ترمز إلى فهرس المصفوفة
فإذا أردنا استخراج أو اسناد قيمة للعنصر(النوني n ) في المصفوفة فنرمز له باسم المصفوفة وبداخل القوسين العدد n-1
باختصار: كما رأينا المصفوفة عبارة عن (متغير أو ثابت) يحمل عدة قيم بسحب المحجوز من البداية...


الآن فلنتعمق أكثر(لكن لن نغرق باذن الله)
المصفوفات لا تقتصر على ما شرحناه فهي اكبر من ذلك ... والآن سندخل في أنواع المصفوفات

أنواع المصفوفات

الآن تقسم المصفوفات الى أكثر من نوع:

مصفوفات أحادية الرتبة
مصفوفات ثنائية الرتبة
مصفوفات متعددة الرتبة

أولا: المصفوفات أحادية الرتبة..
اعلم عزيزي أن المثال بالأعلى هو عبارة عن مصفوفة أحادية الرتبة
المصفوفة أحادية الرتبة تتكون من صف واحد وعدة أعمدة أو عمود واحد وعدة صفوف
طريقة الإعلان:

كود PHP:

Dim Array(n) As Type 


مثال:

كود PHP:

Dim MyLovers(3) As String
MyLovers(0) ="MOHAMMED"
MyLovers(1) = "Lo2i"
MyLovers(2) = "7hoooda"
MyLovers(3) = "The Rest" 


الآن كما رأينا قمنا بحجز مصفوفة من 4 عناصر(3+1)
وقمنا باسناد قيمة لكل عنصر حسب فهرسته في المصفوفة( مش قلنالك هينة..!)

ثانيا: المصفوفات ثنائية الرتبة..
الآن دعنا نرتفع بالسلم درجة للأعلى...
المصفوفة ثنائية الرتبة :هي المصفوفة التي تكون رتبتها مقيدة برقمين (كتشبيه ثنائية الأبعاد)
وعدد عناصر المصفوفة تساوي عدد الصفوف مضروبا بعدد الأعمدة

طريقة الإعلان:

كود PHP:

Dim Array(m,n) As Type 


مثال:

كود PHP:

Dim ages(2, 2) As Integer 
        ages(0, 0) = 1 
        ages(0, 1) = 2 
        ages(0, 2) = 3 
        ages(1, 0) = 4 
        ages(1, 1) = 5 
        ages(1, 2) = 6 
        ages(2, 0) = 7 
        ages(2, 1) = 8 
       ages(2, 2) = 9 


لكن ما الذي حدث؟
اقتباس:
_______________
عدد عناصر المصفوفة تساوي عدد الصفوف مضروبا بعدد الأعمدة
_______________

لكن عدد عناصر المصفوفة 9 والمفروض 2*2 =4
احذر عزيزي من الوقوع في هذا الخطأ الفادح....كما قلنا بالأعلى فان رتبة المصفوفة (فهرستها) تبدأ من الصفر أي أن عدد عناصر المصفوفة أعلاه لا يساوي 2*2 بل يساوي (2+1)*(2+1) = 3*3 =9

ثالثا:المصفوفة متعددة الرتبة وتكون ثلاثية الأبعاد وطريقة الحجز كالتالي:

كود PHP:

Dim Array(x,y,z) As Type 


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


طرق حجز المصفوفات في الذاكرة
الطريقة الأولى:طريقة الحجز باعطاء الرتبة ثم إسناد القيم....كما جميع الأمثلة السابقة..
الطريقة الثانية: الحجز بدون اعطاء الرتبة مع الاسناد المباشر للقيم
مثال:

كود PHP:

    Dim vba4a() as string ={“mohammed”,”7hoooda”,hitmaker”,”lo2i”} 


وبالتالي يقوم المترجم تلقائيا بحجز مصفوفة بعدد عناصر المصفوفة المعطاة

[iMido]

محجوز

[iMido]

والله الموضوع لسا ليه عندى بتاع 16 جزء

الحجز ده مش سبااام

[Black Shield]

انا مستني باقي الموضع

[Alone iN The Sky]

thx

هقراه كامل اما يكتمل

[Little.Tornado]

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

[Mishary Alafasy]

مــا شاء الله عليـك، مـوضـوع مميــز، أكيـد أعجبنـي المـوضـوع

أكمــل بالمـزيـد :)

[iMido]

ان شاء الله يا شباب الموضوع هيطرقع
و اى سؤال انا موجود
بس متقطع بسبب الدراسه

[°•.♥ H3ll King ♥.•°]

مـمـيـز

[♥ ♥.•°YoYo°•.♥ ♥]

موضوع مميز يا معلم
تسلم ايديك

[iMido]

المشاركة الأصلية كتبت بواسطة y0y0_We_Bs عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

موضوع مميز يا معلم
تسلم ايديك

و لسه يا حبى

[Sky_AnGel]

شكرا على الشرح يا برنس