主题：求助，在Keydown事件中，点击鼠标左键执行事件应如何写代码?

在Keydown事件中，点击鼠标左键
if e.KeyCode = Keys.LButton then
Dim dr as Row = Tables("员工选择_Table1").Current '获得选定行
      If dr Is Nothing Then
         Return
      End If
      dr.checked = true
End if

上面代码不执行不知错在哪？请各位指点！

if e.KeyCode = Keys.LButton then
Dim dr as Row = Tables("员工选择_Table1").Current '获得选定行
      If dr Is Nothing Then
         Return
      End If  (是不是要改成Else)
      dr.checked = true
End if
  意思是不是如果为空的话,返回!否则执行!

是的，关键是点左键不执行，如果Keys.LButton 改成Keys.F1时，按F1键可执行到正确结果，

鼠标应该用mousedown

在表（sql table)中根本没有mousedown 事件呀

在帮助中可查到Keys枚举类型有LButton呀，难道Keys枚举中参数说明有错误。否则会误导。

建议在表事件中加上mousedown及mouseup事件。