[Beginer]

في الاجراء Showimageinlistview أضف السطر التالي تحت With Lvi هكذا

PHP كود :

With Lvi
    .Tag = ds.Tables(0).Rows(x).Item("car_id") 


ثم أضف هذا الكود الخاص بالأداة ListView وهو نفس الكود في ListBox1_MouseClick باختلاف جزء بسيط في السطر الأول

PHP كود :

Private Sub ListView1_MouseClick(sender As Object, e As MouseEventArgs) Handles ListView1.MouseClick
    Dim dp As New OleDbDataAdapter("select * from Table1 where car_id =" & ListView1.SelectedItems(0).Tag & " ", conn)
    Dim ds As New DataSet

    dp.Fill(ds)

    If ds.Tables(0).Rows.Count <> 0 Then

        TXTID.Text = ds.Tables(0).Rows(0).Item(0)
        TextBox1.Text = ds.Tables(0).Rows(0).Item(1)
        TextBox2.Text = ds.Tables(0).Rows(0).Item(2)
        TextBox3.Text = ds.Tables(0).Rows(0).Item(3)

        PictureBox1.DataBindings.Clear() : PictureBox1.DataBindings.Add("Image", ds.Tables(0), "car_image", True)

    Else

        MsgBox("السجل غير موجود", 64, "Program Name")

    End If

    dp.Dispose()
End Sub