COMBO RETORNA: SYSTEM.DATA.DATAROWVIEW
estou preenchendo um acombo assim:
e estou percorrendo em um for os items da combox assim:
a msgbox me retorna o texto SYSTEM.DATA.DATAROWVIEW
como faço pra ele retornar o texto correto da combo?
Dim ds As New DataSet
Dim da As New OdbcDataAdapter([Ô]select idgrupo,nmgrupo from grupo order by nmgrupo[Ô], c.cnn)
da.Fill(ds, [Ô]grupo[Ô])
With cbo
.DataSource = ds.Tables([Ô]grupo[Ô])
.DisplayMember = [Ô]nmgrupo[Ô]
.ValueMember = [Ô]idgrupo[Ô]
End With
ds.Dispose()
da.Dispose()
e estou percorrendo em um for os items da combox assim:
For i = 0 To cbo.Items.Count - 1
msgbox cbo.Items(i).ToString
Next
a msgbox me retorna o texto SYSTEM.DATA.DATAROWVIEW
como faço pra ele retornar o texto correto da combo?
For i = 0 To cbo.Items.Count - 1
msgbox cbo.Items(i).Text
Next
msgbox cbo.Items(i).Text
Next
Ops, desculpa, a resposta a cima não funcionou.... Faz assim...
For i = 0 To cbo.Items.Count - 1
msgbox cbo.Items.Item(i).ToString
Next
For i = 0 To cbo.Items.Count - 1
msgbox cbo.Items.Item(i).ToString
Next
JONATHANSTECKER não funcionou ainda ta retornando o texto: SYSTEM.DATA.DATAROWVIEW
Tente assim e veja se resolve:
For Each dr As DataRowView In cbo.Items
MessageBox.Show(dr.Item([Ô]nmgrupo[Ô]).ToString())
Next
Perfeito TECLA, valew
Tópico encerrado , respostas não são mais permitidas