1

我正在尝试以编程方式将程序添加到排除的应用程序列表,这样如果它崩溃,我就不会收到“调试/关闭程序”对话框。它需要在 vba 中,因为它将是用 vba 编写的更大程序的一部分。

下面是我尝试将此处找到的 C++ 代码转换为 vba

Private Declare PtrSafe Function WerAddExcludedApplication Lib "User32" _
        (ByVal pwzExeName As String, ByVal bAllUsers As Long) As Long

Sub test()
    WerAddExcludedApplication "MyApp.exe", 1
End Sub

有人帮我解决这个问题吗?

谢谢。

阿布塞塔

4

1 回答 1

1

你应该检查声明。此 API 不是由 user32.dll 导出的。

参考说库是wer.dll。

这个函数需要Unicode字符串。所以,你必须通过它。像下面

s = "myapp.exe"
s = StrConv(s, vbUnicode)
WerAddExcludedApplication(s, 1)
于 2013-08-05T03:45:11.093 回答