ITEM DATA DO COMBO ESTRANHO

DODOMR 07/12/2005 17:48:44
#118746
Carrego uma combo com as cidades do pais,
For n = 0 To MYRS.RecordCount - 1
cbo.AddItem MYRS(1)
cbo.ItemData(n) = MYRS(0)'aqui é o numero da cidade
MYRS.MoveNext
Next n

na hora qu eu clico na conbo
txt = cbo.ItemData(cbo.ListIndex)

só que tem hora que o txt ganha valor zero
FFCOUTO 07/12/2005 17:56:44
#118748 Resposta escolhida
tente usar NewIndex ao invés da variável assim

For n = 0 To MYRS.RecordCount - 1
cbo.AddItem MYRS(1)
cbo.ItemData(cbo.NewIndex) = MYRS(0)'aqui é o numero da cidade
MYRS.MoveNext
Next n

Já verificou se o campo na sua tabela está com o valor 0?

Espero ter ajudado.
Tópico encerrado , respostas não são mais permitidas
Voltar