用VC的Edit控件做的界面，默认就是这个样子的。文本框一得到焦点，内容就被选中，这样比较容易修改。但是VB的TextBox控件，默认的是，当文本框得到焦点是，保持上一次失去焦点是的情况（原来如果有选择，现在选择的部分被高亮显示，原来如果没有选择，现在也没有选择）很多时候，截面上有很多文本框，我们希望实现每一次文本框得到焦点时，全部内容都处于被选中的状态。我现在知道的方法是：Private Sub Text_GotFocus()
Text.SelStart = 0
Text.SelLength = Len(Text.Text)
End Sub如果界面上有20个文本框，这段代码就要被写20次。很容易有遗漏或者由于反复拷贝造成错误。有没有什么好的办法，可以在一个函数里对文本框设置这个功能。比如说，有没有一个函数可以实现 SetControlStyle(Text.hWnd, AutoSelectContent)或者有没有可能使用钩子？请大家积极参加讨论。谢谢！
Text.SelStart = 0
Text.SelLength = Len(Text.Text)
End Sub如果界面上有20个文本框，这段代码就要被写20次。很容易有遗漏或者由于反复拷贝造成错误。有没有什么好的办法，可以在一个函数里对文本框设置这个功能。比如说，有没有一个函数可以实现 SetControlStyle(Text.hWnd, AutoSelectContent)或者有没有可能使用钩子？请大家积极参加讨论。谢谢！
解决方案 »
免费领取超大流量手机卡，每月29元包185G流量+100分钟通话, 中国电信官方发货