Visual Basic - enlazar 2 datagridview

'VB 2012 

    Private Sub DgvPersona_CellMouseClick(sender As Object, e As System.Windows.Forms.DataGridViewCellMouseEventArgs) Handles DgvPersona.CellMouseClick

        Try

            Dim row As DataGridViewRow = Me.DgvPersona.CurrentRow

            Me.txtCodigoPersona.Text = CStr(row.Cells(0).Value).ToString  ' Aqui pongo el codigo que esta en la primnera columna por eso el 

 celda Cero ... de la persona en un txt y en el evento change del txt

             '  mando a llenar otro grid que en tu caso seria el detalle de los pedidos con el codigo de lciente entiendo...

        Catch ex As Exception

            Exit Sub

        End Try

    End Sub

  Private Sub txtSecuencial_TextChanged(sender As System.Object, e As System.EventArgs) Handles txtSecuencial.TextChanged

        If txtSecuencial.Text = 0 Then Exit Sub

        Dim objetoDatareader As OleDb.OleDbDataReader

        Dim ObjetoDatosPersona As New clsDatosPersona

        Try

            'creo un Objeto

            ObjetoDatosPersona.codigoPersona = Me.txtCodigoPersona.Text

            ObjetoDatosPersona.secuencial = Me.txtSecuencial.Text

            objetoDatareader = ObjetoDatosPersona.MantenimientoDatosPersona("C")

            If (ObjetoDatosPersona.IdError = 0) Then

                If objetoDatareader.Read Then

                    Dim reader = objetoDatareader

                    Me.cmbTipoContacto.SelectedValue = reader("TipoContacto")

                    Me.txtDescripcionDatoPersona.Text = reader("DescripcionDatoPersona")

                Else

                    MsgBox("Empleado consultado no Existe", MsgBoxStyle.Critical, "Error")

                End If

            Else

                MsgBox("Error" & ObjetoDatosPersona.DescripcionError, MsgBoxStyle.Critical, "Error En Ingreso")

            End If

        Catch ex As Exception

            MsgBox("Error de Aplicacion" & ex.Message, MsgBoxStyle.Critical, "Error En Ingreso")

        End Try

    End Sub

'mi codigo  esta en una aplicacion de tres capas y tengo una clase  que me hace estas busquedas dentro de la misma clase pero si para ti es complicado podrias es que con el codigo cargado en el txt solo mandes a hacer el select llenas el datareader y se lo asignas como sourse al grid.. 

Private Sub txtSecuencial_TextChanged(sender As System.Object, e As System.EventArgs) Handles txtSecuencial.TextChanged

    If txtSecuencial.Text = 0 Then Exit Sub

    Dim objetoDatareader As OleDb.OleDbDataReader

    Dim ObjetoDatosPersona As New clsDatosPersona

      ''Aqui pones la consulta al data reader select datos de la tabla pedidas donde el id de cliente =  txttxtSecuencial

asignas el valor al data reader y luego lo haces llenar o lo pones como source al datagrid

End Sub