Tengo un DropDownButton y un ComboBox que no carga información, en cuanto al segundo ComboBox si lo hace y ambos tienen el mismo código. Si alguien puede indicarme cual es la razón que no funciona ?
Uso VB - FrameWork 4.50 - Visual Studio Enterprise 2015
(https://social.msdn.microsoft.com/Forums/getfile/870382)
Private Sub FrmPersonal_Selecciona_Load(sender As Object, e As EventArgs) Handles MyBase.Load
ToolStripComboBox1.ComboBox.DataSource = CNTTipoTraba.TTipoTraba_ListaCB.Tables("SQL_Lista")
ToolStripComboBox1.ComboBox.ValueMember = "CodTipTra"
ToolStripComboBox1.ComboBox.DisplayMember = "Descripcion"
ToolStripComboBox2.ComboBox.DataSource = CNTTipoTraba.TTipoTraba_ListaCB.Tables("SQL_Lista")
ToolStripComboBox2.ComboBox.ValueMember = "CodTipTra"
ToolStripComboBox2.ComboBox.DisplayMember = "Descripcion"
End Sub
Hola buenas noches.
Bueno algun error que puedes tener al tratar de hacer esta conexion es que se esta instanciando la misma conexion, la misma tabla y los mismos datos al mismo tiempo. por lo tanto el primer combo box sin problema lo llena pero el segundo es posible que no lo llene por el problema que la conexion a base de datos esta abierta, entonces, no se puede generar la conexion.
Saludos
¿Has probado a hacer lo siguiente?:
ToolStripComboBox1.ComboBox.DataSource = CNTTipoTraba.TTipoTraba_ListaCB.Tables("SQL_Lista")
ToolStripComboBox1.ComboBox.ValueMember = "CodTipTra"
ToolStripComboBox1.ComboBox.DisplayMember = "Descripcion"
ToolStripComboBox2.ComboBox.DataSource = ToolStripComboBox1.ComboBox.Items
Saludos!
Hola.
Yo lo eh hecho de la siguiente manera
Dim MyCommand As OleDb.OleDbCommand
Dim MyAdapter As New OleDb.OleDbDataAdapter
Dim MyConexion As New OleDb.OleDbConnection
MyConexion.ConnectionString = "provider=microsoft.ACE.OLEDB.12.0;DATA SOURCE=" & RutaBD & " ;persist security info=false"
MyCommand = MyConexion.CreateCommand
MyCommand.CommandText = "SELECT * FROM Clientes"
MyAdapter.SelectCommand = MyCommand
Dim Dt_Cliente As New DataTable
MyAdapter.Fill(Dt_Cliente)
MicomboBox.DataSource = Dt_Cliente
MicomboBox.DisplayMember = "Nombre"
MicomboBox.ValueMember = "ID"
Saludos. espero te sea de ayuda.