Simples.. use formataçao
dim d as double =5.123456789
dim s as string=d.ToString("0,00")
ou se vc quiser manter o tipo double, use round
dim d as double=5.12345678
dim d2 as double=Math.Round(d, 2)
att
William John Adam Trindade
Analyste-programmeur
----------------------------------------------------------
Sogi informatique ltée