View Full Version : ایجاد کنترل به صورت اتوماتیک
  
sahele_sheni
شنبه 14 آذر 1388, 11:40 صبح
سلام دوستان . میشه کاری کرد که در هنگام لود شدن صفحه کنترلها ساخته بشن ؟! 
من یه فرم دارم که یه تعداد TextBox داره .ولی تعداد اونها رو خود کاربر در یه فرم دیگه کم و زیاد میکنه ! 
ممنون میشم اگه راهنمایی کنید !
ACorvinus
شنبه 14 آذر 1388, 12:09 عصر
من یه مثال نوشتم که علاوه بر اینکه Textbox هارو به تعداد دلخواه ایجاد می کنه، رویداد TextChange رو هم به همه اونا اضافه میکنه .
 
 
Public Sub New(ByVal TextboxCount As Integer)
    InitializeComponent()
 
    Dim YPosition As Integer = 20
    For i As Integer = 1 To TextboxCount
        Dim DynamicTextbox As New TextBox
 
        DynamicTextbox.Name = "TextboxInstance" + i.ToString
        DynamicTextbox.Location = New Point(20, YPosition)
        Me.Controls.Add(DynamicTextbox)
        AddHandler DynamicTextbox.TextChanged, AddressOf TextBoxInstance_TextChanged
        YPosition += 25
    Next
End Sub
 
Private Sub TextBoxInstance_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)
    '...
    'Code
    'Code
    'Code
    '...
End Sub
 
اگه بازم مشکلی بود بگو !!!
 
vBulletin® v4.2.5, Copyright ©2000-1404, Jelsoft Enterprises Ltd.