datagrid 数据高亮展示

datagrid 数据高亮显示set datagrid1.datasourceadodc1Adodc1.Recordset.MoveFirstK Val(Trim(Text1.Te

datagrid 数据高亮显示
set datagrid1.datasource=adodc1
Adodc1.Recordset.MoveFirst
K = Val(Trim(Text1.Text))
Adodc1.Recordset.Find DD " =" & K & "" 'DD是一字段

查找到数据之后,怎样使其在datagrid 中高亮显示
[解决办法]
K = Val(Trim(Text1.Text))
Adodc1.Recordset.Find "iD=" & K  'DD是一字段
DataGrid1.SelBookmarks.Add Adodc1.Recordset.AbsolutePosition