ایجادیک تکست باکس باهربار کلیک بریک دکمه

[sagggad]

سلام دوستان.من می خوام باکلیک کردن بر روی یک دکمه هربار یه تکست باکس به وجود بیاد که اسم هاشون هم به ترتیب اضافه شه.مثلا:اولی باشه:TEXtbox1 دومی باشه:TEXtbox2
کد زیر یه تکست باکس ایجاد میکنه:
Dim textbox1 As New TextBox
(Me.Controls.Add(textbox1

وقتی بار اول روی دکمه کلیک میکنی یه تکس باکس ایجاد میشه!!اما دفعه های بعدش هرچی کلیک می کنی دیگه تکست باکسی ایجادنمیشه!!دوستان راهنماییم کنن!!

[boveiryghasem]

شما کدت مشکل نداره فقط هر دفعه TextBox ها روی هم میندازه باید Location هاشون رو تغییر بدی تا بتونی ببینیشون مثل کد زیر:
Dim txtBx As TextBox
Static x As Integer
Static i As Integer
txtBx = New TextBox
txtBx.Location = New Point(10, 10 + x)
txtBx.Size = New Size(100, 20)
i = i + 1
x = x + 20
Me.Controls.Add(txtBx)

[sagggad]

خیلی ممنونم دوست عزیز

[sagggad]

بعد نام گذاریشون چه جوری میشه؟؟متغیر i هیچ کاره است؟؟؟

[boveiryghasem]

ببخشید یادم رفت بگم i رو واسه اسماشون میتونی با یه رشته جمعش کنی بشه اسمشون مثل کد زیر:
txtBx.Name = "TextBox" & i.ToString()

ولی یه راه دیگه هم هست میتونی تو قسمت Public فرمت اینو بنویسی:
Private txtList As New List(Of TextBox)
بعدش با گرفتن یه کانت ساده به textbox ها دسترسی پیدا کنی مثل کد زیر:
If Me.txtList.Count >= 3 Then Me.txtList(2).Text = "TextBox3"

[sagggad]

خیلی خیلی خیلی ممنون.ولی اگه لطف کنی یه توضیحی بدی که من مبتدی هم بفهمم واقعا چاکرت میشم!!!!!

[sagggad]

مثلا اگربخوام نوشته ی داخل سومین تکست باکسش رو تنظیم کنم باید چه کارکنم؟؟؟؟

[sagggad]

ارور میده!!