16,720
社区成员
发帖
与我相关
我的任务
分享如何调用动态数组控件呢？
我已经发过一个贴，但苦等一个晚上都没有人回答上来
再开个贴问问各位大虾
自定义了个数组（随便是table或是linklabel或是button之类的），想调其一些事件，比如CLICK，SELECT之类事件，该怎么办呢？
也不能
dim button1 as new button
... handles button().click..
再开个贴问问各位大虾
自定义了个数组（随便是table或是linklabel或是button之类的），想调其一些事件，比如CLICK，SELECT之类事件，该怎么办呢？
也不能
dim button1 as new button
... handles button().click..
...全文
请发表友善的回复…
发表回复
ray680719 2004-11-02
- 打赏
- 举报
例如：
Private Sub DealClick()
' 批处理
Dim i As Integer
Dim ctrl As Control
Try
For i = 0 To CtrlNum - 1
AddHandler grid(i).C1Grid.Click, AddressOf RefreshGrid
‘grid(i)是个函数，不是数组
Next
Catch exp As Exception
Throw exp
MsgBox(exp.ToString, MsgBoxStyle.OKOnly, "信息提示")
Exit Sub
End Try
End Sub
Private Sub DealClick()
' 批处理
Dim i As Integer
Dim ctrl As Control
Try
For i = 0 To CtrlNum - 1
AddHandler grid(i).C1Grid.Click, AddressOf RefreshGrid
‘grid(i)是个函数，不是数组
Next
Catch exp As Exception
Throw exp
MsgBox(exp.ToString, MsgBoxStyle.OKOnly, "信息提示")
Exit Sub
End Try
End Sub
ray680719 2004-11-02
- 打赏
- 举报
和我一样，我也发了两个贴子了，，，
dim withevents aa(3) as mycompents '这样定义数组控件也不行。
后来干脆不用数组了，改成添加单个控件，
这样可用代理方式激发事件。
dim withevents aa(3) as mycompents '这样定义数组控件也不行。
后来干脆不用数组了，改成添加单个控件，
这样可用代理方式激发事件。
xlovem 2004-11-02
- 打赏
- 举报
一个问题开两个贴 没有办法吗？
xlovem 2004-11-02
- 打赏
- 举报
ray680719(HAPPYWORLD) 谢谢
xlovem 2004-11-02
- 打赏
- 举报
上面打错了
dim button1（） as button
... handles button1().click..
dim button1（） as button
... handles button1().click..
xlovem 2004-11-02
- 打赏
- 举报
该怎么办呢
