كيف يمكن إضافة عنصر إلى مصفوفة ديناميكية؟

السلام عليكم

Dim Arry() As String 
		Arry(0) = "Hello"
		Arry(1) = "hi"

		'Or طريقة أخرى لإسناد قيم في المصفوفة.
		Dim Arry() As String = New String() {"Hello", "hi"}

بالتوفيق إن شاء الله.

السلام عليكم

شكرا على المساهمة و لكن ظهرت هذه الرسالة

أرجو مشاهده المرفق (h)

جرب:

Arry=Array.CreateNewInstance(Type.GetType("System.String"),2)

يتعين عليك استخدام الكلمة المحجوزة Redim واعطاء حجم للمصفوفة قبل استخدامها

 Dim Arry() As String
		Array.Resize(Arry, 1)
		Arry.SetValue("Hello", 0)

الكود السابق على ال 2005

هذا الكود على 2003

  Dim Arry() As String
		ReDim Arry(1)
		Arry.SetValue("Hello", 0)

حاول تستعمل ال ArrayList اظن انها احسن و فيها ميزات جيدة

أفضل شي أستخدام الكولكشن :

		Dim Col As New System.Collections.ObjectModel.Collection(Of String)
		Col.Add("MiCcSoft")

قد يكون ال Collection مفيد في حالة اننا نريد التعامل مع البيانات بصورة خاصة نوعا ما مثلا اذا اردنا استخدام For Each ، اما كما المشكلة السابقة فلا اعتقد ان الاخ AHMAD FATHY يحتاج اكثر من مصفوفة ديناميكة يتحكم في حجمها كيفما شاء، هذا علاوة على ان ال Collection يحتاج الى ذاكرة اكبر من ال Array لا سيما اذا كانت البيانات كبيرة.

فعلاً كما قال الاخ crazy-man , استخدم الـ ArrayList , فهي سهله الاستخدام وتغنيك عن عمل Redim

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

شكراً جزيلاً لكل من ساهم فى الموضوع B)

تحياتى