我的程序是这样的
VB:
Private Declare Function test Lib "C:\a.dll" (ByVal num As Long) As Long
Private Sub Command1_Click()
MsgBox (test(4))
End Sub
VC:
int test( int b)
{
return( b );
}
VB:
Private Declare Function test Lib "C:\a.dll" (ByVal num As Long) As Long
Private Sub Command1_Click()
MsgBox (test(4))
End Sub
VC:
int test( int b)
{
return( b );
}
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货