Сделать только одну строку шоу после поиска. flexgrid vb6 - PullRequest
Новая
       16

Сделать только одну строку шоу после поиска. flexgrid vb6

0 голосов
/ 17 апреля 2010

Итак, у меня есть flexgrid в моем проекте vb6, над которым я работаю. В каждой строке есть имена, и у меня есть выпадающий список, чтобы пользователь мог выбрать, для какого имени он хочет видеть больше информации, вот что у меня есть. 

Dim target_name As String

Dim r As Integer 

' Get the name.
target_name = Combo1
If Len(target_name) = 0 Then Exit Sub

' Search for the name, skipping the column heading row.
target_name = LCase$(target_name)
For r = 1 To MSFlexGrid1.Rows - 1
    If LCase$(MSFlexGrid1.TextMatrix(r, 0)) = _
        target_name Then
        ' We found the target. Select this row.
        MSFlexGrid1.Row = r
        MSFlexGrid1.RowSel = r
        MSFlexGrid1.Col = 0
        MSFlexGrid1.ColSel = MSFlexGrid1.Cols - 1

        ' Make the row visible.
        MSFlexGrid1.TopRow = r
        Exit Sub
    End If
Next r

Это хорошо работает, но оно также показывает все, что находится под этим именем, я бы хотел выделить только выбранное имя. Любая помощь будет великолепна.

1 Ответ

0 голосов
/ 17 апреля 2010

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

P.S. Я использовал flexgrid в vb6, и я не знаю, как сделать то, что вы просите в сетке (возможно, там, но я никогда этого не замечал).

...