Bom dia galera.
Estou com um problema.
Tenho um formulário continuo que exibe o status de alguns atendimentos.
Para os atendimentos com status "ANDAMENTO" ele tem que mostrar um ícone na cor verde.
Para os com status "PENDENTE" uma bolinha amarela.
Estou fazendo assim:
Private Sub Form_Current()
If (Me.rot_status.Value = "ANDAMENTO") Then Me.StatusInc.Picture = "Andamento.ico"
If (Me.rot_status.Value = "PENDENTE") Then Me.StatusInc.Picture = "Pendente.ico"
End Sub
Porém todos os resultados do formulário estão ficando com o mesmo ícone (do último resultado lido)
Como posso resolver isso?
Estou com um problema.
Tenho um formulário continuo que exibe o status de alguns atendimentos.
Para os atendimentos com status "ANDAMENTO" ele tem que mostrar um ícone na cor verde.
Para os com status "PENDENTE" uma bolinha amarela.
Estou fazendo assim:
Private Sub Form_Current()
If (Me.rot_status.Value = "ANDAMENTO") Then Me.StatusInc.Picture = "Andamento.ico"
If (Me.rot_status.Value = "PENDENTE") Then Me.StatusInc.Picture = "Pendente.ico"
End Sub
Porém todos os resultados do formulário estão ficando com o mesmo ícone (do último resultado lido)
Como posso resolver isso?