以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]关于窗口关闭按钮  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=102069)

--  作者:qq419863108
--  发布时间:2017/6/12 23:13:00
--  [求助]关于窗口关闭按钮
怎么用代码实现利用狐表本身关闭窗口的按钮?也就是窗口右上角的叉叉图片点击可在新窗口打开查看求大神指教!谢谢
--  作者:有点色
--  发布时间:2017/6/13 9:53:00
--  
 e.form.Close
--  作者:qq419863108
--  发布时间:2017/6/13 11:37:00
--  
If DataTables("商品信息表").HasChanges
    If MessageBox.Show("商品信息表表已经被修改,是否保存?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes Then
        DataTables("商品信息").Save()
    End If
End If
e.Form.Close


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

--  作者:有点色
--  发布时间: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


--  作者:有点甜
--  发布时间: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


--  作者:有点甜
--  发布时间:2017/10/22 21:35:00
--  

 

timertick事件,写代码。

 

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