Html 是用标记来识别内容的,不管你的源代码有没有回车换行,只有在<pre>标记中 vbCrLf 表示的回车换行符才会被浏览器显示,你看看页面源代码就知道了
vbCrLf 常数就是 chr(13) &chr(10),vbCr = chr(13),vbLf = chr(10)
If(filename == "PL5FI0006CNAPo" &fff.size <5*1024KB) 'Then fff.Delete '
这句写错了,我感觉应该改为
If(filename = "PL5FI0006CNAPo" and fff.size <5*1024*1024) Then fff.Delete '
FormatNumber 函数请参阅
FormatCurrency 函数 | FormatDateTime 函数 | FormatPercent 函数
要求
版本2
返回表达式,此表达式已被格式化为数值。
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
例如你的这个就要写成
FormatNumber(8/10,-1,-1)
欢迎分享,转载请注明来源:夏雨云
评论列表(0条)