Visual Basic - no aparecen datos en DBGRID

TENGO UN DBGRID ENLAZADO A UN CONTROL DATA EL CUAL ME HACE UNA CONSULTA A UNA TABLA EN ACCES, EL DBGRID SE ACTUALIZA Y ME MUESTRA EL NOMBRE DE LAS DIFERENTES COLUMNAS DE REGISTROS PERO NO ME MUESTRA NINGUN DATO CUANDO DEBERIA HACERLO, ES DECIR APARECE EN BLANCO. GRACIAS

Data4.RecordSource = "SELECT * FROM Listado WHERE Pro_Producto_ID = " & AlgunControl & ""
Data4.Refresh
DBGrid2.Refresh

pos mira que tira error eso que pusiste me dice algo como asi que se nesesita un control o algo paresido y no me deja continuar

me lo podeis explicra mano, ya que estoy bastante confundido y no encuentro la solusion

grasias por contestar