有多个按钮想让它们不可用,不想一个一个设置,有好方法吗?

来源:百度知道 编辑:UC知道 时间:2024/06/09 08:32:55
不想这样设置 Command1.Enable=False Command2.Enable=False command3.Enable=False ......
有好方法吗?
按钮比较多 ,VB程序

把按钮做成控件数组,然后用循环遍历即可:
For i=0 to Command1.Count-1
Command1(i).Enabled = False
Next

控件数组:
每个控件都叫同一个名称,如 Command1,但是它们的Index属性不同,分别从0到n
简单的做法:先添加一个按钮 Command1,然后复制该按钮,再在窗体粘贴按钮,VB会询问是否要创建一个书序控件,回答是,这样就会出现2个Command1,再次粘贴,会出现3个...,再看看他们各自的Index属性....

不知道你想干什么,
有一种比较方便的方法,你把这些Command控件放到同一个.Frame控件中,然后设置.Frame的Enable属性即可

不过这样一来就不灵活了。如果你某个状态向控制单一的Command控件可按下去就不行了!

所以要看情况的。
通常情况你还是用控件数组的比较好
For i = 0 To Command1.UBound
Command1(i).Enabled = False
Next

创建控件数组很简单:你只需要先拖一个Command1空间到窗体上,把它的Index属性设置为0(初始为空),然后复制该控件,想贴几个就贴几个,其名字会一样,指示Index会累积增加

Dim Obj As Control

For Each Obj In Form1

If TypeName(Obj) = "CommandButton" Then
Obj.Enabled = False
End If
Next Obj

有多个按钮,这种情况用控件数组来实现
是比较好的方法,既可以整体处理,又可以单独处理

名字一样的话 来个For 循环

你可以把它放到一个程序里去遍历