1、打開VB6.0軟件，新建一個標準exe工程；

2、在設計界面上新建一個Command控件；

3、雙擊Command1控件，進入代碼編輯界面，輸入代碼：

PrivateSubCommand1_Click()DimresAsDoubleres=Format(1/3,"0.000")Printres;EndSub

4、運行工程，單擊按鈕，可以看到數據被保留三位小數；

5、總結，想要保留幾位小數，直接設置即可，如想設置保留5位小數，設置如下：

format(1/3,"0.00000")