代码如下:
Declare Function GetTempFileName Lib "kernel32" Alias "GetTempFileNameA" (ByVal lpszPath As String, ByVal lpPrefixString As String, ByVal wUnique As Long, ByVal lpTempFileName As String) As LongConst TEMP_PATH = "C:\TEST\"
Dim strTempName As String * 260intTemp = GetTempFileName(TEMP_PATH, "TMP", 0, strTempName)  ==》这句出的错,说是溢出了。请问64位的系统中如何调用上面的API?