动态添加控件求教,多谢!
动态添加控件求教各位高手,谢谢!!!
动态添加控件求教各位高手,谢谢!!!
在窗体a中有控件label1,我在窗体B中动态添加了:
------解决方案--------------------
猜测可能是a.label1.Location = New Point(Me.Width * 0.3, Me.Height * 0.2)引起的
------解决方案--------------------
是 Me.Controls.Add(a.label1)引起的,一个儿子不能有两个父亲。如果B窗体需要有一个A窗体那样的label1的儿子,需要
Dim dd As System.Windows.Forms.Label
dd = New System.Windows.Forms.Label
Me.Controls.Add(dd)
dd.Location = New Point(Me.Width * 0.3, Me.Height * 0.2)
dd.Visible = True
dd.Text = "9999999999"
动态添加控件求教各位高手,谢谢!!!
在窗体a中有控件label1,我在窗体B中动态添加了:
- VB.NET code
Private Sub B_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Me.Controls.Add(a.label1) a.label1.Location = New Point(Me.Width * 0.3, Me.Height * 0.2) end sub
------解决方案--------------------
猜测可能是a.label1.Location = New Point(Me.Width * 0.3, Me.Height * 0.2)引起的
------解决方案--------------------
是 Me.Controls.Add(a.label1)引起的,一个儿子不能有两个父亲。如果B窗体需要有一个A窗体那样的label1的儿子,需要
Dim dd As System.Windows.Forms.Label
dd = New System.Windows.Forms.Label
Me.Controls.Add(dd)
dd.Location = New Point(Me.Width * 0.3, Me.Height * 0.2)
dd.Visible = True
dd.Text = "9999999999"