كيفية إرجاع صفيف كتابة بشدة من أسلوب ToArray(type) باستخدام 2005 Visual Basic أو Visual Basic .NET

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

اضغط هنا لرابط المقالة باللغة الانجليزية312389
تمت أرشفة هذه المقالة. وتظهر "كما هي" ولن يتم تحديثها بعد الآن.
الموجز
توضح هذه المقالة كيفية استخدام Microsoft Visual Basic 2005 أو Microsoft Visual Basic .NET لإرجاع صفيف كتابة بشدة من أسلوب ToArray(type). يتم تطبيق هذا المقال 2005 Visual Basic أو Visual Basic .NET إذا قمت بتعيين الخيار Strict. إذا قمت بتعيين خيار التقّيد إيقاف يسمح Visual Basic التحويل الضمني الموضح في المقالة.

الأسلوب ToArray أقل المعلمة من فئة ArrayList بإرجاع صفيف نوع الكائن. يتعذر استخدام تطبيق أقل المعلمة ToArray تحويل الصفيف كائن إلى يف نوع الخاص بك. على سبيل المثال، إذا قمت بإضافة عدد الكائنات العملاء إلى ArrayList القائمة الأساسية غير إجراء صفيف العملاء. يؤدي هذا إلى فشل باستثناء System.InvalidCastException العبارة التالية.
Dim custArray() As customer = CType(myArrayList.ToArray(), customer())				
للعودة صفيف كتابة بشدة استخدام الأسلوب ToArray overloaded يقبل نوع كائن كمعلمة. على سبيل المثال، نجاح العبارة التالية.
Dim custArray() As customer = CType(al.ToArray(GetType(customer)), customer())				
هام يجب أن تكون كافة عناصر ArrayList من نفس نوع الكائن. يفشل الأسلوب ToArray إذا حاولت تحويل ArrayList الكائنات غير المتجانسة على نوع معين.

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

  1. بدء جديد للمشروع "تطبيق وحدة التحكم" باستخدام 2005 Visual Basic أو Visual Basic .NET. افتراضياً، يتم إنشاء ملف يسمى Module1.vb.
  2. استبدال الرمز في Module1.vb التعليمة البرمجية التالية.
    Option Strict OnModule Module1    Sub Main()        Dim tempCust As customer        Dim c As New customer()        c.cname = "anonymous"        Dim al As New ArrayList()        al.Add(c)        Dim cArray As Object() = al.ToArray()        'Display the type of the ArrayList.        Console.WriteLine(cArray.GetType)        'Uncomment the next line to reproduce the InvalidCastException.        'Dim custArray() As customer = CType(al.ToArray(), customer())        'Comment the next line to reproduce the InvalidCastException.        Dim custArray() As customer = CType(al.ToArray(GetType(customer)), customer())        Console.WriteLine(custArray.GetType)    End Sub    Public Class customer        Public cname As String    End ClassEnd Module					
  3. اضغط CTRL + F5 لإنشاء وتشغيله المشروع. (CTRL + F5 يسمح إطار وحدة التحكم أن تبقى مفتوحة.)
  4. إعادة إنشاء استثناء InvalidCastException ، اتبع الإرشادات commenting جهازي في نموذج التعليمة البرمجية.

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

خصائص

رقم الموضوع: 312389 - آخر مراجعة: 02/28/2014 04:31:06 - المراجعة: 3.3

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

  • kbnosurvey kbarchive kbmt kbvs2005swept kbvs2005applies kbhowtomaster KB312389 KbMtar
تعليقات