می توانی از متد select دیتاتیبل استفاده کنی این هم کد تغییر یافته شما
Dim Con As New SqlConnection("Server=LocalHost;Database=Markaz2;I ntegrated Security=True;")
Dim DA As New SqlDataAdapter("SELECT RTrim(Name) + ' ' + RTrim(Details) As Name,GoodID, Remains FROM Goods", Con)
Dim DT As New DataTable
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Con.Open()
DA.Fill(DT)
ddlGood.DataSource = DT
ddlGood.DisplayMember = "Name"
ddlGood.ValueMember = "GoodID"
End Sub
Private Sub ddlGood_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ddlGood.SelectedIndexChanged
Dim r As DataRow
r = DT.Select("GoodID=" + ddlGood.SelectedValue.ToString)(0)
Label1.Text = r.Item("age").ToString
End Sub
من به ساختار برنامه شما اشنا نیستم اما فکر کنم با این کدهایی که دادم بتوانید پروژتان را جمع جور کنید شما می خواهید یک داده را جستجو کنید که این کار هم با متد select دیتا تیبل یا find بایندینگ سورس یا دیتاویو انجام می شود که باید خودتان دستی تعریف کنید