Avendo questo codice:
codice:
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim cn As New MySqlConnection("database=miodb")
cn.Open()
Dim cmd As New MySqlCommand("select * from clienti", cn)
Dim dr As MySqlDataReader = cmd.ExecuteReader(CommandBehavior.CloseConnection)
Do While dr.Read
ListBox1.Items.Add(dr("cognome"))
ListBox1.ValueMember = dr("idclienti")
Loop
End Sub
Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
MsgBox(ListBox1.SelectedValue)
End Sub
xkè quando clicco su un qualsiasi elemento della listbox non mi visualizza il relativo valore?
Grazie