سلام دوستان
پاسخ سوال رو در سایت دیگر گرفتم
اینطور که پیداست SelectedValue در خصوص combobox فقط زمانی جواب میده که DataSource رو مقداردهی کنی. این مقدار باید یک DataTable باشد، حالا یا ا استفاده از کد نویسی و یا با استفاده از شیء Binding.
با این حال کد نهایی برای پُر کردن combobox که بشه از دستور SelectedValue استفاده کدر بصورت زیر می باشد:
Dim CustomersTA As New CustomersTableAdapter
Dim DS As New test2DataSet
CustomersTA.Fill(DS.Customers)
Dim CustomersRows As test2DataSet.CustomersRow
Dim DT As New DataTable
DT.Columns.Add("CustomerID", GetType(Integer))
DT.Columns.Add("CustomerName", GetType(String))
For Each CustomersRows In DS.Customers.Rows
DT.Rows.Add(CustomersRows.CustomerID, CustomersRows.CustomerName)
Next
Me.ComboBox1.DisplayMember = "CustomerName"
Me.ComboBox1.ValueMember = "CustomerID"
Me.ComboBox1.DataSource = DT
البته من از DataSet برای برقراری با جداول استفاده کردم که اگه دوست داشته باشید، با دستورات SQL هم میشه اینکارو کرد.