OOP VB .Net Toturials and Examples - دروس فى ال أو أو بى

تعرفنا على مفهموم الــ Sub .

C- Sub & Function Concept :
مفهوم الاجراءات و الدوال

صورة رقم (7)

- كيف نصنع الدوال و كيف نستخدمها فى بيئة الــ .Net ؟؟
لكى نجيب على هذا التساؤل سنقوم بشرح مثال عملى ...


- قم بعمل مشروع جديد يحتوى على Form تحتوى على Button ... كما بالصورة رقم 7.
- من داخل الــ Form سنكتب الكود الاتى :
Private Funcrion Sum(ByVal X As Integer,ByVal Y As Integer)
Return X + Y
End Function
معناه أن الدالة Sum نرسل لها قيمتين X,Y ثم عملية جمع و الرجوع بالنتيجه (هذا هو عمل الداله Sum).
لاظهار النتيجه :
فى الحدث Button1_Click نكتب :
MsgBox Sum( 5 + 6 )
قم بتجربة المشروع و لاحظ النتيجه هى 11
بالرجوع للمثال السابق ... نضيف Class جديد للمشروع .
و مره أخرى معنى Class : هو عبارة عن وحده تحتوى على مجموعه من الاجراءات مثل (Sub - Function - Variables - Events - ....... etc) .... و أهم اجرائين فى الـ Class هما : Constructor - Destructor حيث (Constructor) هو بادىء الــ Class بينما (Destructor) هو ناهى الـ Class .... انظر الصورة رقم (8).


صورة رقم (8)



الصورة توضح Class اسمه Ahmed يحتوى على Sub اسمة New1 عباره عن كود واحد و يبدأ الـ Class بهذا الاجراء و بالتالى فان الاجراء New1 هو Constructor للــ Class أى ان عند استدعاء الـ Class فان أول كود سيتم تنفيذه هو الاجراء New1 و فى بعض الاحيان فإن الــ Constructor يستخدم فيه أكواد الحمايه للــ Class أو التعليقات الخاصه بمبرمج الـــ Class حيث أن اجراء Constructor أول ما يتم تنفيذه.
الان سنضيف Button الى الــ Form و عند الحدث Button2_Click سنكتب الاتى :
Dim A As New Ahmed
A.New1
الان قم بتنفيذ المشروع ستلاحظ تنفيذ هذا الكود الموجود بالاجراء New1 و الذى هو الــ Constructor للـ Class .
ثم نضيف اجراء اخر بعد الاجراء New1 و ليكن New2 كالتالى ....
Sub New2
MsgBox ("Im Just A Sub")
End Sub
ثم فى الحدث Button2_Click نكتب الاتى :
B.New2
قم بتنفيذ المشروع ستلاحظ أنه قام بتنفيذ الــ Constructor أولا و هو الاجراء New1 ثم قام بتنفيذ الاجراء الثانى New2
- كيف نبنى Class على متغيرات ؟
- قم بعمل مشروع جديد يحتوى على Form تحتوى على Button ... كما بالصورة رقم 7.
- قم باضافة Class باسم Class1 .
- من داخل الــ Class سنكتب الاكود الاتى :
Sub New(ByVal XX As Integer, ByVal YY As Integer)
x = XX
y = YY
End Sub
Public X As Integer
Public Y As Integer
- ما نراه الان هو اجراء باسم New مبنى على متغيران هما XX و YY و كلاهما
اجبارى و كلاهما رقمى , لاحظ انه بعد انتهاء الاجراء بــ End Sub قمنا بتعريف
متغيرين أخرين هما X و Y واعطينا كلا منهما نوع رقمى لأننا سنساويهما بالمتغيرين XX و YY أى انه حتى اذا انتهى الاجراء فى Class فانه يمكن استدعاءة فى نفس الــ Class الموجود به .
- كيف نستفيد بهم فى الــ Form ؟؟
- أولا الاجراء مكتوب فى الــ Class و هذا معناه أنه يؤثر على مستوى المشروع بالكامل .
- سنذهب الى الـ Form و نقوم باستدعاء الـ Class بهذا الكود ...
Dim  C As New Class1(10, 20)
هذا الكود معناه أن C اصبحت تمثل Class1 أى أن ذاكرة الكميوتر عند تنفيذ هذا الكود يتقوم بتخزين C على أنه Class1 أو نسخه جديده منه و سنقوم بالتعويض عن كلا من XX و YY بالرقمين 10 و 20 .
و هذا ايضا معناه أن كلا من XوY مساويان للرقمين 10و20 ...
نذهب للحدث Button1_Click و نكتب الكود :


