[lindachan]

#post-id: 3638-14-36
#original-date: 12.07.2010 Mon
#original-time: 2:36 PM
#original-day:  3638
#original-host: WinXP Prof SP3 (Build 2600)

Вот фрагмент события, в котором изменившийся текст в текущем текстбоксе должен выделиться:

Private Sub txtSlot_Change(Index As Integer)
  Me.txtSlot(Index).SelStart = Len(Me.txtSlot(Index).Text)
  Me.txtSlot(Index).SelLength = 0
End Sub

В одном из изменений Агехи он перестал работать. Я долго думала, потом заменила на asHighlightText(), и всё заработало. Мне стало интересно, и я вдруг осознала, какая идиотская ошибка тут скрыта. Почувствуйте разницу:

Private Sub txtSlot_Change(Index As Integer)
  Me.txtSlot(Index).SelStart = 0
  Me.txtSlot(Index).SelLength = Len(Me.txtSlot(Index).Text)
End Sub