API如何声明？

Question

我新建了一个模块，在该模块中有以下API声明：Private Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long
但我在form1中调用该声明中的setparent却说没有声明。请问API的声明如何才能在模块中实现？

Answer 1

应申明为公共变量
Public Declare Function   。

Answer 2

Api聲明
'*********************************************************************************************
Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) '定義延時函數
Public Declare Function GetWindowsDirectory Lib "kernel32" Alias "GetWindowsDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long

Answer 3

Public Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long

Answer 4

改成公共变凉
用Public 来定义

Answer 5

private当然不能调用，改成public

Answer 6

Public Declare Function
VB自代了声明API的程序

Answer 7

在标准模块中：
Public Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long