Frame1上有若干个TextBox和Combox,不使用Frame1.Enable=False,使得Frame1上的TextBox和Combox控件失效,如何写代码简便些

Question

Frame1上有若干个TextBox和Combox,不使用Frame1.Enable=False,使得Frame1上的TextBox和Combox控件失效,如何写代码简便些(一个个写太麻烦了,有没简便的方法)
注 TextBox和Combox  都不是控件数组!

Answer 1

所有TextBox和Combox放到一个frameframe.enable=false
  
*****************************************************************************
欢迎使用CSDN论坛阅读器 : CSDN Reader(附全部源代码) 
http://www.cnblogs.com/feiyun0112/archive/2006/09/20/509783.html

Answer 2

Dim x As Variant
    For Each x In Me.Controls
        If x.Container Is Frame1 Then
            x.Enabled = False
        End If
    Next

Answer 3

有的时候又需要一个个的写，不能偷懒。为了少出错误以及将来的维护性，建议用动态加载控件数组办法。这样编写其他代码时也容易的多，比如你想要的功能，只要一个for循环就可以了。

Answer 4

在放一个PictureBox，将控件都放到PictureBox里面，Picture1.Enabled=false  or PictureBox1.Enabled=true