向表单中添加160个按钮会出现什么状况
RT
[解决办法]
测试一下不就知道了
[解决办法]
For m.lnI=1 To 160
Thisform.AddObject("MyCommand"+Transform(m.lnI),"Commandbutton")
Store m.lnI*20 To ("Thisform.MyCommand"+Transform(m.lnI)+".Top")
Store .T. To ("Thisform.MyCommand"+Transform(m.lnI)+".Visible")
Endfor
[解决办法]