求救，如何在VB中调用DLL中函数

Question

Declare Function func Lib "你的dll文件名"(ByVal param1 As String, ByVal param2  As string, ByVal n As Long) As Long

Answer 1

declare function func lib "Dllname"(byval Param1 as String,byVal Param2 as string,byval n as integer) as integer

Answer 2

请注意VC中的int对应VB中的Long

Answer 3

ATOM  ByVal variable As Integer 
BOOL  ByVal variable As Long 
BYTE  ByVal variable As Byte 
CHAR  ByVal variable As Byte 
COLORREF  ByVal variable As Long 
DWORD  ByVal variable As Long  
HWND, HDC, HMENU  ByVal variable As Long 
INT, UINT  ByVal variable As Long 
LONG  ByVal variable As Long 
LPARAM  ByVal variable As Long 
LPDWORD  variable As Long 
LPINT, LPUINT  variable As Long 
LPRECT  variable As type 自 定 义 类 型 的 任 意 变 量 
LPSTR, LPCSTR  ByVal variable As String 
LPVOID  variable As Any 任 何 变 量（ 在 传 递 字 符 串 的 时 候 使 用ByVal） 
LPWORD  variable As Integer 
LRESULT  ByVal variable As Long 
NULL As Any 或 ByVal Nothing 或 ByVal variable As Long ByVal 0& 或 VBNullString 
SHORT  ByVal variable As Integer 
WORD  ByVal variable As Integer 
WPARAM  ByVal variable As Long