在vb 6中没有睡眠的延迟

Question

我在visual basic6中有一个要求，我想将命令发送到连接到我PC的机器。我只有在得到它的确认后才能发送命令。就像这样。发送第一个命令后休眠会使程序无效，我无法收到确认。

所以我正在考虑使用变量或标志，并在后续模块中增加延迟。但我不确定如何实现这个东西。我已经包含了样本相当不完整的代码。但我不知道它如何能够延迟。我在考虑计时器，转到。还有其他方法可以在这里实现延迟。

我发送命令的模块

//发送模块

Sendcommand()

Send command CMD1.
If (flagcheck =2)
Send command CMD2.

我收到确认命令的模块

Receive command()

Select cmdname
public flagcheck=0
CASE ACK1.1
        flagcheck=flagcheck+1
CASE ACK1.2
        flagcheck=flagcheck+1

Answer 1

您通常可以执行类似

的操作

SendCommandOne

While flag = 0 ' ReceiveCommand would set flag to 1
    DoEvents
End While

SendCommandTwo

等