13问答网 > vb中如何动态添加控件数组？我现在已经用controls.add添加了一个控件，是在代码窗口里通

vb中如何动态添加控件数组？我现在已经用controls.add添加了一个控件，是在代码窗口里通

2025-03-13 14:01:07

推荐回答（1个）

回答1：

Sub CreateTextbox()

Set txtTotal(0) = Controls.Add("VB.TextBox", "txtTotal")

txtTotal(0).Move 1000, 800, 1200, 300

txtTotal(0).Visible = True
End Sub

Private Sub Command1_Click()
CreateTextbox
End Sub

Private Sub Command2_Click()
Set txtTotal(1) = Controls.Add("VB.TextBox", "txtTotal1")

txtTotal(1).Move 3000, 800, 1200, 300
txtTotal(1).Visible = True

End Sub
这样算不算
像设计放置控件的方法一好像不能实现

vb中如何动态添加控件数组？ 我现在已经用controls.add添加了一个控件，是在代码窗口里通

vb中如何动态添加控件数组？我现在已经用controls.add添加了一个控件，是在代码窗口里通