VB模块中发现二义性的名称:CopyMemory

Question

在两个不同名的模块中发现的    ...不知道要怎么改  第一个模块中:   
    Do While K <= UBound(DefDQTData)
        CopyMemory DefDQT(0, LoBit4(DefDQTData(K))), DefDQTData(K + 1), 64
        K = K + 1 + 64
    Loop
第二个模块中:
Public Function HookFunc(ByVal nCode As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
 Dim f As Boolean
  
 If (nCode = HC_ACTION) Then
 If wParam = WM_KEYDOWN Or wParam = WM_SYSKEYDOWN Then
 CopyMemory p, ByVal lParam, Len(p)
  
 If p.vkCode = 121 Then
 Form1.Visible = Not Form1.Visible '如果按下"F10"键则显示或隐藏窗口
 End If
  
 End If
 End If
  
  
  
 HookFunc = CallNextHookEx(0, nCode, wParam, ByVal lParam)
  
End Function

Answer 1

引用CopyMemory的API时把名字改成不一样试试

Answer 2

你看是不是二个模块中都引用了API CopyMemory且都是公共的. 最好再确认一下声明,是否声明的参数都相同.