64位字代码在SetPrinter上崩溃Word

Question

我继承了一些需要更新才能在64位Office中运行的VBA代码。我的印象是，将Long改为Longptr并将PTRSafe添加到函数声明中是大部分工作。我遇到的问题是，当我调用SetPrinterA函数时，Word崩溃，我无法解决原因。请参阅以下代码：

{{1}}

正如您在运行API Monitor时所看到的，我没有获得SetPrinter和Word Crashes的返回值。如果您需要更多信息，请与我们联系。