#post-id: 3184-11-50
#original-date: 14.04.2009 Tue
#original-time: 11:50 AM
#original-day:  3184
#original-host: WinXP Prof SP1 (Build 2600)

Кстати, маленькое ноу-хау.

Private Sub txtAuthor_GotFocus()  asHighlightText GetFocusAPI() End Sub Private Sub txtCopyright_GotFocus()  asHighlightText GetFocusAPI() End Sub

Раньше я это делала так:

Private Sub txtAuthor_GotFocus()  asHighlightText Me.txtAuthor.hWnd End Sub Private Sub txtCopyright_GotFocus()  asHighlightText Me.txtCopyright.hWnd End Sub

А тут глянула и поняла, что фокус ведь передаётся текстбоксу, поэтому можно использовать GetFocus() для получения манипулятора. И ни чего особо писать не нужно.