我想遍历SSTAB中第二个选项卡中的所有TEXTBOX控件,这个语句怎么写,在线等!谢谢!

解决方案 »

  1.   

    dim ctl as control
    for each ctl in me.controls
      if ctl.parent is sspanel2 then 'sspanel2:第二标签页控件的名称
         ...
      end if
    next
      

  2.   

    楼上的,不好意思,我没有听懂,我现在需要的是如下的遍历,但是出于SSTAB页面中第二页的内容我不知道怎么表达!
    For t = 0 To Me.Controls.Count - 1
       If TypeOf Me.Controls(t) Is TextBox Then
          Controls(t).Alignment = 1
       End If
    Next t
      

  3.   

    假设,现在有个控件叫做SSTAB1,他第二页的CAPTION是FEEDING,那我现在想把这页当中所有的TEXTBOX控件的ENABLED属性都设为FALSE,怎么操作,帅哥?
      

  4.   

    试了好久,没有找到解决发方法.变通下应该可以达到你的实现的要求
    1:在SSTAB的第2页里加的TEXT做成控件数组,代码如下
    Private Sub SSTab1_Click(PreviousTab As Integer)
        If SSTab1.Tab = 1 Then
            For I = 0 To 3
                Text1(I).Enabled = False
            Next
        End If
    End Sub不知道怎么得到TEXT是在哪个页中,帮忙顶下先