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事件是什么原因？
加好友 
发短信
Post By：2018/3/25 22:50:00 [显示全部帖子]
