vb响应系统提示框框

来源：百度知道 编辑：UC知道 时间：2024/05/18 02:33:08
我现在想要写个程序
1.当打开某一文件，系统弹出“本次操作由于这台计算机的限制而被取消。请与您的系统管理员联系”的框框（弹出来时伴有声音，像是程序错误那种）
2.vb响应系统，弹出选择“是否删除该文件”（Yes&No）
3.选Yes就删除该文件，程序继续监听系统下一次弹出框框（系统弹出的其他框框不会做出反应，只有指定的那个才反应）
4.选No不处理文件，直接进入监听下一次系统弹出框框。

这样能不能实现？有人能明白我吗？
高分悬赏，有源码的发到：zhouhaijianmm@163.com

Private Sub Command1_Click()
MsgBox "本次操作由于这台计算机的限制而被取消。请与您的系统管理员联系", 0 + 16, "警告！"
End Sub

Private Sub Command2_Click()
Dim i
i = MsgBox("是否删除该文件", 1 + 32, "文件处理：")
If i = vbOK Then
'选Yes就删除该文件，程序继续监听系统下一次弹出框框（系统弹出的其他框框不会做出反应，只有指定的那个才反应）
Print "文件删除！"
End If

End Sub