【名称】
Fix
【类别】
数学函数
【原形】
Fix (number)
【参数】
必选的,number 参数是一个 Double 或任何有效的数值表达式
【返回值】
Integer 类型
【异常/错误】
无
【描述】
将number的小数部分截去,求其整数部分,例如:Fix(3.8)=3,Fix(-3.8)=-3。
【示例】
Dim MyNumber
MyNumber = Fix(99.2) ' 返回 99。
MyNumber = Fix(-99.8) ' 返回 -99。
MyNumber = Fix(-99.2) ' 返回 -99。
【备注】
如果 number 包含 Null,则返回 Null。
---------------------------------------------------------------
【名称】
Int
【类别】
数学函数
【原形】
Int(number)
【参数】
必选的,number 参数是一个 Double 或任何有效的数值表达式
【返回值】
Integer 类型
【异常/错误】
无
【描述】
求不大于number 的最大整数,Int(3.8)=3,Int(-3.8)=-4。
【示例】
Dim MyNumber
MyNumber = Int(99.8) ' 返回 99。
MyNumber = Int(-99.8) ' 返回 -100。
MyNumber = Int(-99.2) ' 返回 -100。
【备注】
如果 number 包含 Null,则返回 Null。Int 和 Fix 都会删除 number 的小数部份而返回剩下的整数。Int 和 Fix 的不同之处在于,如果 number 为负数,则 Int 返回小于或等于 number 的第一个负整数,而 Fix 则会返回大于或等于 number 的第一个负整数。例如,Int 将 -8.4 转换成 -9,而 Fix 将 -8.4 转换成 -8。
----------------------------------------------------
【名称】
Log
【类别】
数学函数
【原形】
Log(number)
【参数】
必选的,number 参数是一个 Double 或任何有效的大于 0 的数值表达式
【返回值】
Double类型
【异常/错误】
无
【描述】
返回指定的number参数的自然对数值。
【示例】
本示例使用 Log 函数得到某数的自然对数值。
Dim MyAngle, MyLog
' 定义角度(以“弧度”为单位)。
MyAngle = 1.3
' 计算反双曲正弦函数值(inverse sinh())。
MyLog = Log(MyAngle + Sqr(MyAngle * MyAngle + 1))
【备注】
自然对数是以 e 为底的对数。常数 e 的值大约是 2.718282。
如下所示,将 x 的自然对数值除以 n 的自然对数值,就可以对任意底 n 来计算数值 x 的对数值:
Logn(x) = Log(x) / Log(n)
下面的示例说明如何编写一个函数来求以 10 为底的对数值:
Static Function Log10(X)
Log10 = Log(X) / Log(10#)
End Function
-------------------------------------------------
【名称】
Rnd
【类别】
数学函数
【原形】
Rnd[(number)]
【参数】
必选的,number 参数是 Single 或任何有效的数值表达式。
【返回值】
如果 number 的值是
Rnd 生成
小于 0
每次都使用 number 作为随机数种子得到的相同结果。
大于 0
序列中的下一个随机数。
等于 0
最近生成的数。
省略
序列中的下一个随机数。
【异常/错误】
无
【描述】
返回一个包含随机数值的 Single。Rnd 函数返回小于 1 但大于或等于 0 的值。number 的值决定了 Rnd 生成随机数的方式。
对最初给定的种子都会生成相同的数列,因为每一次调用 Rnd 函数都用数列中的前一个数作为下一个数的种子。
在调用 Rnd 之前,先使用无参数的 Randomize 语句初始化随机数生成器,该生成器具有根据系统计时器得到的种子。
为了生成某个范围内的随机整数,可使用以下公式:
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
这里,upperbound 是随机数范围的上限,而 lowerbound 则是随机数范围的下限。
注意 若想得到重复的随机数序列,在使用具有数值参数的 Randomize 之前直接调用具有负参数值的 Rnd。使用具有同样 number 值的 Randomize 是不会得到重复的随机数序列的。
【示例】
本示例使用 Rnd 函数随机生成一个 1 到 6 的随机整数。
Dim MyValue
MyValue = Int((6 * Rnd) + 1) ' 生成 1 到 6 之间的随机数值。
【备注】
无
---------------------------------