以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  keydown事件错误  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=116504)
--  作者：刘林
--  发布时间：2018/3/25 22:50:00
--  keydown事件错误
If e.KeyCode = Keys.Enter Then
    e.sender.WriteValue
    If val(e.Sender.Text) > val(e.Form.Controls("textbox3").text) Then
        MessageBox.show("请注意,你输入值大于了设定值","提示",MessageBoxButtons.OK)
        e.Sender.Select
        e.Sender.Text = ""
    Else
        If e.sender.text = ""
            e.sender.value = "0"
        End If
        If Tables("初中上分_table1").Position < Tables("初中上分_table1").Rows.Count-1 Then
            Tables("初中上分_table1").Position += 1
            DataTables("成绩").Save()
        End If
        If e.Form.Controls("checkbox2").checked = True Then
            If e.Form.Controls("checkbox4").checked = True Then
                
                e.Form.Controls("textbox6").Select
            Else
                If e.Form.Controls("checkbox1").checked = True Then
                    e.Form.Controls("textbox4").Select
                Else
                    e.sender.Select
                End If
            End If
        End If
    End If
    e.Cancel = True
End If


“错误代码：If e.KeyCode = Keys.Enter Then”    请问这个keydown事件是什么原因？
--  作者：有点甜
--  发布时间：2018/3/25 23:33:00
--  
代码没问题
--  作者：刘林
--  发布时间：2018/3/26 8:36:00
--  
问题就在于感觉没问题，但始终关闭代码窗口就出现这个，请问还有什么原因可能造成
--  作者：有点甜
--  发布时间：2018/3/26 8:51:00
--  
以下是引用刘林在2018/3/26 8:36:00的发言：
问题就在于感觉没问题，但始终关闭代码窗口就出现这个，请问还有什么原因可能造成

 

出错截图发出来说明

 

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

 

完整代码发出来说明