PDA

View Full Version : آرگومان متغییر آرایه ای



(سیدشریفی)
شنبه 26 شهریور 1384, 09:29 صبح
با سلام
آیا میتوان آرگومان یک متغییر آرایه ای را بصورت متغییر تعریف کرد ؟
همانند زیر :

x=10
y=20
dim A(x,y) As Long


:لبخندساده

ehsan_ansaripoor
یک شنبه 27 شهریور 1384, 00:24 صبح
دوست عزیز من این طوری استفاده نکردم ولی اینطوری چرا:
dim A(1 to 10) as Long
A(1)=X
A(2)=Y

(سیدشریفی)
یک شنبه 27 شهریور 1384, 09:00 صبح
دوست عزیز مثل اینکه شما منظور منو خوب متوجه نشده اید .
من هم متغییر آرایه ای را مثل Dim A(10,20) As long تعریف میکنم و در هنگام استفاده نیز مثلا A(1,5)=3 منظور من این بود که آیا میتوان ابعاد این آرایه را بصورت متغییر تعریف کرد مثل زیر :


If K=1 Then
x=10
y=20
else
x=5
y=10
End If

Dim A(x,y) As Long

mRizvandi
یک شنبه 27 شهریور 1384, 12:04 عصر
سلام

اگر به تعریف آرایه در VB دقت کنید می بینید که در زمان تعیین تعداد عناصر فقط می تونید از اعداد یا به اصطلاح ثابتها استفاده کنید. در غیر اینصورت دچار خطا خواهید شد.
اگر نیاز دارید که یک آرایه را با استفاده از یک متغیر که قبلا استفاده شده می تونید از متغیرهای آرایه ای پویا استفاده کنید.

Dim A() As Integer
x = 10
y = 20
Redim A(x,y)
:چشمک:

حامد مصافی
یک شنبه 27 شهریور 1384, 13:02 عصر
سلام
ابتدا آرایه را تعریف کنید

dim a() as integer

سپس در خلال برنامه آن را مجدداً تعریف کنید

Redim a(var1, var2) as integer

اگر می خواهید مقادیر قبلی از بین نروند به این صورت تعریفش کنید

Redim preserve a(var1 , var2) as integer

(سیدشریفی)
چهارشنبه 30 شهریور 1384, 08:17 صبح
جناب mRizvandi و مخصوصا آقا حامد که خیلی از سوالهای مارو جواب میدن از هردوی شما متشکرم .