ComboBox con tres columnas

[sagma]

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

[.seb]

La idea está bien... te debería resultar.
Lo que tal vez te esté fallando es el hecho que las columnas que estás 'sumando' no sean todos strings. Tendrías que ver la sintaxis del DBMS que estás utilizando.

suerte

[sagma]

Hola .seb, gracias por contestar, si, no todos son string, el primero es integer, char, smallint, y esta en la DB SqlServer 2005.

Me puedes orientar como concluir con esta idea ??

gracias

[sagma]

Gracias, era solo convertir mis campos numericos, para poner enlazar con los demas.

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)

        DtE = Ad.EjecturarConsulta("SELECT ID_PERIODOS, SEMESTREperi + ' - ' + convert(varchar(20),ANIOSperi) AS Lista FROM PERIODOS")
        Me.cmb_periodo.DataSource = DtE
        Me.cmb_periodo.DisplayMember = "Lista"
        Me.cmb_periodo.ValueMember = "ID_PERIODOS"

        Trx.CerrarConexion()

    End Function

suerte a todos,