有耐心的高手们进来 指导一下vb如何点击按钮增加组件
就是一点击按钮 就生成一个textbox的控件
两个command的控件
然后textbox在离窗口顶部的地方 两个command并排在textbox的右面
如果再点击次按钮 就再生成和上面一样的三个控件
只不过这三个控件在第一次的那三个控件的下方
最好给出实例 旁边有注释
我毕竟是还是个初学的菜鸟
第二次添加由你自己完成,道理一样.
路过.....
希望对你有所帮助
Private Sub cmdAddTxt_Click()
Dim n As Integer '定义一个变量
n = Text1.UBound + 1 '使用控件数组，将上界增加1个
Load Text1(n) '装载控件
Text1(n).Left = Text1(n - 1).Left '设置控件的位置
Text1(n).Top = Text1(n - 1).Top + Text1(n - 1).Height * 1.1
Text1(n).Visible = True '设置控件可见
Text1(n).Text = n '设置内容为第几个，此行用于区别其它控件而写，无其它含义
End Sub
不知道为什么上一个帖子没有代码？！不好意思了！
必需要先判断此控件是否不存在才能添加.
#2正解
学习中
路过。。。
路过！
VB交流群159016553，欢迎大家加入~~~~~~
真是太感谢了
竟然有这样有耐性的人
感动ing
Set NewText = Controls.Add("VB.TextBox", "txtNew", Me)
NewText.Move 1000, 600, 2500, 1000
aButton.Move NewText.Left, NewText.Top + NewText.Height + 100,
相关问答：
在vb这编程里似乎有很多的东西是相联系的，为什么有些人对vb的编程摸不到头脑啊！并且有些事很容易的，但是却把它们的代码变成复杂，也去想一些不能实现的东西啊！
没分了，楼主多来点分！
来接点分
......
比如说要在1表中的第三列第二行单元中输入“一二三”一要粗体宋体12号字，二 不要粗体 15号字 三斜体5号字
代码应该怎么打？
LZ指的是个什么表格控件呢，貌似只能设置整个表的字体，或者某几行或几列，没有单独设� ......
各位大虾：
我是刚学VB，现在想用VB调用一个动态库，动态库里面有很多函数。我知道使用VB调用动态库调用函数，需要将要调用的函数在程序中声明即可，但是里面有很多函数，不会每一个函数都要声明吧。请� ......
第一次接触CrystalReport
急寻找Vb.net Access 通过查询出的数据输出到CrystalReport的例子.
有的朋友麻烦发来学习.多谢!
跟你的要求差不多，参考一下：
http://topic.csdn.net/u/20090823/21/87af02d3-f4ca-480 ......
我在类中有一个函数
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfig是我自定义类型的数据，为什么会提示“只有在公共对象模块中� ......
