通过快速搜索突出显示数据网格中的记录

Question

我想在搜索记录后突出显示 datagrid 中的特定记录。这就像一个快速搜索，用户写下名字，记录就会立即被找到。到目前为止，我只有一个指向记录的箭头，但我需要将其完全突出显示。提供图像以供进一步解释。代码：

Private Sub txtQuickSearch_Change()
Dim varBookmark As Variant
        With StudentTable
                varBookmark = .Bookmark
            If (.SelBookmarks.Count <> 0) Then
                .SelBookmarks.Remove 0
            End If
                Adodc1.Recordset.MoveFirst

                Adodc1.Recordset.Find "[Last Name] like '" & txtQuickSearch.Text & "'"

            If frmStudents.Adodc1.Recordset.BOF Then

                .SelBookmarks.Add Adodc1.Recordset.Bookmark     
            End If
        End With
End Sub

Answer 1

@Jim Hewitt，解决了这个问题，我需要添加这个声明： If Not frmStudents.Adodc1.Recordset.BOF And Not frmStudents.Adodc1.Recordset.EOF Then

通过快速搜索突出显示数据网格中的记录

Highlight record in Datagrid through quick search

vb6

datagrid

ado