请问一下各位：
  VB是靠事件驱动机制运行的，比如click后执行某个函数，想请教一下有没有办法令该函数
在不影响其经操作的情况下一直执行？就是让程序在每个扫描周期都执行，如同像在DOS
下的BASIC编程一样。
  我现在有一块I/O卡，要一直检测外部的的急停开关的状态，一直发现急停开关被按下，即
I/O卡读回来的数据为0，则要马上封锁输出。我有想过用timer用触发事件，但这样做太慢了。
我要马上读来I/O卡的电平变化。

请问有什么办法？

Private Sub Form_Activate()
    '把函数放在这试试
End Sub

你说的这个是多线程。VB实现比较困难。

使用多线程，一个线程负责读这个值，然后发现就立即停止。但多线程还是涉及到一个立即停止如何操作的问题。跨进程直接调用？主进程标志变量循环检测？vb6本身很多东西是线程非安全，代码量多了就很容量出现问题。

定时器，可以达到每秒 20 次以上的触发。

必須要用VB實現嗎？