[VS17]: Connessione tra ComboBox e TextBox tramite metodo select

[SanMichele]

Ciao ragazzi,
ho un database.accdb con una tabella chiamata "Collaboratori" associo i dati alla combobox con questo codice:

Imports System.Data.OleDb
Private Sub CaricaCollaboratori()
        Try
           
            Using sqlConnessione As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.16.0;Data Source=C:\COW-23\COW23\COW23\Database\Database_Generale.accdb")
                sqlConnessione.Open()
                Using CommandSql As New OleDbCommand("Select ID, COLLABORATORE, PASSWORD, EMAIL, DATA_NASCITA FROM PASSWORD_COLLABORATORE", sqlConnessione)
                    Using dtaAdapter As New OleDbDataAdapter(CommandSql)
                        Using dttDati As New DataTable()
                            dtaAdapter.Fill(dttDati)
                            cbo_connetti.ValueMember = "ID"
                            cbo_connetti.DisplayMember = "COLLABORATORE"
                            cbo_connetti.DataSource = dttDati.DefaultView


                        End Using


                    'End Using
                End Using
            End Using
        Catch ex As Exception
            MessageBox.Show("Errore: " + ex.Message, "Gestione Errore", MessageBoxButtons.OK, MessageBoxIcon.Error)
        End Try
    End Sub

Fin qui tutto bene, ma quando clicco un collaboratore all'interno della combobox vorrei visualizzare la sua mail nella textbox
???

Mi rendo conto che sia una cavolata in VB10 ma con VB17 ho delle difficoltà.
Scusate il mio livello basso
SanMichele

[optime]

hai provato a fare come faresti in VB10? posta il codice e l'eventuale messaggio di errore

[LeleFT]

Spostata discussione nel forum dedicato a VB.

[SanMichele]

Scusa LeleFT pensavo di essere in VB perdonatemi

[SanMichele]

Ciao optime,
questo è il codice e l'errore è su

txt_password.Text = objSelectedItem.ToString("PASSWORD")

Private Sub cbo_connetti_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cbo_connetti.SelectedIndexChanged



        Dim intSelectedIndex As Integer
         intSelectedIndex = cbo_connetti.SelectedIndex
         Dim objSelectedItem As Object
        objSelectedItem = cbo_connetti.SelectedItem


        txt_password.Text = objSelectedItem.ToString("PASSWORD")
    End Sub

[optime]

e l'errore?

[SanMichele]

System.InvalidCastException: 'Cast non valido dalla stringa "PASSWORD" al tipo 'Integer'.'

[optime]

non credo che avrebbe funzionato neanche in VB10

objSelectedItem.ToString("PASSWORD") è un non senso, "PASSWORD" tra virgolette è già una stringa. Stai cercando di leggere il testo contenuto nella colonna che ha come intestazione "PASSWORD"?

[optime]

e comunque l'indice di una combo è un numero, non una stringa...

[optime]

https://www.google.com/search?q=vb.net+combobox di sicuro trovi qualcosa