Hola a todos, estoy intentando poner tres columnas a un combobox.
este es mi codigo:
Código:
Function cargar_combo()
Dim Trx As New AccesoDatos.Transacciones(False)
Dim DtE As New DataTable
Dim Ad As New AccesoDatos.Operaciones(Trx.Comand)
DtP = Ad.EjecturarConsulta("SELECT * FROM PERIODOS ORDER BY ID_PERIODOS desc")
Me.cmb_periodo.DataSource = DtP
Me.cmb_periodo.DisplayMember = "DESCRIPCIONperi"
Me.cmb_periodo.ValueMember = "ID_DESCRIPCION"
Trx.CerrarConexion()
End Function
he visto que concatenando en la consulta select, puede hacer , pero no me resulta
Código:
DtP = Ad.EjecturarConsulta("SELECT ID_PERIODOS+'-'+SEMESTREperi+'-'+ANIOper as Lista FROM PERIODOS ORDER BY ID_PERIODOS desc")
Me.cmb_periodo.DisplayMember = "Lista"
Me.cmb_periodo.ValueMember = "Lista"
alguien me puede orientar como hacerlo
gracias
