如何在模块里定义一个控件是一个控件数组?
谢谢!

control.index =0

[此贴子已经被作者于2007-1-10 13:28:34编辑过]

能给出具体点的实例么?谢谢

picture1.index = 0

這個控件屬性就能用picture1(0).picture這個方法叻```

偶不是这个意思
偶是的意思
public sub cmdclick(cdmOK as commandbutton)

end sub
这是定义一个commandbution
但怎么定义它是一个控件数组?

```不懂具體意思?伱是想接受多個COMMAND的信息麼?

对,就是这个意思...我在窗体建立了一个控件数组...想在模块里写它的功能...

我的意思是这样的
在form窗体里有:
command控件数组index=0 to 3
它的单击是件
select case index
case 0
.
.
.
end select

然而红色这部分我想在模块里作一个公共的功能

[此贴子已经被作者于2007-1-10 13:51:06编辑过]

在函数中再加一个参数,调用的时候把INDEX作为参数传递试试

Public Sub SetButtons(Byval index As Integer)
Select Case index
Case 0
Form1.Command1(Index).Caption = "1"
Case 1
Form1.Command1(index).Caption = "2"
End Select
End Sub