TextBox и DataGrid

[Lorik]

Подскажите, пожалуйста, можно ли найти элемент в DataGrid по нескольким начальным буквам или первому слову из TextBox?

[Rainbow]

А что у тебя за проблема?
Ты не знаешь, как перебрать все элементы в гриде? Используй Col и Row.
Ты не знаешь, как сравнить строки? Используй операции со строками - Instr, Left...

Очень общий вопрос у тебя - конкретизируй.

[Lorik]

Есть DataGrid с кодом и наименованием параметра и TextBox
При вводе в TextBox первых букв наименования параметра в DataGrid должна подсвечиватся (или как-то выделяться) строка с параметром, начинающимся на эти буквы.

[Rainbow]

Слови событие Change от своего текстбокса
У тебя грид связан с рекордсетом? Поищи в самом рекордсете - грид сам встанет на нужную запись

Adodc1.Recordset.MoveFirst
Adodc1.Recordset.Find "CategoryName LIKE '" & Text1.Text & "*'"

Единственно только, если ничего не нашли (Recordset.EOF), нужно это как-то обработать...

[gaidar]

Можно не как-то, а поставить

On Error Goto Err_

Exit Function
Err_:

' обработка


И не мучаться .

[Rainbow]

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

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

    i = DataGrid1.Bookmark
    Adodc1.Recordset.MoveFirst
    Adodc1.Recordset.Find "CategoryName LIKE '" & Text1.Text & "*'"

    If Adodc1.Recordset.EOF Then
        DataGrid1.Bookmark = i 'встанет на строчку с номером i
    End If


А обработку ошибок - это обязательно! Тебе же легче будет потом понять, почему ничего не работает

[gaidar]

Э ... не ...

If Adodc1.Recordset.EOF Then RaiseError ...

Вот чего имелось ввиду у меня . Это к тому, что так проще обрабатывать (ИМХО) всякие неприятные ситуации.

[Rainbow]

Ну, если считать, что такое поведение должно быть общее для ряда ситуаций (эта + какие-нибудь непредвиденные ошибки), тогда да - в этом случае RaiseError оправдан. А так - ну дошли до конца рекордсета (=ничего не нашли), это НОРМАЛЬНАЯ ситуация - чего сразу ошибками кидаться?