0

我有一个带有 2 个功能的控件:func1 和 func2 我有一个带有控件列表的表单。我想在我的表单上有一个函数(我称之为 MainFunc),它迭代列表中的所有控件并根据参数调用 func1 或 func2。我想它看起来像这样:

公共子 MainFunc(CalledFunc as ???)

for each IteratedControl as CustomControl in MyControlList
    IteratedControl.invoke(CalledFunc)
end for

结束子

我不希望我的参数是一个枚举并根据它的值调用正确的函数,因为有很多函数,而不仅仅是上面示例中的 2 个。

请帮忙

4

1 回答 1

1
For Each control In Me.Controls
  If TypeOf control Is CustomControl Then
  CType(control, CustomControl ).func1()                
  CType(control, CustomControl ).func2()                
  End If
Next
于 2013-03-30T20:37:59.203 回答