通过TAB键切换焦点到组件则全选内容

xiaoka2018

刚刚在问答区写例子的时候，回复完才发现代码可以更简短一点
那就开个贴，方便以后有需要的朋友
只需要在需要全选内容的组件的获取焦点事件下加上两行代码即可
根据大家的提醒，代码已由“发送消息”改为“被选择字符数”

  

子程序名	返回值类型	公开	备 注
_编辑框1_获得焦点

如果真 (GetAsyncKeyState ( #Tab键 ) ≠ 0)  ' 判断是否按下
编辑框1.被选择字符数 ＝ -1  ' 全选内容

子程序名	返回值类型	公开	备 注
_组合框1_获得焦点

如果真 (GetAsyncKeyState ( #Tab键 ) ≠ 0)
组合框1.被选择字符数 ＝ -1

DLL命令名	返回值类型	公开	备 注
GetAsyncKeyState	整数型		公开, 取键状态
DLL库文件名:
user32.dll
在DLL库中对应命令名:
GetAsyncKeyState
参数名	类 型	传址	数组	备 注
键代码	整数型			vKey Long，欲测试的虚拟键的键码

.版本 2<br /> .子程序 _编辑框1_获得焦点<br /> <br /> .如果真 (GetAsyncKeyState (#Tab键) ≠ 0)  ' 判断是否按下<br />     编辑框1.被选择字符数 ＝ -1  ' 全选内容<br /> .如果真结束<br /> <br /> <br /> .子程序 _组合框1_获得焦点<br /> <br /> .如果真 (GetAsyncKeyState (#Tab键) ≠ 0)<br />     组合框1.被选择字符数 ＝ -1<br /> .如果真结束<br /> <br /> .版本 2<br /> <br /> .DLL命令 GetAsyncKeyState, 整数型, "user32.dll", "GetAsyncKeyState", , 公开, 取键状态<br />     .参数 键代码, 整数型, , vKey Long，欲测试的虚拟键的键码

pipicool

学习一下

ttggnn

感谢分享

396384183

学习参考

ttggnn

支持开源~！感谢分享

bianyuan456

xiaoka2018 发表于 2023-8-30 08:47
没区别，只是我不知道有“被选择字符数”这个东西

感谢解答

君九

感谢分享

renjianhong48we

感谢分享

xiaoka2018

bianyuan456 发表于 2023-8-30 01:32
请问楼主，这种方法和
编辑框1.被选择字符数 ＝ -1
相比，有何区别？

没区别，只是我不知道有“被选择字符数”这个东西

一指温柔

支持开源~！感谢分享