Question

VB中sleep函数的使用

“通用”是在哪啊

我这样写提示错误

怎么弄啊
我是新手





Answer 1

新增一个模块，把这句加在模块里面

private declare sub sleep lib kernel32 (byval dwmilliseconds as long)

追问

添加了  还是错误   

Answer 2

把 private declare sub sleep lib “kernel32” (byval dwmilliseconds as long)
放在private sub command7_click() 之前
如 private declare sub sleep lib “kernel32” (byval dwmilliseconds as long)
private sub command7_click()
最好是放在最前面
例子
Private Declare Sub sleep Lib "kernel32" (ByVal dwmilliseconds As Long)
Private Sub Command1_Click()
i = 1
s = 0
Do While i <= 99
s = s + 1 / i
i = i + 2
Loop
Print s
End Sub
Private Sub Command2_Click()
End Sub

追问

大神能留个qq号吗

追答

不是这样的 那百度一下 “ vb api 声明”

追问

我的怎么就不能在Private Sub Command1_Click()之前加private declare sub sleep lib “kernel32” (byval dwmilliseconds as long)

我都开崩溃了

追答

你截个图来看看

追问

追答

你将Private Declare Sub sleep Lib "kernel32" (ByVal dwmilliseconds As Long) 剪切
然后在代码窗口的最上黏贴 Q16302489

Answer 3

声明是写在事件外的 就是顶上第一行 不要有代码 然后把这代码复制就行了