Microsoft(R) Visual Basic(R) Scripting Edition
FormatNumber 函数 语言参考
版本 2
请参阅
--------------------------------------------------------------------------------
描述
返回表达式,此表达式已被格式化为数值。
语法
FormatNumber(expression [,NumDigitsAfterDecimal [,IncludeLeadingDigit [,UseParensForNegativeNumbers [,GroupDigits]]]])
FormatNumber 函数的语法有以下参数:
参数 描述
expression 必选。要被格式化的表达式。
NumDigitsAfterDecimal 可选。指示小数点右侧显示位数的数值。默认值为 -1,指示使用的是计算机的区域设置。
IncludeLeadingDigit 可选。三态常数,指示是否显示小数值小数点前面的零。有关数值,请参阅“设置”部分。
UseParensForNegativeNumbers 可选。三态常数,指示是否将负值置于括号中。有关数值,请参阅“设置”部分。
GroupDigits 可选。三态常数,指示是否使用计算机区域设置中指定的数字分组符号将数字分组。有关数值,请参阅“设置”部分。
设置
IncludeLeadingDigit、UseParensForNegativeNumbers 和 GroupDigits 参数可以有以下值:
常数 值 描述
TristateTrue -1 True
TristateFalse 0 False
TristateUseDefault -2 使用计算机区域设置中的设置。
说明
当省略一个或多个可选参数时,由计算机区域设置提供被省略参数的值。
--------------------------------------------------------------------------------
注意 所有设置信息均取自区域设置的“数字”附签。
--------------------------------------------------------------------------------
下面例子利用 FormatNumber 函数把数值格式化为带四位小数点的数:
Function FormatNumberDemo
Dim MyAngle, MySecant, MyNumber
MyAngle = 1.3 ' 用弧度定义角。
MySecant = 1 / Cos(MyAngle) ' 计算正割值。
FormatNumberDemo = FormatNumber(MySecant,4) ' 把 MySecant 格式化为带四位小数点的数。
End Function
--------------------------------------------------------------------------------
Top
2 楼 awaysrain(绝对零度)(既然选择了远方就要日夜前行) 回复于 2003-04-18 09:54:27 得分 0
Microsoft(R) Visual Basic(R) Scripting Edition
Round 函数 语言参考
版本 2
请参阅
--------------------------------------------------------------------------------
描述
返回按指定位数进行四舍五入的数值。
语法
Round(expression[, numdecimalplaces])
Round 函数的语法有以下参数:
参数 描述
expression 必选。 数值表达式 被四舍五入。
numdecimalplaces 可选。数字表明小数点右边有多少位进行四舍五入。如果省略,则 Round 函数返回整数。
下面的示例利用 Round 函数将数值四舍五入到两位小数:
Dim MyVar, pi
pi = 3.14159
MyVar = Round(pi, 2) 'MyVar contains 3.14。