یه سوال در مورد حلقه For
حلقه For تنها برای اعداد بکار میره؟
چون من کد زیر رو که نوشتم کار نکرد:
من فکر می کردم این کد text1.text تا Text10.text رو به shamSoft تبدیل می کنه.اشکال کجاست؟
کد:
Private Sub Command1_Click()
For i = Text1 To Text10
Texti.Text = "shamsoft"
Next i
End Sub
دوست من سلام
اينو جانشين كدت كن :
کد:
Private Sub Command1_Click()
For i = 1 To 10
Text(i).Text = "shamsoft"
Next i
End Sub
Mamad2003 نوشته است:دوست من سلام
اينو جانشين كدت كن :
کد:
Private Sub Command1_Click()
For i = 1 To 10
Text(i).Text = "shamsoft"
Next i
End Sub
البته آقا ممد اینو جا انداختن که بگن اون textboxها باید یه آرایه باشن که بجای ایندکسشون باید i بذاری
آقای Spiderman یه مشکل دیگه اینه که ایندکس فقط می تونه عدد بگیره.بدتر از اون هم اینه که به جای I نمی تونیم از عدد استفاده کنیم.حالا چی میشه؟ :(
متوجه نشدم . یکم بیشتر توضیح بده
خوب اینجا i یه عدد بین 1 تا 10 دیگه
اصلا اگه می خوای برات بفرستم
آی دی یاهوتو بگو تا بفرستم
يعني به جاي ايندكس بايد عدد 1 تا 10 بگذارم؟ :roll: :?
بایذ textbox هایی که درست می کنی اسمشون یکی باشه
بجای index هر کدوم یه عدد بزاری . که اینجا از 1 تا 10
آقاي Spiderman متشکرم.درست شد.
سلام
ناگفته نماند كه در وي بي هم مثل خيلي از زبانهاي برنامه نويسي مي توني يك حلقه بر اساس شي داشته باشي:
کد:
FOR EACH item ON collection
any code
NEXT
:wink: