Какой код лучше?

Ниже приводятся 2 примера быстрого выделения текста
в TextBox-е для события GotFocus.
Хотелось бы узнать какой код лучше, целесообразней?
Есть ли способ без прописания для каждого текстового поля
в Private Sub Text1_GotFocus() 'ссылки' к процедуру?
Заранее благодарен.
1-й ----------------------------------------
http://www.microsoft.ru/msdn/library/kolesov/tips/9808.htm#tip143
Public Sub FocusMe(ctlName As Control)
With ctlName
.SelStart = 0
.SelLength = Len(ctlName)
End With
End Sub
Private Sub txtFocusMe_GotFocus()
Call FocusMe(txtFocusMe)
End Sub
2-й ----------------------------------------
http://www.microsoft.ru/msdn/library/kolesov/tips/9605.htm#tip13a
Sub SetSelected()
Screen.ActiveControl.SelStart = 0
Screen.ActiveControl.SelLength = _
Len(Screen.ActiveControl.Text)
End Sub
Private Sub txtField_GotFocus()
SetSelected
End Sub

0

1

>1
У него есть маленький минус, который с увеличением количества
текстовых полей становится большим, а именно: надо всегда
прописывать имя ТextBox-a - Call FocusMe(txtFocusMe).
Если их во всей проге штук 300, вписывать замаешся, да и
вероятност очепятки, пропуска возрастает. Хотелось бы найти
вариант где вообще не приходилось бы вписывать
в Private Sub Text1_GotFocus()

0