1、直接做一个 共有窗口,停靠设置成 上;
2、这两个按钮,直接加入一个图片不就行了?
返回首页 maintable = Tables("某表")
退出系统 BaseMainForm.Close
3、写代码
Select Case e.Link.Text Case "增加"
Forms("窗口1").Show
MainTable = Tables("表A")
Case "移动" '在此加入相应的代码 Case "删除" '在此加入相应的代码 Case "主页" '在此加入相应的代码End Select