Problema Com valores hexadecimal

Bom Dia

Estou convertendo os valores de decimal para hexadecimal no E3 e estou com o seguinte problema.

preciso colocar 0 a esquerda dos numeros já convertidos.

usei a seguinte expressão

Item(“Dados”).Item(“Tag_Recebe_APluv4”).Value = Hex (xo_Analogicas.EA_Pluviometro04)
if Item(“Dados”).Item(“Tag_Recebe_APluv4”).Value <=9 then
Item(“Dados”).Item(“Tag_Recebe_APluv4”).Value = Right (“00”&Item(“Dados”).Item(“Tag_Recebe_APluv4”).Value,2)

Obs: caso os numeros cheguem de 0 a 9 os mesmos estão sendo colocados os zeros a esquerda normalmente conforme preciso.

mas se chegar de 10 a 15 ( o que vai chegar A,B,C,D,F) o mesmo só me devolve A,B,C,D,E F.

preciso que me entregue o valor 0A, 0B,0C,0D,0F

Como devo proceder.

lembrando que os tag internos para receberem os valores são string.

preciso juntar os valores de 4 variaveis para depois convertelos novamente para string, por isto preciso deste 0

@ronaldesantos, bom dia.

Acredito que este If limitou a condição de retorno.

Tenta fazer da seguinte forma (sem o If):

Item(“Dados”).Item(“Tag_Recebe_APluv4”).Value = Hex (xo_Analogicas.EA_Pluviometro04)
Item(“Dados”).Item(“Tag_Recebe_APluv4”).Value = Right (“0”&Item(“Dados”).Item(“Tag_Recebe_APluv4”).Value, 4)

Abraço.

Amigo,

Funcionou Perfeitamente, Obrigado

Por nada! :v:

Obrigado pelo feedback.