2,735
社区成员
![](https://csdnimg.cn/release/cmsfe/public/img/topic.427195d5.png)
![](https://csdnimg.cn/release/cmsfe/public/img/me.40a70ab0.png)
![](https://csdnimg.cn/release/cmsfe/public/img/task.87b52881.png)
![](https://csdnimg.cn/release/cmsfe/public/img/share-circle.3e0b7822.png)
Local op as Page
Local cc, oo, ii
m.op = Thisform.pageframe1.Pages(Thisform.pageframe1.PageCount)
m.cc = '你选择了:'
For m.ii = 1 to m.op.ControlCount
m.oo = m.op.Controls(m.ii)
If Lower(m.oo.BaseClass) == 'checkbox' and !Empty(m.oo.Value)
m.cc = m.cc + Chr(13)+Chr(10)+ m.oo.Name
EndIf
EndFor
MessageBox(m.cc)