Boa tarde sou iniciante em vb.net, tou a carregar um combobox com um datareader e dentro da minha base de dados tenho 2 campos com designaçao e id.. consigo apanhar a descriçao mas nao o id

Dim sSql AsString
Dim oDRproj As OleDbDataReader
sSql = "SELECT designacao,cod_projecto FROM Projecto"
oDRproj = abreConexao(sSql)
oDRproj.Read()
ComboBox1.Items.Add(oDRproj("descricao"))
oDRproj.close()

Oi,

vê se assim ja faz o ke keres:

Dim sSql AsString
Dim oDRproj As OleDbDataReader
sSql = "SELECT designacao,cod_projecto FROM Projecto"
oDRproj = abreConexao(sSql)
'Se tiveres mais que 1 registo tens de usar um while por exemplo
While oDRproj.Read()
ComboBox1.Items.Add(oDRproj("descricao").ToString() & " - " & oDRproj("cod_projecto").ToString())
End While
oDRproj.close()



Uma sugestão, pq não usas um dataset em vez de um datareader? se calhar era mais facil, mas em termos de performance e rapidez o DataReader supera o DataSet.

.eof
TT