以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  页面集合  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=66379)
--  作者：石四
--  发布时间：2015/4/4 11:23:00
--  页面集合

页面集合用得比较多,代码都堆在SelectedIndexChanged事件里, 觉得不够合理.选择不同的页面执行不同的代码怎么操作?帮助文件和功能演示都没见到介绍.

select 页面1

   代码1

select 页面2

   代码2

 

页面名怎么表达?

 

 
--  作者：Bin
--  发布时间：2015/4/7 11:04:00
--  
http://www.foxtable.com/help/topics/0876.htm
--  作者：石四
--  发布时间：2015/4/28 11:00:00
--  

笔记：

Dim tab As WinForm.TabControl = e.sender
Select Case tab.SelectedPage.Name
    Case "退货"

 With e.Form.Controls("Table1").Table
            .DataTable.SysStyles("EmptyArea").BackColor = Color.AliceBlue
        End With
 Case "修改"
        With e.Form.Controls("Table2").Table
            .DataTable.SysStyles("EmptyArea").BackColor = Color.Whitesmoke
        End With
End Select