以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]怎样判断窗口打开并且GroupBox页面是第几个  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=121078)
--  作者：紫色幽魂
--  发布时间：2018/6/28 17:52:00
--  [求助]怎样判断窗口打开并且GroupBox页面是第几个
这段代码写在table表里面，计划在窗口打开的时候，并且页面是第一个就执行第一段代码，第二段就执行第二段代码，这个应该怎么改

If Forms("工厂无损录入主界面").Opened = True Then
    If Forms("工厂无损录入主界面").Controls("GroupBox2").SelectedIndex = 0
        \'遍历检测方法
        For Each c As Winform.Control In Forms("工厂无损录入主界面").Controls
            If Typeof c Is WinForm.RadioButton Then
                Dim t As WinForm.RadioButton = c
                If t.Name.StartsWith("检测方法") And t.Checked Then
                    e.DataRow("适用类型") = t.Text
                End If
            End If
        Next
    ElseIf Forms("工厂无损录入主界面").Controls("GroupBox2").SelectedIndex = 1
        For Each c As Winform.Control In Forms("工厂无损录入主界面").Controls
            If Typeof c Is WinForm.RadioButton Then
                Dim t As WinForm.RadioButton = c
                If t.Name.StartsWith("单位") And t.Checked Then
                    e.DataRow("单位") = t.Text
                End If
            End If
        Next
    End If
End If
--  作者：有点甜
--  发布时间：2018/6/28 17:58:00
--  

GroupBox没有第几个的属性，如果要判断groupbox是否可见，参考

 

If Forms("工厂无损录入主界面").Controls("GroupBox2").Visible Then

 

End If
--  作者：紫色幽魂
--  发布时间：2018/6/28 18:35:00
--  回复：（有点甜）GroupBox没有第几个的属性，如果要判...
我要判断这个是在第几个页面，在表里面增加行的时候根据页面上的内容不同增加行进行赋值，自动写入一些内容，这个需要怎么才能到达要求
--  作者：有点甜
--  发布时间：2018/6/28 22:16:00
--  
以下是引用紫色幽魂在2018/6/28 18:35:00的发言：
我要判断这个是在第几个页面，在表里面增加行的时候根据页面上的内容不同增加行进行赋值，自动写入一些内容，这个需要怎么才能到达要求

 

无法理解你的问题，只有tabcontrol控件才有【第几个页面】的说法。
--  作者：紫色幽魂
--  发布时间：2018/6/29 8:59:00
--  回复：（有点甜）以下是引用紫色幽魂在2018/6/28 18:3...
这个空间类型是TabControl，只是我要在表事件里面判断这个窗口打开并且页面是在第几个，在table里面是不是不能这样判断页面在第几个
--  作者：有点甜
--  发布时间：2018/6/29 10:20:00
--  
只能判断tabcontrol控件，不能判断table。