自动选择 Text 的内容

来源：天涯风铃 作者：- 出处：巧巧读书 2006-03-08 进入讨论组

• 关 键 词：

在使用 VFP 的应用进行录入时，每进入一个录入框，就自动选择该框中的所有内容。利用以下的代码，也可实现类似的功能。
Private Sub MyTextBox_GotFocus()
AutoSelect MyTextBox
End Sub
　
Sub AutoSelect(SelObject As Control)

SelObject.SelStart = 0
If TypeOf SelObject Is MaskEdBox Then
SelObject.SelLength = Len(SelObject.FormattedText)
Else
If TypeOf SelObject Is TextBox Then
SelObject.SelLength = Len(SelObject.Text)
End If
End If
End Sub

转载保留：http://www.qqread.com/foxpro/h862764605.html进入讨论组讨论。

【收藏此文】【大 中 小】【打印】【关闭】

较早的文章：获取网络上的用户名

较新的文章：VFP基础教程 第一章 数据库系统基础知识