Visual Basic 6 - Problemas com Decimais - Referencia Rápida

Se você está encontrando problemas com decimais provavelmente pode ser problema na conversão de tipos. Os controles do vb em geral guardam os valores em texto (text, label, grids, ...) então é necessário a conversão para currency ou double. Abaixo exemplo com double CDbl

Errado. Exibe 4

lbliten1.caption = ("2,5")
lbliten2.caption = ("2,5")

lbltotal.Caption = Val(lbliten1.Caption) + Val(lbliten2.caption)

Correto. Exibe 5
Trocar Val por CDbl


lbliten1.caption = ("2,5")
lbliten2.caption = ("2,5")


lbltotal.Caption = CDbl(lbliten1.Caption) + CDbl(lbliten2.caption)