Question

用VB如何判断一个程序是否有响应

如题:用VB如何判断一个程序是否有响应
如果没有响应则会作出下一步动作,谢谢.

Answer 1

你是说响应什么啊?键盘还是鼠标啊?
下面是我响应键盘的
建二个COMMAND和一个TIMER和一个TEXT
在COMMAND属性中一个设置DEFAUL为TRUE,为了响应键盘中的退出ESC另一个设置为CANCEL为TRUE为了响应键盘中的回车,在TEMER中的INTERNAL中设置1000吧就行了
代码如下,经过我的测试的了,是对的!!!
Private Sub Command1_Click()
Print "你在键盘上按的是回车 "
Timer1.Enabled = False
End Sub

Private Sub Command2_Click()
Print "你在键盘上按的是退出"
Timer1.Enabled = False
End Sub

Private Sub Form_Activate()
Print a
End Sub

Private Sub Timer1_Timer()
Static a As Integer
a = a + 1
Text1.Text = a
End Sub

Answer 2

没有这个东西的,要解决你的问题必须新建一个进程(不是线程)来监视,因为出问题的那个没响应什么事情都不能做了.只能通过其他的进程来判断.