PHP كود :
Dim query As String
Dim command As OleDbCommand
Dim reader As OleDbDataReader
'فحص الاتصال بقاعدة البيانات
If con.State = ConnectionState.Closed Then
con.Open()
End If
query = "SELECT dep_name FROM [department]"
command = New OleDbCommand(query, con)
reader = command.ExecuteReader()
If reader.HasRows Then
While reader.Read()
ComboBox1.Items.Add(reader(0))
'Label2.Text = "تمت الاضافة"
End While
End If
reader.Close()
con.Close()
هذا الكود يشمل الكومبو فقط والليست بوكس
شوف اي كود من عندك

