مشکل در ارایه

[mehrabmmp 528]

سلام دوباره

دوستان من با یه حلقه فور میام اطلاعات ارایه اول رو میریزم تو ارایه دوم ولی ایراد میگیره

Dim s2() As String
For l=0 To 9
	lbltxt.Text = lbltxt.Text & " / " & word(l)
	s2(l) = word(l)
Next

از خط چهارمی ارور میگیره

[محمدرضا شاهپیری 5,579]

سایز آرایه s2 رو مشخص کن عزیز 

[پژمان نیکروان 6,055]

در 14 ساعت قبل، mehrabmmp گفته است :

دوستان من با یه حلقه فور میام اطلاعات ارایه اول رو میریزم تو ارایه دوم ولی ایراد میگیره

سلام

ببینید شما بالا آرایه رو اینطوری تعریف کردین dim s2() as string و بهش سایز ندادید که تعداد اندیس های این آرایه چندتا باشه.

اینطور تعریف کردن برای زمانیه که بخواین یک دفعه چندتا مقدار به این آرایه نسبت بدید مثل:

s2=regex.split("#",matn")
یا
s2=array as string("1","2","3","...")

که به یکباره این مقدار هارو میگیره و همونجا هم بسته میشه. بعد میتونید حالا مثلا اندیس فلان از این آرایه رو بهش مقدار جدید بدید یا مقدارش رو استفاده کنید.

 

الان اینو اینطوری تعریف کنید:

Dim s2(10) As String

 

[mehrabmmp 528]

خیلی ممنون اقای شاهپیری و اقای نیکروان