好像是可以这样做
1.取各段的数量
段1 = int(总数) * 0.7
段2 = int(总数) * 0.1
段3 = int(总数) * 0.2
或者这样
段2 = int(总数) * 0.1
段3 = int(总数) * 0.2
段1 = 总数 - 段2 - 段3
2.用循环分别取对应的段位的随机数
我记得，好像可以这样的
*0~30段位
for i=1 to 30
?int(rand()*30)
endfor
*31~80段位
for i=1 to 80
?int(rand()*50)+30
*81~100段位
for i=1 to 20
?int(rand()*20)+80
endfor

[此贴子已经被作者于2022-12-17 08:14编辑过]

创建一个表dbfInt.dbf，就一个整型数字段aint。
或者，定义一个数组Dime aint[1000]
生成1000个数值在要求范围以内的随机数，必要时，生成1万个也行。

=rand(-1)
for i=1 to 1000
    lnInt = int(rand()*100)
    insert into dbfInt (aint) value (lnInt)
endfor i

然后，自上而下，往后扫描这张表，取到合适的，0--30，就留下，不合适的跳过，至取满所需个数；
继续，从下一条记录开始，往后扫描这张表，取到合适的，31--70，就留下，不合适的跳过，至取满所需个数；
继续，从下一条记录开始，往后扫描这张表，取到合适的，71--100，就留下，不合适的跳过，至取满所需个数。
……全剧终。