varias columnas en listbox

Buenas tardes.

Como se puede ver en el codigo abajo adjunto lleno un listview con el
contenido de un dataset.

De momento solo consigo visualizar la columna que indico en
"Me.ListBox1.DisplayMember", como puedo visualizar todas las columnas
contenidas en el dataset?

Como puedo obtener el valor de cada una de las columnas por ejemplo en el
evento alCambiar del listbox?

Gracias por la ayuda

myConnection = New
iDB2Connection("DataSource2.17.xxx.xxx;ConnectionTimeout0;UserID=xxxxxxu;Password=xxxxxx")

sSQLPR = "select PRARTI, PRDESC, PRTIME from SPA2003F.SPPR"

mySqlDataAdapterPR = New iDB2DataAdapter(sSQLPR, myConnection)



myDataSetPR = New DataSet

mySqlDataAdapterPR.Fill(myDataSetPR, sSQLPR)

Me.RSTRAT.DataSource = myDataSetPR.Tables(0).DefaultView

Me.RSTRAT.DisplayMember = myDataSetPR.Tables(0).Columns(1).ToString

Me.ListBox1.DataSource = myDataSetPR.Tables(0).DefaultView

Me.ListBox1.DisplayMember = myDataSetPR.Tables(0).Columns(1).ToString

Solucionado con este link
http://groups.google.es/group/micro...0b03299b60

"Tomeu" escribió en el mensaje
news:

Buenas tardes.

Como se puede ver en el codigo abajo adjunto lleno un listview con el
contenido de un dataset.

De momento solo consigo visualizar la columna que indico en
"Me.ListBox1.DisplayMember", como puedo visualizar todas las columnas
contenidas en el dataset?

Como puedo obtener el valor de cada una de las columnas por ejemplo en el
evento alCambiar del listbox?

Gracias por la ayuda

myConnection = New
iDB2Connection("DataSource2.17.xxx.xxx;ConnectionTimeout0;UserID=xxxxxxu;Password=xxxxxx")

sSQLPR = "select PRARTI, PRDESC, PRTIME from SPA2003F.SPPR"

mySqlDataAdapterPR = New iDB2DataAdapter(sSQLPR, myConnection)



myDataSetPR = New DataSet

mySqlDataAdapterPR.Fill(myDataSetPR, sSQLPR)

Me.RSTRAT.DataSource = myDataSetPR.Tables(0).DefaultView

Me.RSTRAT.DisplayMember = myDataSetPR.Tables(0).Columns(1).ToString

Me.ListBox1.DataSource = myDataSetPR.Tables(0).DefaultView

Me.ListBox1.DisplayMember = myDataSetPR.Tables(0).Columns(1).ToString