怎么用代码给窗体加控件？？？？

Question

Private Sub Form_Load()
    Dim ctlAdd As Control
   
    Set ctlAdd = Me.Controls.Add("VB.CommandButton", "name")
    With ctlAdd
        .Visible = True
        .Caption = "代码加的按钮"
    End With
End Sub

Answer 1

可以用LOAD 方法
例如LOAD TEXT(1)
在form 上加一个文本框
但要有一个TEXT(0)在form上

Answer 2

感谢您使用微软产品。您可以参考以下文章中的方法动态地给窗体加控件：
HOWTO: Dynamically Add Controls to a Form with Visual Basic 6.0
http://support.microsoft.com/default.aspx?scid=kb;en-us;Q190670  - 微软全球技术中心 VB技术支持本贴子仅供CSDN的用户作为参考信息使用。其内容不具备任何法律保障。您需要考虑到并承担使用此信息可能带来的风险。具体事项可参见使用条款(http://support.microsoft.com/directory/worldwide/zh-cn/community/terms_chs.asp)。
为了为您创建更好的讨论环境，请参加我们的用户满意度调查(http://support.microsoft.com/directory/worldwide/zh-cn/community/survey.asp?key=(S,49854782))。