Question

vfp 中 rand()函数的用法

Answer 1

返回一个 0 到 1 之间的随机数。
RAND([nSeedValue])
返回值
数值型
参数
nSeedValue
指定种子数值，它决定 rand( ) 函数返回的数值序列。
在第一次发出 rand( ) 函数时用种子数 nSeedValue，然后再使用不带 nSeedValue 参数的 rand( ) 函数，将得到一个随机数序列。如果第三次发出 rand( ) 函数时使用同样的种子数值 nSeedValue，那么 RAND( )返回同样的随机数序列。
如果第一次发出 RAND( ) 时使用的 nSeedValue 参数是负数，那么将使用来自系统时钟的种子值。若要获得随机程度最大的数字序列，可以最初用一个负的参数发出 rand( ) 函数，然后再不带参数发出 rand( ) 函数。
如果省略了 nSeedValue 参数，rand( ) 函数使用默认的种子数值 100001。
示例
第一个示例使用 rand( ) 函数创建了包含 10 条随机记录的表，然后使用 min( ) 和 max( ) 函数来显示表中的最大值和最小值。
第二个示例显示 1 到 10 之间的一个随机数。
CLOSE DATABASES
CREATE TABLE Random (cValue N(3))
FOR nItem = 1 TO 10 && 添加 10 条记录,
APPEND BLANK
REPLACE cValue WITH 1 + 100 * RAND() && 插入随机值
ENDFOR
CLEAR
LIST && 显示值
gnMaximum = 1 && 初始化最小值
gnMinimum = 100 && 初始化最大值
SCAN
gnMinimum = MIN(gnMinimum, cValue)
gnMaximum = MAX(gnMaximum, cValue)
ENDSCAN
? '最小值是: ', gnMinimum && 显示最小值
? '最大值是: ', gnMaximum && 显示最大值
CLEAR
gnLower = 1
gnUpper = 10
? INT((gnUpper - gnLower + 1) * RAND() + gnLower)

Answer 2

rand()的返回值是0-1,
最小0.01,最大0.99,
其他范围就是按比例放大
比如范围下限是n1,
上限是n2,使用一下公式:
int((n2-n1)*rand())+n1