[islam]

بارك الله فيكم يا شباب ونافعا الله بكم المسلمين اللهم امين يارب العالمين فى قد وجدت حلى والحمد لله
عندما اعرض الكوموبوكس فى الداتا جريد واريد ان اظهر البيانات فيه اكتب اسم العمود الذى اريد انا اعرض فية فقط وهذا هو الكود

Try
Dim con As New OleDbConnection(Query_class.db)
If con.State = ConnectionState.Closed Then con.Open()
Dim sql As String
sql = "select st_name from stock"
Dim cmd As New OleDbCommand(sql, con)
Dim dr As OleDbDataReader
dr = cmd.ExecuteReader
If dr.Read Then
Do
Dim v As String
v = dr.Item("st_name")
Column2.Items.Add(v)
Loop While dr.Read
End If
dr.Close()
con.Close()
Catch ex As Exception
MessageBox.Show(ex.Message, "النظام")
End Try