تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كيف ابدي اتعلم المكتبات
#1
سلام عليكم 


اريد ابدي اتعلم المكتبات في الفيجوال بيسك دوت نت بس مااعرف كيف ابدي ممكن نصائح
سبحان الله وبحمده سبحان الله العظيم 
الرد }}}
تم الشكر بواسطة:
#2
يا ابراهيم،

مشاركتي كبداية فقط، وإلا الموضوع كبير

المكتبات ممكن تحتوي عادة متغيرات بمختلف انواعها وتحتوي أيضاً إجراءات روتينية ودوال وأخرى

أبسط مثال لعمل مكتبة تختار عند إنشاء مشروع Class Library وسيكون في البداية شبيه بهذا (إذا ترك الاسم الافتراضي كما هو)
PHP كود :
Public Class Class1

End 
Class 

وبداخله ضع ما تريد من متغيرات عامة وتكون مبتدأه ب Public وكذلك الحال الروتينات والدول وغيرها مثل
PHP كود :
Public Class Class1

    Private myprivatename 
As String "mahmood"

 
   Public thpublicname As String "mohammad"

 
   Private Sub theprivatemsg(msg As String)
 
       MsgBox("Private: " msg)
 
   End Sub

    Public Sub thepublicmsg
(msg As String)
 
       MsgBox("Public: " msg)
 
   End Sub

End 
Class 

الآن عندما إضافة المكتبة لمشروع سيكون التعامل معها يشبه التالي ولكن سترى فقط كل ما بدأ ب Public
PHP كود :
Imports ClassLibrary1

Public Class Form1

    Private Sub Button1_Click
(sender As System.ObjectAs System.EventArgsHandles Button1.Click

        Dim cls 
As New Class1

        cls
.thepublicmsg("Hello word!")

 
   End Sub

End 
Class 
الرد }}}
تم الشكر بواسطة: ابراهيم كركوكي
#3
(14-08-16, 11:22 PM)الوادي كتب : يا ابراهيم،

مشاركتي كبداية فقط، وإلا الموضوع كبير

المكتبات ممكن تحتوي عادة متغيرات بمختلف انواعها وتحتوي أيضاً إجراءات روتينية ودوال وأخرى

أبسط مثال لعمل مكتبة تختار عند إنشاء مشروع Class Library وسيكون في البداية شبيه بهذا (إذا ترك الاسم الافتراضي كما هو)
PHP كود :
Public Class Class1

End 
Class 

وبداخله ضع ما تريد من متغيرات عامة وتكون مبتدأه ب Public وكذلك الحال الروتينات والدول وغيرها مثل
PHP كود :
Public Class Class1

    Private myprivatename 
As String "mahmood"

 
   Public thpublicname As String "mohammad"

 
   Private Sub theprivatemsg(msg As String)
 
       MsgBox("Private: " msg)
 
   End Sub

    Public Sub thepublicmsg
(msg As String)
 
       MsgBox("Public: " msg)
 
   End Sub

End 
Class 

الآن عندما إضافة المكتبة لمشروع سيكون التعامل معها يشبه التالي ولكن سترى فقط كل ما بدأ ب Public
PHP كود :
Imports ClassLibrary1

Public Class Form1

    Private Sub Button1_Click
(sender As System.ObjectAs System.EventArgsHandles Button1.Click

        Dim cls 
As New Class1

        cls
.thepublicmsg("Hello word!")

 
   End Sub

End 
Class 
شكرا
سبحان الله وبحمده سبحان الله العظيم 
الرد }}}
تم الشكر بواسطة: الوادي



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم