イモぐらぶさん、こんにちは。

＞いやはや、よもやこんなにはやくお返事を頂けるとは・・・ありがとうございます。
＞問題も解決しました。どうもありがとうございました。

無事問題解決したようでなによりです。
しかし興味のあるテーマなので、ちょっと実験君してみました。

以下、実験君した時のサンプルスクリプトです。

OS: NT4.0 SP3
PB: 5.0.04
UNLHA32.DLL
  : 1.45a
 
????????????????????????????????????
[外部関数の定義]
function long unlha(long _hwnd, string _szCmdLine, &
                    ref string _szOutput, long dwSize) &
              library \"UNLHA32.DLL\"
 
[スクリプトの記述]
long   lHwnd , size   , ret
string buffer, cmdline
 
//unlha32.dllに渡すコマンド。LHA.EXEと同じ書式です。
cmdline = \"a c:\\test.lzh\"
 
//その他のパラメータ
lHwnd  = handle(parent)
size   = 1024
buffer = space(size+1)
 
//\"unlha32.dll\"をコール
ret = unlha(lHwnd, cmdline, buffer, size)
if ret=0 then
  messageBox(\"確認\",\"処理は正常に終了しました\")
else
  messageBox(\"エラー\",\"\'unlha32.dll\'実行時にエラーが発生しました\")
end if
????????????????????????????????????