[求助]关于窗口关闭按钮 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]关于窗口关闭按钮

共有2641人关注过本帖树形打印复制链接主题：[求助]关于窗口关闭按钮

qq419863108

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：29 积分：278 威望：0 精华：0 注册：2017/5/14 18:41:00

[求助]关于窗口关闭按钮 发帖心情

Post By：2017/6/12 23:13:00 [只看该作者]

怎么用代码实现利用狐表本身关闭窗口的按钮？也就是窗口右上角的叉叉图片点击可在新窗口打开查看

求大神指教！谢谢

有点色

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/6/13 9:53:00 [只看该作者]

e.form.Close

qq419863108

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：29 积分：278 威望：0 精华：0 注册：2017/5/14 18:41:00

Post By：2017/6/13 11:37:00 [只看该作者]

If DataTables("商品信息表").HasChanges

If MessageBox.Show("商品信息表表已经被修改,是否保存?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes Then

DataTables("商品信息").Save()

End If

e.Form.Close

这代码要怎么改？我想实现点击关闭窗口按钮执行，执行前先提示再关闭

有点色

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/6/13 11:42:00 [只看该作者]

这个意思？

If DataTables("商品信息表").HasChanges
    If MessageBox.Show("商品信息表表已经被修改,是否保存?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes Then
        DataTables("商品信息").Save()
        e.Form.Close
    End If
Else
    e.Form.Close
End If

nuoyan88	小大 5楼 \| 信息 \| 搜索 \| 邮箱 \| 主页 \| UC
加好友发短信等级：九尾狐帖子：2159 积分：14971 威望：0 精华：0 注册：2017/10/12 13:00:00	Post By：2017/10/22 19:11:00 [只看该作者] 用户已被锁定

有点甜

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2017/10/22 19:28:00 [只看该作者]

1、timertick写统计代码

http://www.foxtable.com/webhelp/scr/1301.htm

http://www.foxtable.com/webhelp/scr/0548.htm

2、关闭代码 e.Form.Close

nuoyan88	小大 7楼 \| 信息 \| 搜索 \| 邮箱 \| 主页 \| UC
加好友发短信等级：九尾狐帖子：2159 积分：14971 威望：0 精华：0 注册：2017/10/12 13:00:00	Post By：2017/10/22 21:10:00 [只看该作者] 用户已被锁定

有点甜

小大 8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2017/10/22 21:35:00 [只看该作者]

timertick事件，写代码。

e.Form.Controls("TextBox1").Text = Tables("表A").Compute("sum(第一列)")

下一主题 >> << 上一主题

主题：[求助]关于窗口关闭按钮