Сообщение EM_EXSETSEL

Const EM_EXSETSEL = (WM_USER + 55)

Сообщение EM_EXSETSEL выделяет текст и/или COM-объекты в rich edit control

Возвращаемое значение

В успешном случае возвращается устанавливаемое выделение

Параметры

wParam
Не используется - установите равным 0
lParam
Структура CHARRANGE, определяющая выделение

Пример

Dim x As String

x = String(32800, "М")
RichTextBox1.Text = x

SendMessage RichTextBox1.hwnd, EM_EXSETSEL, 0, 3

RichTextBox1.SelLength = 3

MsgBox RichTextBox1.SelText

Категория

Rich Edit Controls