pb对控件使用数组

ㄣ负二代 · 发表于 2013-7-27 09:06:22

本帖最后由ㄣ负二代于 2013-7-27 09:06 编辑

比较简单的一种情况：对窗口中的所有控件，处理它们的公共属性。代码如下：
integer li_Count
integer li_index
li_Count = UpperBound(parent.Control[])
For li_index = 1 to li_Count
MessageBox('',parent.control[li_index].tag)
next
上面程序中，替换城如下脚本可以显示每一个控件的名称：
MessageBox('',parent.control[li_index].ClassName())
下面的脚本根据控件的类型做处理：
integer li_Count
integer li_index
li_Count = UpperBound(parent.Control[])
For li_index = 1 to li_Count
choose case parent.control[li_index].TypeOf()
case CommandButton!
MessageBox('','commandbutton name=' + parent.control[li_index].ClassName())
case CheckBox!
//
end choose
next

宇智波·佐助 · 发表于 2013-8-4 12:02:38

没位置了

三咲智子 · 发表于 2013-7-27 11:01:23

路过路过。

fml224 · 发表于 2013-7-27 10:12:06

支持和学习

我很天真 · 发表于 2013-7-27 09:46:17

看不懂这个是啥= = ！！

王小岩 · 发表于 2013-7-27 09:11:39

看看

		自动登录	找回密码
密码			注册

[其它数据库例题] pb对控件使用数组