delphil转换成VB

Question

Public Declare Function SOpen Lib "upload.dll" (ByVal server As String, usr As String, ByVal psw As String, ByVal cachefile As String) As Long Procedure  SessionUploadData(isess:longint;    isbuy:boolean;     medicament:PChar);stdcall;external 'upload.dll';
请哪位高手转换一下..代码转换成VB

Answer 1

已经有答案.送分给跟帖的Public Declare Function SOpen Lib "upload.dll" (ByVal server As String, ByVal usr As String, ByVal psw As String, ByVal cachefile As String) As Long