استفاده از یک سطر آرایه دو بعدی تحت عنوان آرایه جدید

[hossein-khoshseyar]

سلام
دوستان من یک آرایه دو بعدی دارم حالا می خوام یک سطر اون رو به عنوان وردی به یک تابعی پاس بدم اما نمی دونم چه طوری می تونم اون سطر از آرایه دو بعدی رو جدا کنم
به عنوان مثال می گم



Dim a(,) as Double =..........
Dim b() as Double = a(1,:)



یعنی می خوام ماتریس b بشه سطر اول ماتریس a

[hossein-khoshseyar]

کسی نظری نداره؟

[b.mahsa]

Dim a(5, 5) As Double
Dim k As Int16 = 0
Dim b(5) As Double
Buffer.BlockCopy(a, 1, b, 1, 1)

[hossein-khoshseyar]

Dim a(5, 5) As Double
Dim k As Int16 = 0
Dim b(5) As Double
Buffer.BlockCopy(a, 1, b, 1, 1)


دوست عزیز
اولا ممنون از پاسخ شما
کد شما بدون خطا اجرا میشه اما در پایان آرایه b تمام مقادیرش صفره یعنی مقادیر آرایه a توش کپی نمیشه!

[hossein-khoshseyar]

ممنون خودم اشکالم رو فهمیدم
البیته این کدی که شما نوشتید این مشکل رو داره
اما پارامتر آخر این تابع تعداد بایتی که کپی می شه نه تعداد عضو آرایه
چون متغیرمون از نوع دابل بود برای کپی یک عضو باید پارامتر آخر رو برابر 8 و برای 2 عضو باید 16و..... بنویسیم
بازم ممنون از راهنماییت

[hossein-khoshseyar]

فقط یه نکته دیگه هم این که عددی 1 که توی پارامترها نوشته شده باید به صفر تغییر کنه تا از ابتدای آرایه مبدا شروع به کپی شدن بکنه
و اگر بخوایم مثلا از عنصر ان ام شروع به کپی کنیم باید آفست رو برابر ان ضربدر تعداد بایت های متغیر ( مثلا 8 برای دابل ) قرار بدیم