Question

VB 中如何判断命令按钮控件数组是否被单击

Answer 1

针对你的问题，给你编了一个实例，你自己体会吧！
'在窗体上放一个command1,把它的index属性改为0，其它不用设置了，由程序自己设置。然后把下面的代码放到代码窗口中运行就可以了。
Private
Sub
Command1_Click(Index
As
Integer)
Form1.Cls
Print
"您按下的是按钮"
&
Index
+
1
End
Sub
Private
Sub
Form_Load()
Dim
I
As
Byte
For
I
=
1
To
4
Load
Command1(I)
Next
For
I
=
0
To
4
Command1(I).Caption
=
"按钮"
&
I
+
1
Command1(I).Height
=
500
Command1(I).Width
=
(Form1.ScaleWidth
-
6
*
100)
/
5
Command1(I).Top
=
Form1.ScaleHeight
-
700
Command1(I).Left
=
100
+
I
*
(100
+
Command1(I).Width)
Command1(I).Visible
=
True
Next
End
Sub
已经运行过了。

Answer 2

给你个实例
你自己做一下
就明白了
在窗体中创建按钮控件数组，多少个由你定；
代码如下：
Private
Sub
Command1_Click(Index
As
Integer)
Dim
i
As
Integer
i
=
Index
Command1(i).Caption
=
"这个按钮控件被单击过"
End
Sub

Answer 3

1、数组中每个命令按钮的标题（caption）都一样
这个caption属性是你想设置成什么就什么的，肯定不可能都一样了，除非你把它们都设置成一样的……除了在属性窗口设置，还可以在代码窗口设置。比如在form_load的时候，command1（1).caption="a",command1（2).caption="b"……
2、数组中所有命令按钮可以用同一个事件过程
意思是所有命令按钮都可以执行一样的事件，比如unload事件，我想要哪个按钮执行都可以的，或者我把全部按钮的事件都写成unload
me也是可以的~

Answer 4

这个问题比较容易解决。控件数组中辨别控件的唯一属性是index属性，问题的入手点也就在这里。
比如：
private
sub
command1_click(index
as
integer)
print
command1(index).caption
end
sub
这时你单击了控件数组中的某一个按钮，窗体上就会打出这个按钮的标题。