teacup. [ 掲示板 ] [ 掲示板作成 ] [ 有料掲示板 ] [ ブログ ]


新着順:39/148 記事一覧表示 | 《前のページ | 次のページ》

Re:VB画面を表示せず圧縮したいです

 投稿者:松ちゃん@店長メール  投稿日:2004年11月23日(火)19時39分22秒 i60-36-65-129.s02.a027.ap.plala.or.jp
  通報
  >はぎさん
フォームオブジェクトがない場合はhWndに0を入れるといいと思います。

Public Declare Function Unlha Lib "Unlha32" (ByVal hWnd As LongByVal szCmdLine As StringByVal szOutPut As StringByVal dwsize As Long) As Long

Sub Main()
  Dim lngret As Long
  lngret = Unlha(0"a test.lzh D:\AAA\ *.*"vbNullString0)
  If lngret <> 0 then
    MsgBox "エラー発生"
  End if
End Sub
 
 
》記事一覧表示

新着順:39/148 《前のページ | 次のページ》
/148