fiz um programinha para somar valores porem ,ele até soma mais ignora valores depois da virgula ,como faço pra habilitar a soma de valores como de dinheiro no formato 00,00 se eu somar 2,00 + 2,50 ele vai me dar o resultado 4 ao invés de 4,50 o programinha If prec >= 0 Then tot = Val(tot.Text) + Val(prec.Text) msg.Caption = tot Else msg.Caption = "digite um Valor valido" End If End Sub agradeceria muito se me ajudassem - piter20@uol.com.br