如何vb取小數點後一位的值,vb保留小數點後2位怎麼編寫?

2022-02-12 00:48:22 字數 5572 閱讀 8888

1樓:匿名使用者

先將小數轉換成文字,再查小數點的位置,然後用right函式就行了

2樓:飄葉雜談

dim s as string

x=1123.3123

s=right(format(x,"#.#"),1)msgbox "第一位小數為," & s

3樓:匿名使用者

方法1:

先取10倍後小數,再取整,再與10求餘數,得到小數點後一位

**:dim a as double

a = 3.1415926

msgbox "小數點後一位為:" & str(int(a * 10) mod 10), 0, "提示"

方法2:

先將小數用format轉成只有一位小數字元,然後用right取最後一位字元,得到小數點後一位

**:dim a as double

a = 3.1415926

msgbox "小數點後一位為:" & right(format(a, ".#"), 1), 0, "提示"

方法3:

先將小數放大1倍,再取整數,然後用right取最後一位字元,得到小數點後一位

**:dim a as double

a = 3.1415926

msgbox "小數點後一位為:" & right(str(int(a * 10)), 1), 0, "提示"

方法4:

將數先放大10倍,取整,減去取整後放大10倍的數,得到得到小數點後一位的值

**:dim a as double

a = 3.1415926

msgbox "小數點後一位為:" & str(int(a * 10) - int(a) * 10), 0, "提示"

4樓:

num=cint(f * 10) mod 10

5樓:匿名使用者

num=int(f * 10) mod 10

cint是不可以的

vb保留小數點後2位怎麼編寫?

6樓:匿名使用者

pi=3.1415

vb6版本:

round(pi,2)或者format (pi ,".00")vb.net版本:

roundtohundredth(pi)或者math.round(pi,2)也可以用format

7樓:匿名使用者

vb用format 函式即可實現。

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

print format(3.1415926, "#.##")*#:

表示乙個數字位。#的個數決定了顯示區段的長度。如果要顯示的數值的位數小於格式字串指定的區段長度,則該數值靠區段的左端顯示。

如果要顯示的數值的位數大於指定的區段長度,則數值照原樣顯示。 要顯示多位,只需要設定數字位數即可,例如:

print format(3.14159262654321,」#.#######」)

顯示:3.1415926

8樓:匿名使用者

"您好:點後2位怎麼編

vb中如何設定整數保留小數點後一位小數,小數四捨五入保留兩位小數

9樓:匿名使用者

vba.format(a,"#0.0")'一位小數

vba.format(a,"#0.00")'二位小數

如何在vb中設定精度問題,即是保留小數點後的幾位。

10樓:匿名使用者

方法一:

用round函式,語法 :

round(number,num_digits)number 需要進行四捨五入的數字。 num_digits 指定的位數,按此位數進行四捨五入。

示例:'round(需要修改的數字,小數字數)print round(3.1415926, 3)顯示:3.142

方法二:

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

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

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

示例:'round(需要修改的數字,小數字數)print format (3.1415926, "#,###")顯示:3.142

11樓:

用round(1.23455,3)會得到1.235

格式:round(需要修改的數字,小數字數)

怎麼在vb中輸出固定小數字數的數字?

12樓:匿名使用者

方法一:

用round函式,語法 :

round(number,num_digits)

number 需要進行四捨五入的數字。 num_digits 指定的位數,按此位數進行四捨五入。

示例:'round(需要修改的數字,小數字數)

print round(3.1415926, 3)

顯示:3.142

方法二:

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

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

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

示例:'round(需要修改的數字,小數字數)

print format (3.1415926, "#,###")

顯示:3.142

方法三:

1、開啟vb6.0軟體,新建乙個標準exe工程;

2、在設計介面上新建乙個command控制項;

private sub command1_click()

dim res as double

res = format(1 / 3, "0.000")

print res;

end sub

4、執行工程,單擊按鈕,可以看到資料被保留三位小數;

5、總結,想要保留幾位小數,直接設定即可,如想設定保留5位小數,設定如下:

format(1/3,"0.00000")

13樓:匿名使用者

用format函式。

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 從本年第一周開始,而此週完全在本年中。

說明格式化 作法

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

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

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

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

如果在格式化數字時沒有指定 format,format 會提供與 str

函式類似的功能,儘管它是國際化的。

format 函式示例

本示例顯示用 format

函式做格式化輸出的不同用法。對於日期分隔號(/),時間分隔號(:),以及 am/ pm

等文字而言,其真正的顯示格式會因計算機上的國際標準不同而有所差異。在開發階段,日期與時間是以短日期的格式,配合**的國際標準來顯示的。而在執行時,短日期則是根據系統的國際標準而定,而系統的國際標準和**的國際標準可能並不相同。

本示例中是假設國際標準為

english/united states。

mytime 及 mydate 在開發環境下,使用系統的短日期設定顯示出來的。

dim mytime, mydate, mystr

mytime = #17:04:23#

mydate = #january 27, 1993#

' 以系統設定的長時間格式返回當前系統時間。

mystr = format(time, "long time")

' 以系統設定的長日期格式返回當前系統日期。

mystr = format(date, "long date")

mystr = format(mytime, "h:m:s") ' 返回 "17:4:23"。

mystr = format(mytime, "hh:mm:ss ampm") ' 返回 "05:04:23 pm"。

mystr = format(mydate, "dddd, mmm d yyyy") ' 返回 "wednesday, jan 27 1993"。

' 如果沒有指定格式,則返回字串。

mystr = format(23) ' 返回 "23"。

' 使用者自定義的格式。

mystr = format(5459.4, "##,##0。00") ' 返回 "5,459.40"。

mystr = format(334。9, "###0。00") ' 返回 "334.90"。

mystr = format(5, "0。00%") ' 返回 "500.00%"。

mystr = format("hello", "<") ' 返回 "hello"。

mystr = format("this is it", ">") ' 返回 "this is it"。

小數點左邊第一位是什麼位,表示什麼,小數點右邊是什麼。超急

小數點左邊第一位是 個 位,表示 幾個1 小數點右邊第一位是 十分位 表示 幾個0.1 小數點左邊第一位是個位,表示幾個1 小數點右邊是小數部分。小數點右邊第一位是十分位,表示幾個十分之一。小數點左邊第一位是什麼位,表示什麼,小數點右邊是什麼。超急 小數點左邊第一位是 個 位,表示 幾個1 小數點右...

小數點右邊第一位計算單位是小數點左邊第一位計算單位的的幾分之幾

小數點右邊第一位代 表0.1,小數點左邊第一位代表1,所以小數點右邊第一位計算單位版是小數點左權邊第一位計算單位的0.1 1 1 10 8.03 8又100分之3 803 0.95 95 100 19 20 7 13 0.538461 538461為迴圈節 由於迴圈節有6位,且2009 2004 5...

小數的小數點向右移動一位後比原來大了32 4原來這個小數是

解 設原數為x,則 10x x 32.4 9x 32.4 x 3.6 答 原來這個小數是3.6.把乙個小數的小數點向右移動一位後,就比原數大32.4,求原數是多少?lz你好 設原數為x 小數點向右移動一位 即為擴大了10倍 則移動後的數為10x 由題意得 10x x 32.4 9x 32.4 x 3...