ghost, está dando erro nessa linha.

 

if rs!situacao then

 

o erro é:

 

item not found in this collection

 

porque dá esse erro, sendo que o campo existe?

não dá pra saber se volta como string. porque quando eu digito o código e consulto ele já o erro com essa mensagem:

 

item not found in this collection

 

os itens do campo situacao que estão ticados eu consigo trazer dentro do listbox. só que eles não aparecem ticados.

 

porque?

 

me ajude, por favor.

detalhe: eles estão ticado no banco. mais no listbox eles não fical ticados.

 

faz assim vai debugando, antes de ir para esta linha q dá o erro tecle Ctrl+G

na janela q vai aparecer digite:

 

?rs!situacao

 

e depois tecle "ENTER"

vai aparecer o resultado na linha debaixo caso não ocorra erro

 

Se der erro veja se o campo está descrito exatamente desse jeito 'situacao'

 

ok??

 

qq coisa é só postar

cara, eu vi o que era esse erro. eu tinha esqucido de titar o comentário do campo situacao no select.

 

agora está dando erro nessa linha:

 

lstcodigopedido.Selected(0) = True

 

no lugar do zero não tem que ser i, por exemplo. antes do if eu não tenho que fazer um for?

 

me mostre como faz.

valeu