Converssão de Valores... Casas Decimais...

[Guest --Flatdnl --]

Ola Pessoal...

Estou com uma duvida que vem me perturbando a algum tempo... e creio que é algo bem simples no qual não estou conseguindo achar a solução, mas vamos ao que interessa...

tenho o seguinte comando rodando em um Timer:

txtRefilo.Text = Val(txtLBobina.Text) - (StrRefilo + val(txtLarg.Text) * Val(txtqtde.Text))

este comando funciona normalmente, o unico problema, é que esses campos tem 2 casas depois da virgula, e com o Val(...) ele não soma depois da virgula, só o Inteiro dele...

tentei também:

txtRefilo.Text = cdbl(txtLBobina.Text) - (StrRefilo + cdbl(txtLarg.Text) * cdbl(txtqtde.Text))

mas com este comando, na hora que ele faz a conta no timer na primeira ver, o text esta vazio, então ele da erra de converssão de "Double" ou algo parecido...

o que preciso fazer para que ele aceite o campo vazio como o VAL(...) e também aceite o campo com virgula como o CDbl(...)???

espero que tenham conseguido entender minha duvida...

Desde já, agradeço pela ajuda.

[lcs_sp]

Olá,

tente isto:

txtRefilo.Text = cdbl(iif(txtLBobina.Text="","0,00",txtLBobina.Text)) - (StrRefilo + cdbl(txtLarg.Text) * cdbl(iif(txtqtde.Text.Text="","0,00",txtqtde.Text.Text)))