x=123.45678label1.caption=round(x*100)/100可实现让label1数字显示x小数点后两位(四舍五入)。
最好的办法是使用formatnumber()函数Label1.Caption = FormatNumber(1.235, 2, vbTrue)