Question

VB如何用代码建立控件..就是说例如VB里己有几个文本框.在运行后发现文本框不够..怎么办

Answer 1

Option Explicit
Dim x As Control
Private Sub Command1_Click()
'动态建立textbox
Set x = Me.Controls.Add("VB.textbox", "text", Me)
With x
.Width = 1000
.Height = 500
.Visible = True
.Left = 200
.Top = 100
End With
End Sub

Private Sub Command2_Click()
On Error Resume Next
Me.Controls.Remove x '删除textbox
End Sub

Answer 2

好久以前学的，一下想不起来。
如果你想让文本框在运行中增加个数，可以先把文本框设置隐藏，运行时在显示。
如果你是不懂在编程时添加文本框，那神都教不了你了。