请问这个该如何处理?
作者: africa 时间: 2018-5-25 00:36
把
Public Declare Function GetTempPath Lib "kernel32" Alias "GetTempPathA" (ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long
改成:
#If VBA7 Then
Public Declare PtrSafe Function GetTempPath Lib "kernel32" Alias "GetTempPathA" (ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long
#Else
Public Declare Function GetTempPath Lib "kernel32" Alias "GetTempPathA" (ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long
#End If作者: iceback 时间: 2018-5-25 16:36
非常感谢你的回复,64位的问题没了,但是出来个新的对话框,如下: