VB6 0我想用format函式保留兩位小數

2022-01-03 14:36:37 字數 5308 閱讀 2591

1樓:網海1書生

電腦中顯示純小數就是這種形式的,因為對於純小數而言,前面那個0純屬多餘,而且可以節省一個位元組的空間,這在西方國家完全沒問題,但是中國人看慣了0.045754這樣的形式,只好多做一下手腳了:

要記住,format函式的返回值是字串,直接print的話可以出現小數點前的前導0:

print format(qzwc, "0.00")

顯示為 0.05

但是,如果用val()再把它轉為數值,那麼前導0又會不見的:

print val(format(qzwc, "0.00"))

顯示為 .05

所以,一般是這樣處理的,就是在用變數儲存資料的時候,不要用format函式處理,也就是

czsc(i).zwc = qzwc

而在需要print的時候,再用format函式處理後輸出:

print format(czsc(i).zwc, "0.00")

補充一句,如果要保留兩位小數,最好不要用format函式(因為它的返回值是字串不是數字,所以一般把它用來控制輸出格式),而改為round函式,這才是正宗的數值處理函式:

czsc(i).zwc = round(qzwc, 2)

2樓:匿名使用者

直接按f1檢視幫助不久行了。

求幫助,vb作業。用format函式規定label的格式為0.00,保留兩位小數,要怎麼寫?

3樓:網海1書生

假定要顯示在label1的資料為x:

label1.caption = format(x, "0.00")

怎樣在vb 中text顯示保留兩位小數

4樓:匿名使用者

問題1:private sub command1_click()dim x as single

s1 = val(text1.text)

s2 = val(text2.text)

text3.text = s1 + s2

text4.text = format(s2 / (s1 + s2) , "0.00")

end sub

問題2:private sub command1_click()dim x as single

s1 = val(text1.text)

s2 = val(text2.text)

text3.text = s1 + s2

text4.text = format(s2 / (s1 + s2) * 100, "0.00") & "%"

end sub

5樓:匿名使用者

使用format函式即可text4.text=format(s2/(s1+s2),"0.00%")

vb中format函式的用法

6樓:韌勁

vb format函式

格式輸出format函式

format函式用於制定字串或數字的輸出格式。

語法:x = format (expression, fmt )expression是所輸出的內容。fmt是指輸出的格式,這是一個字串型的變數,這一項若省略的話,那麼format函式將和str函式的功能差不多。

如:語句輸出

format (2, 「0.00」)

2.00

format (.7, 「0%」)

