以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  按钮颜色控制  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=55419)
--  作者：yifan3429
--  发布时间：2014/8/16 12:49:00
--  按钮颜色控制
我想在显示 关闭 的同时    按钮显示为红色   需要怎样增加代码

If e.Sender.Text = "按年月" Then
    e.sender.Text = "关闭"    
    Tables("计划表").OpenFilterTree("日期 YM|状态") 
Else If e.Sender.Text = "关闭" Then
    e.sender.Text = "按年月"        
    Tables("计划表").CloseFilterTree( ) 
End If
--  作者：blackzhu
--  发布时间：2014/8/16 12:58:00
--  
e.sender.backcolor = color.yellow
--  作者：yifan3429
--  发布时间：2014/8/16 13:29:00
--  
谢谢 ！