أنت غير متصل حاليًا، وفي انتظار الإنترنت الخاص بك ليقوم بإعادة الاتصال

كيفية ربط عنصر تحكم DataGrid ArrayList من الكائنات أو بنيات باستخدام 2005 Visual Basic أو Visual Basic .NET

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

اضغط هنا لرابط المقالة باللغة الانجليزية316302
للحصول على إصدار Microsoft Visual C# .NET من هذه المقالة، راجع 316303.
الموجز
توضح هذه المقالة خطوة بخطوة حول كيفية ربط ArrayList الكائنات إلى عنصر تحكم DataGrid. المثال يتكون من Microsoft Windows نموذج مع عنصر تحكم DataGrid لعرض قيم الخصائص الكائن أربعة أزرار الأوامر استعراض الصفوف التحكم DataGrid.

متطلبات

توضح القائمة التالية الأجهزة الموصى بها برامج البنية الأساسية للشبكة و حزم الخدمات المطلوبة:
  • Microsoft Visual Basic 2005 أو Microsoft Visual Basic .NET
تفترض هذه المقالة كنت معتاداً على المواضيع التالية:
  • مفاهيم البرمجة Visual Basic

تصميم الفئة

يجب أن يكون فئة التي سيتم ربط عنصر تحكم accessors الخاصية. يجب أن يكون أي خاصية يتم ربط مجموعة خصائص و إحضار خصائص أساليب. تحتوي فئة نموذج المستخدمة في هذه المقالة ثلاثة أعضاء (واحد فقط تظهر هنا.) تم توفير أيضاً منشئ بمعلمات ولكن غير متطلبات.
Public Class guitar    Private m_make As String    Private m_model As String    Private m_year As Short    Public Sub New(ByVal make, ByRef model, ByVal year)        m_make = make        m_model = model        m_year = year    End Sub    Public Property make() As String        Get            Return m_make        End Get        Set(ByVal Value As String)            m_make = Value        End Set    End Property    End Class				

إضافة مثيلات الفئة إلى ArrayList

إنشاء مثيلات وإضافتها إلى ArrayList اتبع الخطوات التالية:
  1. قم بتعريف ArrayList.
  2. إنشاء مثيلات الفئة ثم قم بإضافة المثيلات إلى ArrayList.
Private al as New Arraylist()al.Add(New guitar("Gibson", "Les Paul", 1958))al.Add(New guitar("Fender", "Jazz Bass", 1964))al.Add(New guitar("Guild", "Bluesbird", 1971))				

ربط في ArrayList DataGrid

بعد أن يتم تعبئة المشتركة(SSP) ArrayList تعيين الخاصية DataSource لعنصر التحكم DataGridArrayList. يتم تعبئة الأعمدة الموجودة في عنصر التحكم DataGrid تستند إلى خصائص موجودة التي accessors الخاصية في النطاق.
DataGrid1.DataSource = al				

توفر وسيلة استعراض في ArrayList

يمكنك استخدام CurrencyManager لاستعراض ArrayList. للقيام بذلك، قم بإقران CurrencyManagerBindingContext عنصر التحكم (في هذه الحالة، ArrayList).
Private cManager As CurrencyManagercManager = CType(DataGrid1.BindingContext(al), CurrencyManager)				
تحتوي فئة CurrencyManager خاصية موضع يمكنك معالجة تكرار عبر أعضاء ArrayList. عن طريق إضافة إلى أو طرح من قيمة الموضع الحالي, يمكنك استعراض الصفوف التحكم DataGrid.
'Move forward one element.cManager.Position += 1'Move back one element.cManager.Position -= 1'Move to the beginning.cManager.Position = 0'Move to the end.cManager.Position = al.Count - 1				

