以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  使用ValidateEdit遇到的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=20413)

--  作者:yuri
--  发布时间:2012/6/8 1:15:00
--  使用ValidateEdit遇到的问题

有若干个表组成的一个购销存管理系统,在其中一个表使用ValidateEdit事件进行输入判定,设定了类似以下的代码

 

If e.Col.Name = "折扣" Then 

    If e.Text > "" Then  

        Dim v As Double = Val(e.Text)
        If
v > 0.15 Then 

            MessageBox.Show("兄弟,你想老板破产吗?", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information)
            e.Cancel =
True 

        End If
    End
If
End
If

 

输入时如果超出了判定条件,弹出提示窗口,点击确定,回到输入编辑模式,正常情况是修改输入数据或ESC退出编辑模式。

现在无意中遇到了一个问题:当弹出提示窗口后,点击确定,回到单元编辑状态时,此时无意中点击到其他的表头,系统转到所点击的表中,之前的提示窗口出现,系统就卡死在这个提示窗口界面上,无法回到正常状态,也只能CTRL+ALT+DEL强行中断系统的运行。

请教如何避免这种情况发生?

当然,不要点击表头是一种办法,呵呵


--  作者:狐狸爸爸
--  发布时间:2012/6/8 8:13:00
--  
问题收到。