[VB.NET] Campi text che non si aggiornano da combo

[zorro77]

Salve a tutti
ho una combo e due campi text ad esso associate. Ovvero, nel momento in cui seleziono un valore della combo, cambiano i valori delle text, in relazione a quanto presente sul db.
Gli inserimenti dei valori della combo li faccio da altra form.
Una volta inseriti i nuovi valori della combo, e ritorno nella form principale, nella combo trovo il nuovo record inserito (in relazione al suo campo), ma quando poi la seleziono, nei campi text non risultano i relativi valori.
Quale potrebbe essere il problema?

Questo è il codice che ho utilizzato:
Form principale:ricava i campi text in relazione al valore della combo selezionata

    Private Sub modProdotto_FattConv()
        Dim riga() As DataRow = DataSetAnagr_Art._6_CodProd.Select("CodiceArticolo='" & cmb_CodProd.Text & "'")
        If riga.Length <> 0 Then
            txt_DescrProd.Text = DirectCast(riga(0), TeleAccise.DataSetAnagr_Art._6_CodProdRow).Descrizione
            txt_FattConv.Text = DirectCast(riga(0), TeleAccise.DataSetAnagr_Art._6_CodProdRow).FattConv
        End If

Form secondaria:inserisce i nuovi valori e aggiorna la combo della form principale

Private Sub salvaRecordNuovoCodProd()
        Dim codProd As String = txt_CodArticolo.Text
        Dim codDescr As String = txt_DescrCodProd.Text
        Dim fatConv As String = txt_FattConv.Text
        TableAdapter_6_CodProd.Insert(codProd, codDescr, fatConv)
        TableAdapter_6_CodProd.Fill(DataSetAnagr_Art._6_CodProd)

        'DataGridViewAnnoReg.Refresh()

        'Aggiorna la MainForm con il nuovo valore
        Form_Main.cmb_CodProd.DataSource = DataSetAnagr_Art._6_CodProd

    End Sub

[Stoicenko]

hai provato in debug a vedere se entri in qull'if?

[zorro77]

Originariamente inviato da Stoicenko
hai provato in debug a vedere se entri in qull'if?

effettivamente nell'if con un nuovo inserimento non entra e cosa ancora più strana, quando faccio un aggiornamento dalla form secondaria dei valori della combo e quindi anche di quelli che devono comparire nelle text, mi riporta il valore vecchio nelle text.
Se però cambio il testo che deve comparire nella combo, lo visualizzo successivamente nella form principale.

Questo è il codice che uso per l'aggiornamento:

    Public Sub salvaRecordModCodProd()
        Dim valID As String = DataGridViewCodProd.SelectedCells.Item(0).Value
        TableAdapter_6_CodProd.UpdateQueryCodProd(txt_CodArticolo.Text, _
                                                  txt_DescrCodProd.Text, txt_FattConv.Text, valID)
        TableAdapter_6_CodProd.Fill(DataSetAnagr_Art._6_CodProd)

        'Aggiorna la MainForm con il nuovo valore
        Form_Main.cmb_CodProd.DataSource = DataSetAnagr_Art._6_CodProd
       
    End Sub