ハンドルの使い方 (ID:120299)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 DocuWorksというソフトのAPIを使ってプログラミングを試みています。 以下のように記述してみたのですが、CloseDocumentHandleの戻り値がエラーになってしまいます。 OpenDocumentHandleはエラーになっていないようですが、根本的に何が悪いのかよくわかりません。 どなたかご教授願えませんでしょうか。 Private Type XDW_OPEN_MODE nSize As Long nOption As Long End Type Const sizeof_XDW_OPEN_MODE = 255 Private Declare Function XDW_OpenDocumentHandle Lib "xdwapi.dll" _ (ByVal inputPath As String, ByRef pHandle As Long, sMODE As XDW_OPEN_MODE) As Long Private Declare Function XDW_CloseDocumentHandle Lib "xdwapi.dll" _ (ByVal handle As Long, ByRef reserved As Any) As Long Dim inpath As String Dim handle As Long Dim OpenMode As XDW_OPEN_MODE inpath = "c:\test.xdw" OpenMode.nOption = 0 OpenMode.nSize = Len(OpenMode) result = XDW_OpenDocumentHandle(inpath, handle, OpenMode) result = XDW_CloseDocumentHandle(handle, 0&)