PB中用回车键实现tab键的功能

最新推荐文章于 2023-03-10 10:40:59 发布

weixin_30597269

最新推荐文章于 2023-03-10 10:40:59 发布

阅读量622

点赞数

原文链接：http://www.cnblogs.com/diyishijian/p/3998928.html

版权

先编辑控件的TabOrder顺序，然后在 global external functions  中定义一个API：
Subroutine keybd_event(int bVk,int bScan,ulong dwFlags,ulong dwExtraInfo) LIBRARY "user32.dll"
在窗口的key（）事件中写如下代码：
If key = KeyEnter! Or Key = KeyRightArrow! Then   
   keybd_event( 9,0,0,0 )  //   按下tab   

   keybd_event( 9,0,2,0 )  //   释放tab   
   Return 1   
End If  
If Key = KeyleftArrow! Then   
   keybd_event( 16,0,0,0 ) //   按下shift   
   keybd_event( 9,0,0,0  ) //   按下tab   
   keybd_event( 9,0,2,0  ) //   释放tab
   keybd_event( 16,0,2,0 ) //   释放shift   
   Return 1    
End If

转载于:https://www.cnblogs.com/diyishijian/p/3998928.html