stdcall是什么啊!!! Private Declare Function ADTOpenDataFile Lib "DataApart.dll" (FileName As String) As BooleanIf ADTOpenDataFile("data.dat") <> False Then
调用时用Private Declare Function ADTOpenDataFile Lib "DataApart.dll" (ByVal FileName As String) As Boolean.把你的加个ByVal就可以了
当然有问题啊,你把这个改一下: Private Declare Function ADTOpenDataFile Lib "DataApart.dll" (FileName As String) As Boolean 改成 Private Declare Function ADTOpenDataFile Lib "DataApart.dll" (byval FileName As String) As Boolean 在试试
Private Declare Function ADTOpenDataFile Lib "DataApart.dll" (FileName As String) As BooleanIf ADTOpenDataFile("data.dat") <> False Then
MsgBox "ded"
End If我用的这个代码,就是老出错!!!
可是不行,老是出错!!!看看有没有别的办法啊?
extern "C" { int __stdcall FACT( int n ); }要看一下VC的程序加上stdcall没有!
DeleteFiles(LPCTSTR FileName)
代码:
bool WINAPI ADTOpenDataFile(LPCTSTR FileName)
{
MessageBox(NULL,FileName,"aded",MB_OK);
return true;
}你看看有什么错误啊!!!
Private Declare Function ADTOpenDataFile Lib "DataApart.dll" (FileName As String) As Boolean
改成
Private Declare Function ADTOpenDataFile Lib "DataApart.dll" (byval FileName As String) As Boolean
在试试