Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
第一个,当我点人事部功能区的时候自动对应人事部表单(因为我设计的所有部门员工窗口在人事部表里)
第二个,当我点增加员工的时候自动关闭所有部门员工窗口,跳转到增加员工的界面
谢谢!
我已经会了,和大家分享一下代码
功能区和表绑定代码,并且自动打开窗口
forms("人事部汇总界面").Open()
MainTable = Tables("人事资料")
打开新窗口自动关闭老窗口代码
Syscmd.Project.StopRedraw()
For Each frm As WinForm.Form In Forms
frm.Close()
Next
Application.DoEvents()
Select Case MainTable.Name
Case "人事资料"
Forms("人事部汇总界面").Show()
Case "人事资料"
Forms("人事部新增员工表").Show()
End Select
Syscmd.Project.ResumeRedraw()
不错