做一个计划管理,输入代码
http://www.foxtable.com/help/topics/0657.htm
Dim frm = Windows.Forms.Form.ActiveFormIf frm IsNot Nothing Then If frm.Name = "Class185" Then 'For Each c As object In frm.controls 'output.show(c.name & c.text) 'Next frm.controls("btnUserTable").Visible = false End IfEnd If