请教如何实现textbox获得焦点后白字蓝底

请问怎么实现textbox获得焦点后白字蓝底？
就象是选中的文字内容后成了白色的字蓝色的底这样的功能？
[解决办法]
本帖最后由 bcrun 于 2013-01-19 09:56:50 编辑

text1.selstart=0
text1.sellength=len(text1)