台式水银血压计怎么用:FormatNumber函数的使用问题

来源:百度文库 编辑:中科新闻网 时间:2024/05/03 01:22:58
><%
x4=(je+pjje+grgz)/jz
response.write formatnumber(x4,2)
%>
错误提示为Microsoft VBScript 运行时错误 (0x800A000D)
类型不匹配: 'formatnumber'要怎么样才匹配呢?请指教

不是'formatnumber'不匹配.
是你X4的值不是纯数字值.刚才好像就回答过你的这个问题..

FormatNumber 函数
返回表达式,此表达式已被格式化为数值。

FormatNumber(
expression [,NumDigitsAfterDecimal [,IncludeLeadingDigit [,UseParensForNegativeNumbers [,GroupDigits]]]]
)

Arguments
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