Question

vb中如何实现lostfocus和按回车键

在vb中，计算数值，如何让一个文本框中的lostfocus和按下回车键可以同时起作用，就是lostfocus可以计算，按下回车键也可以

Answer 1

把代码写到这两个事件里
或者写个子程序供这两个事件调用
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then 写入代码，回车键的ascii码是13
End Sub

Private Sub Text1_LostFocus()
写入代码
End Sub

Answer 2

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then 写入代码，回车键的ascii码是13
End Sub

Private Sub Text1_LostFocus()
写入代码
End Sub