Выделение строки в TextBox'e

[Diamond]

Народ, подскажите, как сделать так, чтобы при обычном щелчке по текстбоксу выделялась та его строка, на которой оказался курсор после щелчка.

На первый взгляд вроде просто, а вы попробуйте!

[hCORe]

Попробуй через метод SendKeys (посылка клавиш), хотя это, безусловно, не лучший вариант:

Код: Выделить всё

Private Sub Text1_Click()
    'послать клавишу Home
    SendKeys "{HOME}", True
    'послать клавиши Shift+End
    SendKeys "+{END}", True
End Sub

Зато работает

ЗЫ. Можно еще в цикле перебирать и искать начало строки (самая последняя найденная через InStr позиция символа vbCrLf, который находится до текущей позиции Text1.SelStart плюс два - длина символа перевода строки), на которую щелкнул пользователь, а потом искать конец (следующая позиция vbCrLf). Но это медленнее, зато - по-программистски Мы не ищем легких путей