este es mi codigo:
Código:
he visto que concatenando en la consulta select, puede hacer , pero no me resulta 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

Código:
alguien me puede orientar como hacerloDtP = 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"
gracias
