Erro de atualização query utilizando Entity Framework e vb.net

05/07/2017

0

Estou precisando de uma ajuda para resolver este problema. Realizo a consulta abaixo no evento change de uma combobox, para carregar algumas textbox. Na primeira rodada tudo vai bam. Mas quando mudo a consulta não atualiza. O que estou fazendo de errado?

Private Sub cmb_MatPriGusaLiq_EditValueChanged(sender As Object, e As EventArgs) Handles cmb_MatPriGusaLiq.EditValueChanged
Try
Dim ID_MatPri As Integer = Nothing
ID_MatPri = CInt(cmb_MatPriGusaLiq.EditValue)
Dim Q_MatGusLiq As IQueryable(Of TB_MateriaPrima_ThermoLD) = (From p In EF_SSThermoLD.TB_MateriaPrima_ThermoLD
Where p.ID_MatPrima = ID_MatPri
Select p)
Dim CQSelecionada As List(Of TB_MateriaPrima_ThermoLD) = Q_MatGusLiq.ToList()

If Q_MatGusLiq.Count > 0 Then

For Each n In Q_MatGusLiq
txt_TeorCGusa.Text = CSng(n.TeorC)
txt_TeorMnGusa.Text = CSng(n.TeorMn)
txt_TeorSiGusa.Text = CSng(n.TeorSi)
txt_TeorPGusa.Text = CSng(n.TeorP)
txt_TeorSGusa.Text = CSng(n.TeorS)
txt_TeorFeGusa.Text = CSng(n.TeorFe)
Exit For
Next

Else
Throw New System.Exception("Consulta de materia prima retornou vazia.")
End If

Catch ex As Exception
MsgBox(ex.Message, vbOKOnly)
End Try
End Sub
Cristóvão

Cristóvão

Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar