お世話様です  ほえです。
過去の記事からEXEのパスを取得しようとして外部関数にこんな感じで外部関数を定義して
EXEのパスを取得しようとしているのですが、アプリケーションエラーが発生してしまいます
同様の現象を回避できた方や回避方法をご存知の方が折られましたらご教授ください
ちなみに環境はWin2000(SP3)+PB6.0という環境です

イベントビューアーの内容
アプリケーション ポップアップ: PB60J.EXE - アプリケーション エラー : \"0x10ced6df\" の命令が \"0x5257000e\" 
のメモリを参照しました。メモリが \"read\" になることはできませんでした。

外部関数
function long GetModuleFileName(long hModule, ref string lpszPath, long cchPath) &
library \"kernel32.dll\" alias for \"GetModuleFileNameA\"

スクリプト
Li_StrLen   = GetModuleFileName(0, Ls_TempPath, 1024)
Ls_FilePath = Left(Ls_TempPath, Li_StrLen)
Li_SelLen    = 0
FOR Li_Loop = Li_StrLen  TO 1 STEP -1
  IF MID(Ls_FilePath,Li_Loop,1)  = \"\\\" THEN
    Li_SelLen  =  Li_Loop
    Li_Loop    =  1
  END IF
NEXT
Gs_Path = MID(Ls_FilePath,1,Li_SelLen)