vb有办法用代码在窗体Form1上画一个按钮Command1吗?
2个回答
展开全部
你这个可以使用控件数组来做,先在窗体上添加一个按钮,然后选中这个按钮后复制粘贴一个新的出来,这时候你就创建了一个控件数组,接着在代码里就可以使用for循环了,假设你的控件数组名为cmdLei,那么代码可以这样:
On
Error
Resume
Next
For
i
= 2
To 9
'原来窗体上就已经有2个
Load
cmdLei(i)
'动态加载一个新控件
With
cmdLei(i)
.Visable
=
True
'一定要添加,默认是不可见的
.Left
=
cmdLei(i
-
1).Left
+ cmdLei(i
-
1).Width
.Top
=
cmdLei(i
-
1).Top
.Caption
=
i
End
With
Next
删除一个控件可以用
UnLoad
cmdLei(i)
注:上面只是个例子,实际用还要计算按钮的排版,不然上面例子就是一排排过去了。
On
Error
Resume
Next
For
i
= 2
To 9
'原来窗体上就已经有2个
Load
cmdLei(i)
'动态加载一个新控件
With
cmdLei(i)
.Visable
=
True
'一定要添加,默认是不可见的
.Left
=
cmdLei(i
-
1).Left
+ cmdLei(i
-
1).Width
.Top
=
cmdLei(i
-
1).Top
.Caption
=
i
End
With
Next
删除一个控件可以用
UnLoad
cmdLei(i)
注:上面只是个例子,实际用还要计算按钮的排版,不然上面例子就是一排排过去了。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询