TROCAR VALORES
Tenho um ListView, onde listo todos os meus registros..
Dentre eles tenho um campo que é salvo com valores 1 ou 0..
Gostaria, em vez de exibir os números, exibir Sim para 1 e Não para 0...
Lembrando que tem um loop no fim, para puxar o próximo registro..
uso assim, mas esta exibindo o valor 1sim e 0não..
.SubItems(16) = Replace(RSFUN!Comissionado, [Ô]1[Ô], [Ô]Sim[Ô]) & Replace(RSFUN!Comissionado, [Ô]0[Ô], [Ô]Não[Ô])
Dentre eles tenho um campo que é salvo com valores 1 ou 0..
Gostaria, em vez de exibir os números, exibir Sim para 1 e Não para 0...
Lembrando que tem um loop no fim, para puxar o próximo registro..
uso assim, mas esta exibindo o valor 1sim e 0não..
.SubItems(16) = Replace(RSFUN!Comissionado, [Ô]1[Ô], [Ô]Sim[Ô]) & Replace(RSFUN!Comissionado, [Ô]0[Ô], [Ô]Não[Ô])
Crie uma condição quando você estiver preenchendo a ListView.
Dim Valor As Integer
Valor = 0 [ô] Pegue o valor do banco
Dim Texto As String
If Valor = 1 Then Texto = [Ô]Sim[Ô] Else Texto = [Ô]Não[Ô]
MsgBox (Texto)
Jonathan.. eu editei a pergunta e acrescentei a linha de comando que quero alterar.. dá uma olhadinha com base no que postei..
eu usei um código assim antes.. mas não funcionou legal
eu usei um código assim antes.. mas não funcionou legal
.SubItems(16) = IIf(RSFUN!Comissionado, [Ô]Sim[Ô], [Ô]Não[Ô])
Tópico encerrado , respostas não são mais permitidas