MsgBox(C.X & " " & C.Y)
نلاحظ ان عند كتابة C التى ترمز الى الـ Class ثم (.) ظهر تلقائيا كلا من XوY و لم يظهر XXوYY لأن ...........
 XXوYY هما متغيرات الاجراء New بينما XوY هما متغيرات الــ Class بالكامل و لذا قمنا بمساواتهم بكلا منXXوYY حتى نخرج بنتيجه من التعويض بالرقمين 10و20 .
قم بتجربة المشروع و غير مكان المتغيرات داخل الـ Class و داخل الـ Sub و داخل الـ Form ولاحظ الفرق حتى تتعرف أكثر على الاجراء ...
- هل يمكن عمل أكثر من Constructor فى الــ Class ؟؟
نعم يمكن عمل أكثر من Constructor و تسمى هذه العمليه OverLoading

vb.net

OOP Toturial Index Polymorphism VB 2010 VB 2010 Optimization object oriented programming vb.net vb.net OOP Crystal Report Freelance Optimization VB 2010 MS-Access 2003/2007 ADO.Net visual basic course Crystal report and VB .net Earn money programming - Programmer Jobs Online Online courses VB2010 Receive E-mail Search Optimization Sql Server Visual Basic Visual Basic 2010 online courses Visual Basic Job online visual basic courses pop server pop3 visual basic courses online visual basic online courses ADO.Net online mode Insert Date into SqlServer using VB.Net Install Crystal report No error message available SqlServer VB 2010 DataGridView Visual Basic .Net and SQL Server Date-Time Visual Basic .net Visual Basic Class connecting to access database via dao using vb.net. database e-mail .net framework 4.5.2 Activate Visual Studio 2005 Advantage Data Dictionary Advantage Database Visual Basic 2010 Binary Diff Buttons sound in VB 2010 CR for VS2015 CRforVS2015 Check internet connection Command Prompt Communicate with a client Compare two applications Compare two strings and return differences Compare two treeviews Conversion from type 'DBNull' to type 'String' is not valid Crystal Report with Protected MS-Access database DAO + VB .NET + ACCESS DataGridView VB 2010 Programming DataGridView with MS-Access DataReader DevExpress 12.2.9 Serial crack full DevExpress VB.Net DevExpress full Download DevExpress 12 Dxperience 12.2.4 Dxperience full serial crack Event Planning Example on connecting to Advantage Data Dictionary from VB.Net FC Command Fade Image VB 2010 MS Access 2010 MS SQL SERVER 2000 INSTALLATION MS VB.Net MS-Access 2007 2010 MS-Access Compact and Repair from VB 2010 Programmatically Make sure application is running Microsoft Visual Basic .Net Math Functions list OOP Lesson 11 OOP Lesson 12 OOP Lesson 6 OOP Lesson 7 OOP Lesson 8 OOP Lesson 9 OOP Lesson13 OOPTutorials POP3 Commands in VB 2010 Point of sale application Purchase Receive E-mail from Gmail in VB 2010 Requirement Doc Reverse Strings SQL Server 2000 SQL Server 2000 date-time type Sales and Stores application Source code download Sql Server and VB.Net The Microsoft.ACE.OLEDB.12.0 provider is not registered on the local machine The following control could not be licensed There is already an open DataReader associated with this Command which must be closed first Toolbox items Topmost - Inputbox Sloved Tx TxtControl for Visual Basic Use case definition VB 2005 Activation Code VB 2010 Compare and return differences VB 2010 Create Controls at Run-Time with events VB 2010 How to fade Image VB 2010 Internet VB 2010 Read Text Files VB 2010 Reverse Strings VB 2010 check for internet connection VB 2010 database compact and repair VB 2010 progressbar VB.Net Math functions VB.Net Search Optimization VB.net SqlServer 2000 VB.net lessons VB2010 VS 2051 VS2010 VS2015 VS2017 VS2019 Virus W32.Sality Visual Basic Application Development Visual Basic Virus Visual Studio Serial Number book classes vb compare windows applications and return the difference. crystalDecision older version download crystal report for VB 2010 dtSearch dtSearch Engine dtSearch Engine download full free free make sure application is installed object oriented programming languages oop Lesson 10 play sounds in Visual Basic.net progress bar result code: DB_SEC_E_AUTH_FAILED(0x80040E4D). sqlserver2000 vb.net project (new-save-edit-delete) the application failed to initialize properly 0xc000007b tutorials vb .Net functions list. vb 2010 Create TextBox with events at Project Runtime vb 2010 receive Emails visual basic .Net FlexGrid visual basic courses win10 32 bit solution برنامج المشتريات و المبيعات و المخازن
Show more