以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]窗口表有没Enabled属性  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=109268)
--  作者：cd_tdh
--  发布时间：2017/11/8 11:39:00
--  [求助]窗口表有没Enabled属性

如题，主窗口AfterLoad，控件不可用，都没有效果。

Dim d1 As  Date =  #1/31/2018#
Dim d2 As  Date =  #1/1/2018#
Dim d3 As  Date =  Date.Today
If d3 >= d1 AndAlso d3 <= d2 Then \'AndAlso  _UserPost <> "管理员" Then
    e.Form.Controls("TreeView1").Enabled = False
    e.Form.Controls("考评系统窗口_Table1").Enabled = False
    e.Form.Controls("Button1").Enabled = False
Else
    MessageBox.show("还未到年度考评时间,你无权执行此项操作!")
    Return
End If
--  作者：有点甜
--  发布时间：2017/11/8 11:50:00
--  

 

e.Form.Controls("Table1").Table.AllowEdit = False


 
--  作者：cd_tdh
--  发布时间：2017/11/8 13:35:00
--  

解决了

[此贴子已经被作者于2017/11/8 14:02:15编辑过]