با سلام خدمت همه.من می خوام یک برنامه بنویسم که در این برنامه احتیاج به استفاده از ارایه دارم ولی نحوه ی استفاده از ارایه رو بلد نیستم.اگر کمکم کنین ممنون میشم.
-
-
پاسخ : من چطوری می تونم با ارایه ها کار کنم؟
اول باید تعریف کنین :
مثلا
Dim A(10) as byte
حالا به راحتی میتونین با هر کدام از درایه ها کارکنین اندازه هر درایه هم byte هست.
مثلا
a(0)=1 مفدار 1 رو تو اولین درایه میریزه
یا :
for i=0 to 10
A(i)=i
next
بعد از اجرای این سه خط:
a(0)=0 , a(1)=1 , ....a(10)=10
-
پاسخ : من چطوری می تونم با ارایه ها کار کنم؟
سلام احسان جون.من این کارو کردم اما برنامه error میده.من یک قسمت از برنامه رو که errorمیده می نویسم ببین مشکلش چیه؟
dim a(10) as byte
for i=1 to 10
a(i=a(i+1
if i=10 then
a(i=b
goto lbl1
endif
next i
lbl1:دیدگاه
-
پاسخ : من چطوری می تونم با ارایه ها کار کنم؟
لطفا متن error رو بنویسیددیدگاه
-
پاسخ : من چطوری می تونم با ارایه ها کار کنم؟
روی خط A(i) = A(i + 1)
این error میده
Source Variable Dosnt Match The Target Variableدیدگاه
-
پاسخ : من چطوری می تونم با ارایه ها کار کنم؟
سلام
برنامه زیر بدون هیچ مشکلی تو بسکام کامپایل میشه :
Dim A(10) As Byte
Dim I As Byte
Dim B As Byte
For I = 1 To 10
A(i) = A(i) + 1
If I = 10 Then
A(i) = B
Goto Lbl1
End If
Next I
Lbl1:
دقت کنین که B رو هم تعریف کرده باشین(همین طور I) یعنی خط 2 و 3دیدگاه
دیدگاه