مبتدئ يسألكم مالخطأ في هذا الكود؟

السلام عليكم ,,

لقد اتممت بحمد الله ربط الفجول بيسك دوت نت بالداتا بيز ,, ولكني اريد الآن ان اضع تيكست بوكس ,, وبوتون ,, عند الضغط على البوتون يأخذ القيمه التي في التكست بوكس ويدخلها داخل السلكت ليخرج لنا النتائج ,,

عندي مشكلتين الاولى كيف يأخذ القيمه من التكست بوكس ويضيفها للسلكت ,, الثانيه كيف يعرض النتائج ؟ سمعت عن الداتا قريد فيو ولكني حاولت استخدامه ولم استطع ,, مع العلم اني جربت عمليه الابدتيت بدلا من السلكت ونجحت !

الكود هذا هو

		Dim cm As New SqlConnection()
		Dim xxx As String

		Dim dr As SqlDataReader
		xxx = TextBox1.Text
		cm.ConnectionString = "Data Source=YOUR-050E312681;Initial Catalog=sss;Integrated Security=True"
		cm.Open()
		Dim sqlsts As String = "select customer_name from customers where customer_id=" & xxx

		Dim cmdd As New SqlCommand()
		cmdd.Connection = cm
		cmdd.CommandText = sqlsts
		dr = cmdd.ExecuteReader()

		dr.Close()