Experimente com ccur no lugar de val

saldoapagar.Caption = Format(CCur(Label1.Caption) - CCur(adiantamento.value), "R$ " & "#,##0.00")

Boa tarde Reinaldo,

está apresentando incompatibilidade no trecho CCur(adiantamento.Value)

Mesmo mantendo Val(adiantamento.Value) não calcula os centavos.

o que vem a ser adiantamento, é uma variavel definida ou um campo do form???? Qual a mensagem de erro??

A etstrutura e a abaixo, todos já estão carregando os valores no padrão 00,00

saldoapagar.Caption - Label
Label1.Caption - Label
adiantamento.value - Textbox

Após a carga é realizado o calculo, ai e que está apresentando erro de tipos incompativeis, pois voce colocou CCur em um textbox, acho eu.

Abraços!

Chook,
para poder efetuar contas com valores oriundos de um textbox é preciso fazer a conversão desses dados de texto(default de um textbox) para valores numericos.
existem varias maneiras de se converter, como vc informou que usando Val não estava tendo o retorno esperado sugeri utilizar cCur, que converte para valor "monetario" com virgula.
Se puder disponibilize seu modelo, para que possa "verificar" in loco o que ocorre, pode ser que adiantamento.value não tenha valor??

Bom dia amigo,

Testando com val ao inves de ccur no textbox funcionou!

Valeu!