رفتن به مطلب
  • 0

استفاده از ارایه ها


SaEed

سوال

با سلام دوستان

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

خودم اینو نوشتم

Dim i As Int
Dim s  As String
Dim a1() As String
s = "saeed"
For i = 0 To s.Length -1
a1(i) = s.CharAt(i) 
Next
End Sub

حالا چطور میتونم به صورت msgbox نشونش بدم حرف به حرف

لینک ارسال
به اشتراک گذاری در سایت های دیگر

4 پاسخ به این سوال تاکنون داده شده است

ارسال های توصیه شده

سلام و درود

Dim i As Int اضافیه . چون توی حلقه i رو تعریف میکنید دیگه نیازی نیست متغیر i رو از قبل تعریف کنید.

برای اینکه در مسیج باکس نمایش داده بشه فقط کافیه مسیج باکس رو درون حلقه ی For قرار بدید.

لینک ارسال
به اشتراک گذاری در سایت های دیگر

سلام و درود

Dim i As Int اضافیه . چون توی حلقه i رو تعریف میکنید دیگه نیازی نیست متغیر i رو از قبل تعریف کنید.

برای اینکه در مسیج باکس نمایش داده بشه فقط کافیه مسیج باکس رو درون حلقه ی For قرار بدید.

اونو بلدم دوسته عزیزم متوجه منظور من نشدید من میخوام حرف هارو داخل ارایه بریزم بعدن از ارایه در جای دیگه اضافه کنم من نمیدونم چطوری بریزم تو ارایه و چطوری از ارایه نشون بدم

لینک ارسال
به اشتراک گذاری در سایت های دیگر

خب درست رفتید دیگه.

الان میشه:

a1(0)
a1(1)
a1(2)
...

هر جا هم دوست داشتید ازش استفاده کنید !

لینک ارسال
به اشتراک گذاری در سایت های دیگر

خب درست رفتید دیگه.

الان میشه:

a1(0)
a1(1)
a1(2)
...

هر جا هم دوست داشتید ازش استفاده کنید !

من اینطوری مینویسم

msgbox (a(i) , "title") 

ولی جواب نمیگیریم

لینک ارسال
به اشتراک گذاری در سایت های دیگر

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

مهمان
این موضوع برای عدم ارسال قفل گردیده است.
  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...