以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]狐表关闭代码报错  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=25964)
--  作者：sunbrain
--  发布时间：2012/11/21
--  [求助]狐表关闭代码报错

Dim Result As DialogResult
If Tables("销售单").Current.DataRow.RowState = DataRowState.Unchanged
    e.Form.Close
Else
    Result = MessageBox.Show("该条记录没有保存,是否放弃?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
    If Result = DialogResult.no Then
        Return
    End If
Tables("销售单").Current.Reject()
e.Form.Close

End If

 

设置在窗口的beforeclose，中，狐表 弹出一个窗口“狐表遇到原因需要关闭”，然而我做了一个按钮

将这段代码放在按钮的click中，执行正常呢

 

请问是代码问题吗
--  作者：blueskyyq
--  发布时间：2012/11/21 0:08:00
--  
你在窗口的beforeclose中最后又加了一句e.Form.Close这会成为一个死循环吧？
--  作者：sgs
--  发布时间：2012/11/21 9:11:00
--  
2楼言之有理，既然窗口马上要关闭了，就不必再写关闭代码了吧