API関数を使用すると、APIの実行は上手く行くのですが、スクリプトを抜けた後PBが強制終了してしまいます。
APIを使用した後は、何か後処理が必要なのでしょうか？（ハンドルclose済）

<外部関数の宣言>
Function Long InternetOpenA(String Agent,Long AcTy,String PxyNm,String Pxyps,Long Flags) 
LIBRARY \"WinInet.dll\"
Function Long InternetConnectA(Long InetSn, String SvrNm, Integer SvrPt, String Urnm, String Pw, 
Long Srvc, Long Flags, Long Cntxt) LIBRARY \"WinInet.dll\"
Function Boolean FtpSetCurrentDirectoryA(Long hndl,String CngDir) LIBRARY \"WinInet.dll\"
Function Long FtpFindFirstFileA(Long hndl,String SrhFile,REF s_ca90_win32_find_data 
win32find_data,Long dwFlags,Long dwContext) LIBRARY \"WinInet.dll\"
Function Boolean InternetCloseHandle(Long lclosehndl) LIBRARY \"WinInet.dll\"

<ボタン押下時のスクリプト>
hInternet = InternetOpenA(\"Agent\", 0, \"\", \"\", 0)  //WinInetの初期化
//インターネット上のサーバへの接続
hFtpSession = InternetConnectA(hInternet,ls_IpAdress,ll_ftp_port,ls_user_id,ls_password,1,0,0)
blnCngDir    = FtpSetCurrentDirectoryA(hFtpSession,ls_chk_dir) //カレントディレクトリの変更
s_ca90_win32_find_data win32find_data
hfindHndl   = FtpFindFirstFileA(hFtpSession, ls_chk_file, win32find_data, 0, 0)  //起動中ファイル検索
blnCloseHndl = InternetCloseHandle(hfindHndl)    //ファイル検索の切断
blnCloseHndl = InternetCloseHandle(hFtpSession)  //インターネットサーバへの接続の切断
blnCloseHndl = InternetCloseHandle(hInternet)    //WinInet初期化の切断

↑ここまでは上手く行きますが、この後、ボタンクリックイベントの処理が終了する時に
強制終了してしまいます。

些細な事でも良いので、ご教授下さい。よろしくお願い致します。