Форум программистов, компьютерный форум, киберфорум
Наши страницы

Visual Basic .NET

Войти
Регистрация
Восстановить пароль
 
Anderis49
-48 / 31 / 8
Регистрация: 07.08.2013
Сообщений: 624
Записей в блоге: 1
#1

Получить выделенный текст в RichTextBox - Visual Basic .NET

04.07.2015, 16:50. Просмотров 332. Ответов 6
Метки нет (Все метки)

Лучший ответ Сообщение было отмечено автором темы, экспертом или модератором как ответ
Всем доброго времени суток!

На форме находиться ритексбокс с текстом.

Вопрос:
Если выделить курсором слово из текста, то как получить его значение?

Добавлено через 18 минут
Сам написал - сам ответил.
vb.net
1
2
3
4
5
6
7
8
9
10
11
12
13
14
  Private Sub richTextBox1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles RichTextBox1.MouseDown
        If e.Clicks = 1 And e.Button = MouseButtons.Left Then
            positionToSearch = RichTextBox1.GetCharIndexFromPosition(New Point(e.X, e.Y))
        End If
    End Sub
 
    '///
    Dim positionToSearch As Integer
    Private Sub RichTextBox1_MouseUp(sender As Object, e As System.Windows.Forms.MouseEventArgs) Handles RichTextBox1.MouseUp
        Dim positionToAp As Integer = RichTextBox1.GetCharIndexFromPosition(New Point(e.X, e.Y))
        RichTextBox1.SelectionStart = positionToSearch
        RichTextBox1.SelectionLength = positionToAp
        MsgBox(Mid(RichTextBox1.Text, positionToSearch, Math.Abs(positionToSearch - positionToAp - 1)))
    End Sub
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
04.07.2015, 16:50
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Получить выделенный текст в RichTextBox (Visual Basic .NET):

.NET 4.x Получить выделенный узел TreeView - Visual Basic .NET
Помогите мне немного разобраться с этим компонентом, он довольно нужный, но понять я его не как не могу. В интернете указано только как...

.NET 4.x Как сделать чтобы из браузера chrome можно было перетягивать выделенный текст в Textbox - Visual Basic .NET
Как сделать чтобы из браузера chrome можно было перетягивать выделенный текст в Textbox. Просто надо чтобы любой выделенный текст...

Распарсить текст из Richtextbox'a - Visual Basic .NET
Доброе время суток) .. Помогите .. с запроса получаю данные в Richtextbox.. после чего нужно из него вытащить несколько данных .. ...

Текст в таблицах richtextbox - Visual Basic .NET
Приветствую! Помогите с проблемой. В программе создается отчет в формате rtf и выводится в richtextbox. В документе есть таблицы....

Текст из RichTextBox не сохраняется правильно - Visual Basic .NET
Почему в моей программе текст, при всех изменениях шрифта и цвета, не сохраняется правильно, то есть файл, после сохранения не отображает...

Перенести текст из RichTextBox в ListView - Visual Basic .NET
в текстовом поле есть текст, отформатированный в виде столбцов. пример: ФИО Должность ...

6
Памирыч
Почетный модератор
20632 / 8673 / 1029
Регистрация: 11.04.2010
Сообщений: 11,008
04.07.2015, 16:59 #2
Может быть еще вот так

vb.net
1
2
3
    Private Sub RichTextBox1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles RichTextBox1.MouseUp
        If RichTextBox1.SelectionLength > 0 Then MsgBox(RichTextBox1.SelectedText)
    End Sub
0
Anderis49
-48 / 31 / 8
Регистрация: 07.08.2013
Сообщений: 624
Записей в блоге: 1
04.07.2015, 17:17  [ТС] #3
Не, Памирыч!
В этот раз ты мимо.
0
Памирыч
Почетный модератор
20632 / 8673 / 1029
Регистрация: 11.04.2010
Сообщений: 11,008
04.07.2015, 17:19 #4
Anderis49, бывает
Понимать вопросы тоже уметь надо
0
Anderis49
-48 / 31 / 8
Регистрация: 07.08.2013
Сообщений: 624
Записей в блоге: 1
04.07.2015, 17:43  [ТС] #5
Цитата Сообщение от Памирыч Посмотреть сообщение
Понимать вопросы тоже уметь надо
Согласен, мне казалось, что спросил вполне понятно - курсором выделил слово и получил это слово в....переменную "txt".
В вашем коде выбирается текст от позиции курсора и до конца строки, что не есть гуд.

Собственно мне нужно чтобы выделенное курсором слово можно было перевести в нижний или верхний регистр.
0
Памирыч
Почетный модератор
20632 / 8673 / 1029
Регистрация: 11.04.2010
Сообщений: 11,008
04.07.2015, 18:07 #6
Лучший ответ Сообщение было отмечено автором темы, экспертом или модератором как ответ
Цитата Сообщение от Anderis49 Посмотреть сообщение
В вашем коде выбирается текст от позиции курсора и до конца строки
Странно, такой ошибки у меня не наблюдалось

Следующий код
vb.net
1
2
3
4
5
    Private Sub RichTextBox1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles RichTextBox1.MouseUp
        If RichTextBox1.SelectionLength > 0 Then
            RichTextBox1.SelectedText = RichTextBox1.SelectedText.ToUpper
        End If
    End Sub
У меня работает так:
Выделяю слово - оно переводится в верхний регистр
Название: Project008.gif
Просмотров: 24

Размер: 86.6 Кб
2
Anderis49
-48 / 31 / 8
Регистрация: 07.08.2013
Сообщений: 624
Записей в блоге: 1
04.07.2015, 18:24  [ТС] #7
Памирыч....

Спасибки и лучший ответ кляцнул.
0
04.07.2015, 18:24
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
04.07.2015, 18:24
Привет! Вот еще темы с ответами:

Закраска текста в RichTextBox не выделяя текст - Visual Basic .NET
Как-то не красиво сделали: чтоб закрасить текст в RichTextBox, его нужно сначала выделить. У меня закрашивается текст при его вводе и это...

Вставить текст в RichTextBox в положение каретки - Visual Basic .NET
Доброго врмени суток! Вот такая проблема: На форме есть rtb и button. Код для button richtextbox1.text = richtextbox1.text +...

Как обрезать текст в RichTextBox до 15 символов - Visual Basic .NET
Ребят, помогите отпилить ненужное :D If RichTextBox1.TextLength > 15 Then 'обрезаем всё, что больше 15

Получить строку RichTextBox - Visual Basic .NET
Привет, мой друг. :) Помогите мне спарсить строки из RichTextBox1.text, он разделены vbCrLf (т.е начинаются с новой строки) Как мне...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.