做一个计划任务,写入代码 http://www.foxtable.com/help/topics/0657.htm
Dim frm = Windows.Forms.Form.ActiveForm
If frm IsNot Nothing Then
If frm.Name = "Class185" Then
frm.controls("btnGroup").Enabled = False
frm.controls("btnRole").Enabled = False
'Button2
'btnUserTable
'btnRole
'btnExtProperty
'btnDefault
'lstUsers
'btnGroup
'btnEdit
'btnDelete
'btnAdd
'
End If
End If
[此贴子已经被作者于2016/1/6 20:52:09编辑过]