vb 获取焦点选中文本

vf如何能做到在文本框输入完，程序进行了计算后，再次自动获取焦点并选中文本？

---

先给予焦点
Text1.SetFocus
然核辩后修改这个
Text1.SelStart = XXX '表示选择从哪里开乎谈始
Text1.SelLength = XXX '表示选择多岁氏碰长的文字

然后就可以通过
Text1.SelText来获取选择的文字了

---

同意LS的观点 不过 长度要大点 避免没全部选中

---