vfp表单中,如何插入一个三行五列共15个按钮的命令按钮组?

 我来答
taohua300
2012-04-24 · TA获得超过528个赞
知道小有建树答主
回答量:722
采纳率:0%
帮助的人:674万
展开全部
把下面的代码写到表单的init事件中
this.AddObject('CommandGroup1','CommandGroup')
With this.CommandGroup1
.ButtonCount = 15
.left = 0
.top = 0
.Height = 185
.Width = 220
Endwith

m.x = 10
m.y = 10
For i = 1 To 15
lcObject = 'Command' + Transform(i)
With thisform.CommandGroup1.&lcObject
.top = m.y
.left = m.x
.Height = 25
.Width = 60
Endwith
m.x = m.x + 60 + 10

If i % 3 == 0
m.x = 10
m.y = 10 + (25 + 10) * Int(i / 3)
Endif
Next
this.CommandGroup1.visible = .t.
tanadinor
2012-04-24 · TA获得超过120个赞
知道答主
回答量:87
采纳率:0%
帮助的人:71.5万
展开全部
添加一个按钮的命令如下。 其他的你自己添加吧。
thisform.AddObject("t1","commandbutton")
thisform.t1.left=10
thisform.t1.top=10
thisform.t1.visible=.t.
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
uhmf
2012-04-24 · TA获得超过1457个赞
知道大有可为答主
回答量:1891
采纳率:50%
帮助的人:1315万
展开全部
建立命令按钮组,然后将ButtonCount属性改为15,最后按你的想法人工排列即可
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
匿名用户
2012-04-24
展开全部
直接添加不就好了。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式