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