使用Declare Sleep IN kernel32 INTEGER dwMilliseconds
或木瓜老师Set Library To myFll
Sleep(1) 大约16ms左右
使用inkey()大约70ms左右
请问还有其他方法吗？
吹水佬版主提过要更高精度的可试试API的QueryPerformanceCounter()或QueryPerformanceFrequency()这两个怎么用？
谢谢

有意思，我很想知道你得怎么测的，你有毫秒表不成？

百度了一下书上说：操作系统级的最高精度只能是3毫秒，且不管是什么系统。如果需要突破这一层限制，得用 MASM。

VFP解释语言层面就谈不上高精度延时，定时器也说的是毫秒级，纯VFP命令测试可能有几十毫秒以上。

DECLARE long QueryPerformanceFrequency IN kernel32 string@
DECLARE long QueryPerformanceCounter   IN kernel32 string@
large = REPLICATE(0h00,8)
QueryPerformanceFrequency(@large)
nFreq = CTOBIN(LEFT(large,4),"4rs")
QueryPerformanceCounter(@large)
nBegin = CTOBIN(LEFT(large,4),"4rs")
QueryPerformanceCounter(@large)
nEnd = CTOBIN(LEFT(large,4),"4rs")
DO WHILE ((nEnd - nBegin) / nFreq) < 0.001
    QueryPerformanceCounter(@large)
    nEnd = CTOBIN(LEFT(large,4),"4rs")
ENDDO
? (nEnd - nBegin) / nFreq

[此贴子已经被作者于2023-4-13 15:50编辑过]

QueryPerformanceCounter是1us级，用的是64位计数，VFP要扩展才可以做得高精度。
用 C 测试：

SECONDS() 1ms级
t = SECONDS()
DO WHILE (SECONDS()-t) < 0.001
ENDDO
? SECONDS()-t

谢谢版主，每次执行还有变化

[quote]以下是引用倦猫1973在2023-4-13 13:17:06的发言：
我比较赞同这个思路，在windows系统上你不管如何努力，精度不会太高。。。。

解释语言是这样的了，要求不能太高。
简单写个us级的dll给VFP试试能否满足要求

测试代码

CLEAR 
DECLARE double delay IN delay.dll double
? delay(0.000001)
? delay(0.001)
? delay(0.1)
? delay(0.5)
? delay(1)

版主这个厉害