在datawindow下enter模拟tab新方法.txt

PB常用技巧 PB常用技巧 PB常用技巧

在本站看到chinahdd发表的关于用enter键代替Tab键的方法（绝对可靠）的贴子后，我认为有个更好的办法来解决，不用建立一个按钮来解决问题。解决方法是自定义一个事件，事件ID为pbm_dwnprocessenter，然后在此事件中写入以下语句：

If GetColumnName()='mx_note' Then
If GetRow()=RowCount() Then
  dw_3.SetFocus()
  Return 1
End If
End If
Send(Handle(This),256,9,Long(0,0))
Return 1


mx_name为最后一列，当到最后一行时则把焦点移到dw_3上。大家可以试试。只要改变一下最后一列和到最后一行的最后一列时需要得到焦点的控件名称就OK了。