以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请教 如何窗体中的文件管理器控件设计权制  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=99469)

--  作者:wakai
--  发布时间:2017/4/19 22:58:00
--  请教 如何窗体中的文件管理器控件设计权制
要达到如果设计图表的审核意见判为合格后,再打开窗体就不显示增加,删除,清除等操作
在afterload写的是以下代码出错,请问老师错在哪里如果写
Dim fm As WinForm.FileManager = e.Form.Controls("设计图")
If Tables("设计图").Cols("审稿意见") = "合格" Then
    fm.AddCommand.Visible = False
    fm.AddFolderCommand.Visible = False    
    fm.DeleteCommand.Visible = False
    fm.ClearCommand.Visible = False
End If
    

--  作者:有点色
--  发布时间:2017/4/19 23:06:00
--  
Dim fm As WinForm.FileManager = e.Form.Controls("设计图")
If Tables("设计图").Current("审稿意见") = "合格" Then
    fm.AddCommand.Visible = False
    fm.AddFolderCommand.Visible = False    
    fm.DeleteCommand.Visible = False
    fm.ClearCommand.Visible = False
End If