Visual Basic - seleccion de un registro

quiero que al momento de realizar una busqueda y si lo encuentra el dato que se seleccione toda la fila del datagrid.

Hola

primero que nada debes cambiar la propiedad del datagrid

DataGrid1.MarqueeStyle = dbgHighlightRow

aqui tienes un ejemplo de como hacer un Find con ADO

Private Sub CmdBuscar_Click()
Dim pos As Variant
pos = Adodc1.Recordset.Bookmark
Adodc1.Recordset.Find "Programa='" + Text1.Text + "'"
If Adodc1.Recordset.AbsolutePosition < 1 Then
Adodc1.Recordset.Bookmark = pos
MsgBox "no encontrado"
End If
End Sub

Saludos...

Hola si yo quero conocer el valor de clave primaria de ese registro como lo hago

gracias