المثال خطوة بخطوة

  1. في Visual Basic2005 أو في Visual Basic .NET إنشاء مشروع جديد تطبيق Windows. يتم إنشاء Form1 بشكل افتراضي.
  2. من القائمة المشروع انقر فوق إضافة فئة لإضافة فئة إلى المشروع.
  3. استبدال الرمز في Class1.vb التالية:
    Public Class guitar    Private m_make As String    Private m_model As String    Private m_year As Short    Public Sub New(ByVal make, ByRef model, ByVal year)        m_make = make        m_model = model        m_year = year    End Sub    Public Property make() As String        Get            Return m_make        End Get        Set(ByVal Value As String)            m_make = Value        End Set    End Property    Public Property model() As String        Get            Return m_model        End Get        Set(ByVal Value As String)            m_model = Value        End Set    End Property    Public Property year() As Short        Get            Return m_year        End Get        Set(ByVal Value As Short)            m_year = Value        End Set    End PropertyEnd Class					
  4. إغلاق إطار التعليمات البرمجية Class1.vb ومن ثم التبديل إلى "مصمم النموذج".
  5. إضافة عنصر تحكم DataGrid إلى Form1. حجم عنصر تحكم DataGrid لاحتواء أربعة أعمدة وصفوف الثلاثة.
  6. إضافة أربعة عناصر تحكم زر إلى Form1 ومن ثم ترتيب الأزرار أفقياً.
  7. تغيير الخاصية Text Button1 إلى التالي.
  8. تغيير الخاصية Text Button2 إلى السابق.
  9. تغيير الخاصية Text Button3 إلى الأول.
  10. تغيير الخاصية Text Button4 إلى آخر.
  11. قم بإضافة التعليمات البرمجية التالية إلى فئة Form1:
    Private cManager As CurrencyManagerPrivate al as New ArrayList()					
  12. قم بلصق التعليمة البرمجية التالية في الحدث Form1_Load:
    al.Add(New guitar("Gibson", "Les Paul", 1958))al.Add(New guitar("Fender", "Jazz Bass", 1964))al.Add(New guitar("Guild", "Bluesbird", 1971))				cManager = CType(DataGrid1.BindingContext(al), CurrencyManager)	DataGrid1.DataSource = al					
  13. قم بلصق التعليمة البرمجية التالية بعد إجراء Form_Load:
        Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click        cManager.Position += 1    End Sub    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click        cManager.Position -= 1    End Sub    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click        cManager.Position = 0    End Sub    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click        cManager.Position = al.Count - 1    End Sub					
  14. لإنشاء المشروع وتشغيله.
  15. انقر فوق زر الأمر إلى الانتقال بين الصفوف التحكم DataGrid. لاحظ أنه يمكنك تحرير قيم الكائنات إذا رغبت في ذلك.

استخدام بنية بدلاً من فئة

قواعد الربط بنية هي نفس قواعد ربط كائن. accessors الخاصية (أي، عضو) مطلوبة. بنية الذي تم إنشاؤه لهذا الغرض يشبه فئة.

لربط ArrayList لأبنية اتبع الخطوات التالية:
  1. تغيير تعريف فئة Class1.vb الوحدة النمطية في المثال من
    Public Class guitar'...End Class					
    التالي:
    Public Structure guitar'...End Structure					
  2. إنشاء قم بتشغيل برنامج المثال مرة أخرى ثم التحقق من عمله مع ArrayList بنية.
مراجع
لمزيد من المعلومات، راجع الموضوع "بالعملاء على Windows نماذج البيانات" في Visual Studio .NET Online تعليمات.

تحذير: تمت ترجمة هذه المقالة تلقائيًا

خصائص

رقم الموضوع: 316302 - آخر مراجعة: 12/06/2006 23:26:02 - المراجعة: 3.3

Microsoft Visual Basic 2005, Microsoft Visual Basic .NET 2003 Standard Edition, Microsoft Visual Basic .NET 2002 Standard Edition

  • kbmt kbvs2005swept kbvs2005applies kbhowtomaster KB316302 KbMtar
تعليقات
=">/html>