当Option Strict设置为ON时访问循环中的控件

我有一个循环，它在某些情况下更改了winform上所有标签的颜色。我只是循环遍历所有的控件，然后如果它的标签，更改forecolor。但是，按照业务标准，我必须设置Option Strict On，此时我会收到有关后期绑定“容器”变量的错误。当Option Strict设置为ON时访问循环中的控件

需要

有什么想法时，我只需拨打我的主线程setlabelColors（我）？

Private Sub setlabelColors(ByVal container As Object) 
     For Each control As Object In container.Controls 
      If TypeOf control Is Label Then 
       control.forecolor = ColorTranslator.FromOle(RGB(205, 207, 182)) 
      ElseIf TypeOf control Is Panel Or TypeOf control Is GroupBox Then 
       setlabelColors(control) 
      End If 

     Next 
    End Sub

来源

2017-02-23 Lord Nodral III

Object可以是具有任何性质组合的任何可能类型。为了避免后期绑定，只需将其更改为包含控件集合的Control。

Private Sub setlabelColors(ByVal container As Control)

您还需要你的循环更改为：

For Each control As Control In container.Controls

没有理由让control为Object自container.Controls每一个元素是一个Control。

来源

2017-02-23 12:08:09

现在这显示了control.forecolor和递归调用istelf –

'code'私人小组setlabelColors（BYVAL容器作为一个ContainerControl）误差为每个控制在container.Controls 如果TypeOf运算控制是标签然后 control.forecolor = ColorTranslator.FromOle（RGB（205，207，182）） elseif的TypeOf运算控制面板或TypeOf运算控制分组框然后 setlabelColors（控制）结束如果接下来尾子'code' –

您不能在多行代码注释。请尽管告诉我错误。 –

当Option Strict设置为ON时访问循环中的控件

回答

相关问题