Выделение цветом повторяющихся слов

Создание, использование компонентов ActiveX
Aerus
Новичок
Новичок
 
Сообщения: 31
Зарегистрирован: 08.10.2006 (Вс) 15:40

Выделение цветом повторяющихся слов

Сообщение Aerus » 28.12.2006 (Чт) 18:26

Я создал список в Excele, и теперь мне нужно задать цвет в программе и чтобы этим цветом выделились повторяющиеся строки, помогите это реализовать.

Summer.05
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 285
Зарегистрирован: 28.12.2005 (Ср) 20:19
Откуда: Москва

Сообщение Summer.05 » 04.07.2007 (Ср) 16:38

Приветствую всех!
Есть код (VB6, Access):

Private Sub Command1_Click(Index As Integer)
'поиск по ключевым словам
Dim KeyWord As String

KeyWord = InputBox("Ведите буквы ключевого слова" + vbCrLf + _
"(можно не полностью)", "Поиск", "")

If KeyWord <> "" Then
Adodc1.RecordSource = "SELECT * FROM DB where Title like " + _
Chr(39) + "%" + KeyWord + "%" + Chr(39)

' MsgBox Adodc1.RecordSource
Adodc1.Refresh ' выполнить запрос
End If
Text3.Text = DataGrid1.ApproxCount
Text2.Text = KeyWord + " ..."

End Sub


Не подскажите ли, как сделать, чтобы в DataGrid1 было выделено цветом поисковое слово (KeyWord)?
Спасибо всем, кто отзовется!

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 04.07.2007 (Ср) 22:43

Summer.05, во-первых, DataGrid не поддерживает раскраску цветом, и во-вторых, твой вопрос не имеет ни малейшего отношения к топику, в который ты его поместил. Не только к топику, но и к разделу.

"Использовать поиск" -- это несколько другое.
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

Summer.05
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 285
Зарегистрирован: 28.12.2005 (Ср) 20:19
Откуда: Москва

Сообщение Summer.05 » 06.07.2007 (Пт) 9:51

GSerg
10-4
Принял, понял, спасибо!


Вернуться в Компоненты

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 4

    TopList