کار با کنترل هاي پويا

---

شرح پروژه

توسط کد زير در vb.net ميتوانيم N کادرمتن پويا(در زمان اجرا) ايجاد کنيم: Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim count As Integer = 0 If Integer.TryParse(TextBox1.Text, count) Then Dim demo = New TextBoxCreate(FlowLayoutPanel1, "Demos", count) demo.CreateTextBoxes() End If End Sub End Class Public Class TextBoxCreate Public Property TextBoxes As TextBox() Public Property TextBoxBaseName As String Public Property TextBoxCount As Integer Public Property ParentControl As Control Public Sub New( ByVal ParentControl As Control, ByVal BaseName As String, ByVal Count As Integer) Me.ParentControl = ParentControl Me.TextBoxBaseName = BaseName Me.TextBoxCount = Count End Sub Public Sub CreateTextBoxes() Dim Base As Integer = 10 TextBoxes = Enumerable.Range(0, TextBoxCount).Select( Function(Indexer) Dim b As New TextBox With { .Name = String.Concat(TextBoxBaseName, Indexer + 1), .Text = (Indexer + 1).ToString, .Width = 150, .Location = New Point(25, Base), .Parent = Me.ParentControl, .Visible = True } AddHandler b.Click, Sub(sender As Object, e As EventArgs) Dim tb As TextBox = CType(sender, TextBox) If tb.Name = TextBoxBaseName & "1" Then tb.Text = "Got it" Else MessageBox.Show(tb.Name) End If End Sub Me.ParentControl.Controls.Add(b) Base += 30 Return b End Function).ToArray End Sub End Class http://s3.picofile.com/file/8228268950/20egu.jpg من ميخوام به کادرمتن دلخواه دسترسي داشته باشم و بتونم به خاصيت هاي مختلف اون دسترسي داشته باشم. ميخوام بتونم به هرکدوم از کادرمتن ها که خواستم پرش(فوکوس) کنم. يا تعداد کل اونهارو در هر زمان بدونم. همينطور من ميخوام وقتي کليد enter رو هرکدوم از کادرمتن ها زده ميشه هرکدوم از کادر متن ها کار متفاوتي انجام بدن. توجه کنيد که من پروژه نميخوام فقط يه نمونه سورس آموزشي هم به زبان vb.net و هم به زبان #C ميخوام. توي فروم ها و سايتهاي خارجي هم اين سوال رو مطرح کردم اما کسي بلد نبود.

مهارت ها و تخصص های مورد نیاز

---

---