私は実際、この質問はこのトピックに関してより優れていたと思います。
要約すると、「関数宣言のインポートのすぐそこに配置」できますが、VB6 IDE はそのようなことをデバッグする方法を知りません。しかし、コンパイラはそれをうまく処理します。それを dll にコンパイルすると、メイン プロジェクトはコンパイルされた機能にアクセスできます。
おそらく、これらを dll に移動する方法を尋ねていますか? その場合は、「ActiveX Dll」タイプの新しいプロジェクトを作成する必要があります。PwrUSB のような名前を付けます。次に、PwrUSBApi などにクラスを追加します (または、提供されている場合はデフォルト/空のクラスの名前を変更します)。次に、プロパティ ウィンドウで、クラスを GlobalMultiUse に設定します。MDeclares というモジュールで、すべての宣言をドロップします。
'from your other post...
Public Declare Function InitPowerDevice CDecl Lib "PwrDeviceDll.dll" (ByRef firmware() As Byte) As Long
PwrUSBApi クラスに戻ります。
'forward your calls to the dll
Public Function InitPowerDevice (ByRef firmware() As Byte) As Long
InitPowerDevice = MDeclares.InitPowerDevice(firmware)
End Function
API からより本格的なオブジェクト モデルを作成することもできますが、すべての API を整理するまでは、この単純なラッパーから始めます。
そうそう、メイン プロジェクトに戻って、新しいラッパー PwrUSB.dll への参照を [プロジェクト] メニューに追加します。次に、コードでは次のように使用します。
Dim numOfDevices as Long
Dim firmware() As Byte
Redim firmware(0 to 31)
numOfDevices = PwrUSB.InitPowerDevice(firmware)
幸運を。