成组更新控件属性

VB 程序设计

10个成员

成组更新控件属性

发表于 2016-12-18 • 4343 次查看

Sub EnableAll(Enabled As Boolean, ParamArray objs() As Variant)
Dim obj As Variant
For Each obj In objs
obj.Enabled = Enabled
Next obj
End Sub
应用：
EnableAll True, Text1, Text2, Command1, Command2

只看楼主回复倒序查看回复

发表回复

你还没有登录，请先登录或注册！

(大小不能超过2MB，文件类型支持png ,jpg ,gif ,doc ,xls ,txt ,rar ,zip .)

文件名	描述	学币	操作

话题作者

Coding

头衔:无

活跃成员

sunny
六平居士
河东河西
信者
天涯
XTGLY
Coding
码农
天天
数据君

VB 程序设计

成组更新控件属性

课程推荐

PHP 程序开发

VB 程序设计

JAVA 程序设计

创业人生

道德经的奥秘

王阳明心学 (浙大公开课)

推荐资讯