ayuda con consulta en visual basic

[alexiel3006]

hola estoy intentando hacer una consulta en vb pero no estiendo mucho y no se si lo que haga es asi .
se la manda para que alguien mediga como la engo que hacer o si se puede arreglar
Private Sub Consutal_Click()
Data1.RecordSource = "SELECT Personal.Nombre, Personal.Apellido, Personal.Direccion, Personal.Telefono, Count(Pedido.Nro_legajo) AS CuentaDeNro_legajo" & _
" FROM Pedido INNER JOIN (Personal INNER JOIN Deposito ON Personal.ID_deposito=Deposito.ID_deposito) ON Pedido.Nro_legajo=Personal.Nro_legajo" & _
" WHERE (Deposito.ID_deposito)=(' " & DBCombo1.Text & " ') And (Pedido.Fecha_pedido) Between CVDate('" & Text1.Text & "') And CVDate('" & Text2.Text & "')" & _
" GROUP BY Personal.Nombre, Personal.Apellido, Personal.Direccion, Personal.Telefono" & _
" HAVING count(Pedido.Nro_legajo)>= (' " & Text4.Text & " ') "
Data1.Refresh
DBGrid1.Refresh


End Sub

bueno de verdad nesecito su ayuda espero que me o puedan explicar o decir como se hace
gracias

[-rommel_]

amigo yo te recomiendo que trabajes mejor con ADO, aqui en el foro encontraras muchos temas sobre ADO, es mucho mejor de lo que tu estas trabajando