如何遍历窗体中的RectangleShape控件

在窗体中使用了多个RectangleShape控件，如何遍历这些控件并设置其visible属性 --------------------编程问答-------------------- try

Controls.OfType(Of RectangleShape)().ToList().ForEach(Function(t) InlineAssignHelper(t.Visible, False)) --------------------编程问答-------------------- 不行啊，Controls不包括这种控件 --------------------编程问答-------------------- 自己解决了，派生于shape的控件都存储在ShapeContainer里，遍历ShapeContainer的shapes即可
ShapeContainer1.Shapes(i).visible = True --------------------编程问答-------------------- 我也遍历RectangleShape 控件的属性 求高手解决 --------------------编程问答-------------------- 高手能告诉我你是怎么实现的吗

补充：.NET技术 ,  VB.NET