آرایه های نا محدود [بایگانی]

m_zi

سه شنبه 14 اسفند 1386, 14:17 عصر

سلام
من می خوام در برنامه ام از آرایه نامحدود استفاده کنم و چند بعدی میشه راهنماییم کنید
مرسی

Mbt925

سه شنبه 14 اسفند 1386, 15:12 عصر

آرایه ی پویا بصورت زیر تعریف میشه:

Dim DynArray() as long

حالا مثلا برای اینکه در زمان اجرا این آرایه رو به 1 آرایه ی 1بعدی اه 10 تایی تبدیل کنید ، به این صورت عمل می کنید:

ReDim DynArray(10) as long

برای تغییر طول آرایه می تونید به 2 صورت عمل کنید:

1.طول رو تغییر بدید ، بدون اینکه مقادیر قبلی آرایه رو نگه دارید (یعنی همه ی خونه ها صفر میشن)

ReDim DynArray(15) as long

2.طول رو تغییر بدین و مقادیر قبلی اه خونه ها رو حفظ کنید.

ReDim Preserve DynArray(15) as long

برای کار با آرایه های چند بعدی هم به همین صورت عمل میشه.