PDA

View Full Version : سوال در مرود ارایه پویا



yekta64
سه شنبه 31 شهریور 1388, 11:40 صبح
سلام
من دوتا سوال داشتم
1.چطور میشه با یه حلقه for به همه داده های یک ارایه پویا که به صورت زیر تعریف شده دسترسی داشت مثلا توی یه textbox نمایش داد



dim temp as new
ArrayList


2. اگه بخوایم یه شرط بنویسم که تا انتهای یه رشته یه کاری انجام بشه چی می نویسیم منظورم توی یه یه حلقه while هستش در واقعا می خوام بدونم انتهای رشته با چه شرطی مشخص میشه؟
مرسی

اوبالیت به بو
سه شنبه 31 شهریور 1388, 13:52 عصر
.چطور میشه با یه حلقه for به همه داده های یک ارایه پویا که به صورت زیر تعریف شده دسترسی داشت مثلا توی یه textbox نمایش داد


Dim arr As New ArrayList
arr.Add("Name")
arr.Add(123)
arr.Add(True)
For i As Integer = 0 To arr.Count - 1
TextBox1.Text = TextBox1.Text & Space(2) & arr(i).ToString()
Next


2. اگه بخوایم یه شرط بنویسم که تا انتهای یه رشته یه کاری انجام بشه چی می نویسیم منظورم توی یه یه حلقه while هستش در واقعا می خوام بدونم انتهای رشته با چه شرطی مشخص میشه؟



Dim str, Name As String
Dim cnt As Byte = 0
str = "Barnamenevis.ORG"
While (cnt < Len(str))
Name = Name & str(cnt)
cnt = cnt + 1
End While