Question

vfp随机函数

如何产生随机的大写英文字母或小写英文字母？举例说明

Answer 1

RAND(0) &&产生随机数，运行一次加0参数可以每次得到不同的随机序列
tmpN=int(rand()*100) &&产生随机数0~100
do while .T. &&进入循环
if (tmpN>=97 .and. tmpN<=122) .or. (tmpN>=65 .and. tmpN<=90) &&如果数值范围在字母的ASICC值范围内
?chr(tmpN) &&输出字母
exit &&退出循环
endif
tmpN=int(rand()*100) &&产生随机数0~100
enddo

Answer 2

产生随机的大写字母：
a=chr(int(26*rand(0)+65)
产生随机的小写字母：
b=chr(int(26*rand(0)+97)