Вывод в ComboBox из Access - Visual Basic .NET
Формулировка задачи:
Здравствуйте, данный код выводит в ComboBox из Access. Если в 1 ComboBox поменять значения, то меняются и в остальных, как сделать чтобы каждый ComboBox был независимым от других ComboBox?
Листинг программы
- Imports System.Data.OleDb
- Public Class Form1
- Dim connstring As String
- Dim myConnection As OleDbConnection = New OleDbConnection
- Friend makeBS As New BindingSource
- Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs) Handles MyBase.Load
- connect()
- Dim da As New OleDbDataAdapter(New OleDbCommand("select * from Таблица1", acsconn))
- Dim dsMake As New DataSet("DsSelect")
- dsMake.Tables.Add("Таблица1")
- da.Fill(dsMake.Tables("Таблица1"))
- makeBS.DataSource = dsMake.Tables("Таблица1")
- ComboBox1.DataSource = makeBS
- ComboBox1.DisplayMember = "Предмет"
- ComboBox2.DataSource = makeBS
- ComboBox2.DisplayMember = "Преподаватель"
- ComboBox3.DataSource = makeBS
- ComboBox3.DisplayMember = "Кабинет"
- acsconn.Close()
- End Sub
- End Class
Решение задачи: «Вывод в ComboBox из Access»
textual
Листинг программы
- Friend makeBS_пр As New BindingSource
- Friend makeBS_преп As New BindingSource
- Friend makeBS_каб As New BindingSource
- makeBS_пр.DataSource = dsMake.Tables("Таблица1")
- makeBS_преп.DataSource = dsMake.Tables("Таблица1")
- makeBS_каб.DataSource = dsMake.Tables("Таблица1")
- ComboBox1.DataSource = makeBS_пр
- ComboBox1.DisplayMember = "Предмет"
- ComboBox2.DataSource = makeBS_преп
- ComboBox2.DisplayMember = "Преподаватель"
- ComboBox3.DataSource = makeBS_каб
- ComboBox3.DisplayMember = "Кабинет"
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д