70%format (1140, 「$#,##0」)$1,140

fmt字元的意義

字元意義

字元意義

0 顯示一數字,若此位置沒有數字則補0

. 小數點

# 顯示一數字,若此位置沒有數字則不顯示

, 千位的分隔符

% 數字乘以100並在右邊加上」%」號

- + $ ( )

這些字出現在fmt裡將原樣打出

format函式對時間進行輸出時的意義

fmt輸出

fmt輸出

m/d/yy

8/16/96

h:mm:ss a/p

10:41:29 p

d-mmmm-yy

16-august-96

h:mm

22:41

d-mmmm

16-august

h:mm:ss

22:41:29

mmmm-yy

august-96

m/d/yy h:mm

8/16/96 22:41

hh:mm am/pm

10:41 pm

vb format函式使用方法

返回 variant (string),其中含有一個表示式,它是根據格式表示式中的指令來格式化的。

語法format(expression[ format[ firstdayofweek[ firstweekofyear]]])

format 函式的語法具有下面幾個部分:

部分說明

expression

必要引數。任何有效的表示式。

format

可選引數。有效的命名表示式或使用者自定義格式表示式。

firstdayofweek

可選引數。常數,表示一星期的第一天。

firstweekofyear

可選引數。常數,表示一年的第一週。

設定值firstdayofweek 引數有下面設定:常數值說明vbusesystem

0使用 nls api 設定。

vbsunday

1星期日(預設)

vbmonday

2星期一

vbtuesday

3星期二

vbwednesday

4星期三

vbthursday

5星期四

vbfriday

6星期五

vbsaturday

7星期六

firstweekofyear 引數有下面設定:常數值說明vbusesystem

0使用 nls api 設定。

vbfirstjan1

1從包含一月一日的那一週開始(預設)。

vbfirstfourdays

2從本年第一週開始,而此周至少有四天在本年中。

vbfirstfullweek

3從本年第一週開始,而此周完全在本年中。

說明格式化

作法數字

使用預先定義的命名數值格式或建立使用者自定義數值格式。

日期和時間

使用預先定義的命名日期/時間格式或建立使用者自定義日期/時間格式。

日期和時間序數

使用日期和時間格式或數值格式。

字串建立自定義的字串格式。

7樓:泉迎海開闌

private

subform_click()a=

0.12a=

format(a,

"00.0000")b=

format(a,

"##.#####")

print

aprint

bend

sub你看啊,沒有出現你說的情況,你的函式有問題,要使用英文狀態的標點符號。你吧我的複製一下看看。

我的使用a=

format(a,

"00.0000")

輸出的是00.1200。

使用的a=format(a,"##.####")時,才出現你說的情況。

另外問題所在:a是宣告為單精度「資料」了,你使用了a=後,先執行

format(a,

"00.0000")。為

00.2400

繼續執行賦值「=」就等到的

00.2400,再判斷資料為單精度型別。又將其強制轉換為數值

.20。

方法1:不宣告。方法二

使用中間變數a=

format(a,

"00.0000")

改為:b

=format(a,

"00.0000")

最後輸出b。都能解決、

如果回答對您有用,請給分!

8樓:我愛完全

hour = format((time \ 60), "00000")

把小時強制按"00000"格式輸出,也就是輸出的小時數為一個五位數,如果不足五位,則前邊補0

下邊那句同上

format函式 返回

返回 variant (string),其中含有一個表示式,它是根據格式表示式中的指令來格式化的。

語法format(expression[, format[, firstdayofweek[, firstweekofyear]]])

format 函式的語法具有下面幾個部分:

部分 說明

expression 必要引數。任何有效的表示式。

format 可選引數。有效的命名表示式或使用者自定義格式表示式。

firstdayofweek 可選引數。常數,表示一星期的第一天。

firstweekofyear 可選引數。常數,表示一年的第一週。

vb中保留兩位小數的命令

9樓:夜獨行孤單

private sub text1_change()

text1.text=format(val(text1.text),"0.00")

end sub

10樓:匿名使用者

vb.net

double number

number.tostring("#0.00")vb6format(number, ".00")

vb中如何控制計算結果的小數位,如果用format函式但問題是我並不知道計算出的結果中整數位有多少啊

11樓:環業軟體

private sub command1_click()text1 = round(123.78905, 2)end sub

結果:text1=123.79(四捨五入),2是小數位數,隨便改round(expression [,numdecimalplaces])

round函式語法有如下幾部分:

部分 描述

expression 必需的。要進行四捨五入運算的數值表示式。

numdecimalplaces 可選的。數字值,表示進行四捨五入運算時,小數點右邊應保留的位數。如果忽略,則round函式返回整數。

12樓:匿名使用者

format(變數,「0.00」) 保留兩位小數,小數不足,補0

vb6 0 FOR迴圈語句,vb6 0有沒有中途跳出當前for迴圈,進行下次迴圈?

dim i as integer,d1 as integer,d2 as integer,d3 as integer,d4 as integer dim str1 as string dim str2 as string private sub form load command1.caption ...

vb中,閏年怎麼表示,vb6 0中,閏年判斷 如何表示

閏年是我們生活中再平常不過的事了。不過你知道它是怎麼計算的嗎?閏年公式如下 若公立年可以被 4 整除,則很有可能為公立年,除非.這個公立年可以被 100 整除,但是不可以被 400 整除,就不是閏年 測試程式及模組如下 public function isleapyear yr as integer...

vb6 0 用ado修改access資料庫中指定某行某列的單

你用ado控制元件還是物件呢?vb6.0 使用adodc控制元件讀取access資料庫.怎麼修改資料庫指定某一列的所有見容?adodc控制元件是這個兄弟,使用很簡單,舉個按鈕單擊的例子 private sub command1 click adodc1.connectionstring provid...