请教先生，我现在有这样一个问题：从有300行1列的“表.dbf”中随机取8个数，当这随机取到的8个数的和能被5除尽（或者称这个和能被5整除），则将这8个随机数及他们的和记录到“搜索记录.dbf”中，若这个和不能被5除尽，则进入下一次的随机取8个数继续按上述过程执行，直至随机8数之和能被5除尽的记录数为100退出程序，谢谢先生

USE 搜索记录 IN 0 ALIAS ta
ZAP
USE 表 IN 0 ALIAS tb
SELECT tb
nCount = 0
DO WHILE nCount < 100
    SELECT TOP 8 RAND() r, 变量 FROM tb ORDER BY r INTO CURSOR tmp
    SELECT SUM(变量) FROM tmp INTO ARRAY aSum
    IF aSum % 5 == 0
        SELECT 变量 FROM tmp INTO ARRAY av
        DIMENSION av[9]
        av[9] = aSum
        INSERT INTO ta FROM ARRAY av
        nCount = nCount + 1
        ?? " " +TRANSFORM(nCount)+0h0D
    ENDIF
ENDDO
SELECT * FROM ta

从有300行1列的“表.dbf”中随机取8个数
楼主的表好像是只有1个字段，分别从1个字段中随机取8条记录，不是1条记录的8个字段。

是从"表.dbf"中取随机取8个记录（或8行数据）

先生真神，可行了，谢谢！