以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  是否可以直接打开“组定义”和“角色定义”  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=85055)
--  作者：xluoping
--  发布时间：2016/5/16 18:17:00
--  是否可以直接打开“组定义”和“角色定义”
是否可以直接通过代码打开“组定义”和“角色定义”，而不是要通过“用户管理”那里打开

例如：Form("组定义").open（）
--  作者：大红袍
--  发布时间：2016/5/16 19:50:00
--  

比较麻烦，做一个计划管理，输入代码

 

http://www.foxtable.com/help/topics/0657.htm

 

Dim frm = Windows.Forms.Form.ActiveForm
If frm IsNot Nothing Then
    If frm.Name = "Class185" Then
        MyTimers("计划1").Enabled = False
        frm.controls(vars("btn")).performClick
    End If
End If

 

然后调用按钮的代码这样写

 

vars("btn") = "btnGroup"
\'vars("btn") = "btnRose"
MyTimers("计划1").Enabled = True
Syscmd.Project.Users()
--  作者：xluoping
--  发布时间：2016/5/16 23:13:00
--  是否可以关闭“Class185”窗口
已使用，是否可以更进一步，使用btnGroup的时候，是否可以关闭“Class185”窗口
--  作者：大红袍
--  发布时间：2016/5/16 23:26:00
--  
呃，这个做不到。