怎樣檢測該命令數組的個數

Question

窗體上有一個Commandbutton數組名為Command1(0)、Command1(1).....怎樣檢測該命令數組的個數，謝謝！有幾種方法

Answer 1

dim a,i
i=0
For Each a In Me
if a.name=command1 a=a+1
Next

Answer 2

Command1.count or ubound(Command1)

Answer 3

Count 属性（VB 集合）
      返回集合中对象的数目。语法object.Countobject 所在处代表一个对象表达式，其值是“应用于”列表中的一个对象。说明能够与 For...Next 语句一起使用该属性对集合中的窗体或控件上执行操作。例如，下面的代码将一个窗体上的所有控件向右移动 0.5 英寸（ScaleMode 属性设置为 1 或 vbTwips）：For I = 0 To Form1. Controls.Count - 1
   Form1. Controls (I).Left=Form1. Controls(I).Left + 720
Next I也可以使用这种结构快速地使窗体中的所有控件有效或失效。当与 If TypeOf 语句一起使用时，可以经过所有的控件进行循环并进行改变，例如，仅对文本框的 Enabled 属性设置或仅对选项按钮的 BackColor 属性的设置进行处理。