Foxtable(狐表)用户栏目专家坐堂 → [求助] 菜单设计


  共有2355人关注过本帖树形打印复制链接

主题:[求助] 菜单设计

美女呀,离线,留言给我吧!
susanhe
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:312 积分:2477 威望:0 精华:0 注册:2018/11/22 20:30:00
[求助] 菜单设计  发帖心情 Post By:2018/11/23 23:20:00 [只看该作者]

请问一下,我要使用菜单状态按钮,按一下窗口打开,再一下窗口关闭,关闭前未保存提醒保存,请指导一下,谢谢。

 回到顶部
美女呀,离线,留言给我吧!
susanhe
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:312 积分:2477 威望:0 精华:0 注册:2018/11/22 20:30:00
  发帖心情 Post By:2018/11/23 23:20:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:捕获.png
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/11/24 8:29:00 [只看该作者]

状态按钮PressedChanged事件

If e.ToggleButton.Pressed Then
    Forms("窗口1").Open
Else
    Forms("窗口1").Close
End If

窗口1,beforeclose事件
If DataTables("表A").HasChanges Then
    If MessageBox.Show("是否保存?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes Then
        DataTables("表A").save
    End If
End If

 回到顶部