
在VB.net 中用定义新的控件后如何让它显示出来
PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesBu...
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Txt1 = New TextBox()
Me.Txt1.Text = "dfsaf"
Me.Txt1.Left = 10
Me.Txt1.Top = 10
Me.Txt1.Visible = True
Me.Txt1.Show()
End Sub
这段代码执行后不报错,但是在窗体上根本就不显示我新定义的textbox。
如何能实现跟vb 6.0里面相同功能呢?
vb 6.0中应该是:
dim txt1 as textbox
set txt1 = controls.add("vb.textbox","txt1")
txt1.visable=true
这就搞定了。VB。net中如何能实现类似的功能呢? 展开
Txt1 = New TextBox()
Me.Txt1.Text = "dfsaf"
Me.Txt1.Left = 10
Me.Txt1.Top = 10
Me.Txt1.Visible = True
Me.Txt1.Show()
End Sub
这段代码执行后不报错,但是在窗体上根本就不显示我新定义的textbox。
如何能实现跟vb 6.0里面相同功能呢?
vb 6.0中应该是:
dim txt1 as textbox
set txt1 = controls.add("vb.textbox","txt1")
txt1.visable=true
这就搞定了。VB。net中如何能实现类似的功能呢? 展开
1个回答
展开全部
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Txt1 = New TextBox()
Me.Txt1.Text = "dfsaf"
Me.Txt1.Left = 10
Me.Txt1.Top = 10
Me.Txt1.Visible = True
Me.Controls.add(Txt1)
End Sub
Txt1 = New TextBox()
Me.Txt1.Text = "dfsaf"
Me.Txt1.Left = 10
Me.Txt1.Top = 10
Me.Txt1.Visible = True
Me.Controls.add(Txt1)
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询