你们中是否有人知道如何在弹出消息出现时发出警告信息或发出通知?
示例:
它就像错误处理一样,但是你正在捕捉一个消息框而不是一个实际的错误。
P.S:即使消息框出现,也不要点击任何按钮,它应该通知/警告
希望有人能帮我解决问题。对于视觉工作室,我是新手 或者如果还有其他方法可以在其他语言上制作这样的东西。请告诉我。谢谢 !
答案 0 :(得分:0)
这是一个例子(使用VBA)
1-创建UserForm1
- 自定义错误消息
2-在userform
中包含以下代码Private Sub CommandButton1_Click() 'Raise Error
On Error Resume Next
Call Err.Raise(666, "Test", "Test")
Unload UserForm1
End Sub
Private Sub CommandButton2_Click() 'Ignore Error
On Error Resume Next
Call Err.Raise(667, "Test", "Test")
Unload UserForm1
End Sub
3- Module1
Sub Test()
If Err.Number = 666 Then
MsgBox "error happened"
End If
End Sub
4-在'ThisWorkbook'中
Private Sub Workbook_Open()
UserForm1.Show
Call Test
End Sub
希望这有帮助。