帮助小弟，最好要会VFP和VB

Question

Public Declare Function GetActiveWindow Lib "user32" Alias "GetActiveWindow" () As Long

Answer 1

Vb里有API查看器你怎么不用呢?

Answer 2

这是用VFP格式写的VB的API查看器认识吗

Answer 3

Declare Function GetActiveWindow Lib "user32" Alias "GetActiveWindow" () As Long
Declare Function OpenDevice Lib "ICDM.DLL"  (Byval nMyAddress As Long , Byval hWnd As Long) As Long
Declare Function CloseDevice Lib "ICDM.DLL" (Byval pDevice As Long) As Long
Declare Function SetMyAddress Lib "ICDM.DLL" (Byval pDevice As Long, Byval nAddress As Long) As Long（5）、DECLARE INTEGER ConnectPort IN ICDM INTEGER pDevice, STRING strCommDef
I think you lost a "@" before "strCommDef".This parameter should be a  lpstr.Declare Function ConnectPort Lib "ICDM.DLL" (Byval pDevice As Long, Byval strCommDef As string) As Long
Declare Function IsConnect Lib "ICDM.DLL" (Byval pDevice As Long ) As Long
Declare Sub SetAddLog Lib "ICDM.DLL" (Byval pDevice As Long, Byval AddLogfile
As Long) 
Declare Function DisConnectPort Lib "ICDM.DLL" (Byval pDevice As Long) As Long
Declare Function ICDMCommand  Lib "Conv.DLL" (Byval nAddress As Long,Byval ICDMCmdAs Long,  Byval pSendBuffer As string,Byval pRecvBuffer As string) As Long

Answer 4

另外VFP中 Local m_hWnd
          Local m_nMyAddress
          Public m_pMyDevice
          是什么意思？

Answer 5

Local Command declare a local variable,Public command declare a global variable.
In VB, should declare as following:
 Private m_hWnd 
 Private m_nMyAddress 
Public m_pMyDevice 

Answer 6

Thanks I will give you score