yuji123さん、こんにちは。

BREGEXP.DLL の Replace 関数は、ＶＢでは次のように宣言します。

Private Declare Function Replace Lib \"bregexp\" _
　　(szRegstr As String, szTarget As String) As String

引数に値が返るわけではないのですが、
ByVal が付いていないので参照渡しになっています。

かなり以前に BSMTP.DLL について書きましたが、
そのときの経験から、ＶＢ用のＡＰＩで String 型の参照渡しの場合は、
引数が文字列のポインタのポインタになり、ＰＢで REF String で宣言しても
利用できないことがわかっています。
この関数の場合もそれと同じのようです。

よって、ＰＢで利用するには次のようにします。

◆外部関数
FUNCTION String Replace(REF UnsignedLong szRegstr, REF UnsignedLong szTarget) &
　　　　LIBRARY \"BREGEXP.DLL\"
FUNCTION UnsignedLong lstrcpyn(REF String dst, REF String src, Long length) &
　　　　LIBRARY \"KERNEL32.DLL\" ALIAS FOR \"lstrcpynA\"

◆スクリプト
//変数宣言
String szRegstr, szTarget
UnsignedLong lpszRegstr, lpszTarget
String ret

//引数セット
szRegstr = \"パターン文字列\"
szTarget = \"対象文字列\"

//引数のポインタ値取得
lpszRegstr = lstrcpyn(szRegstr, szRegstr, 0)
lpszTarget = lstrcpyn(szTarget, szTarget, 0)

//Replace 呼び出し
ret = Replace(lpszRegstr, lpszTarget)

//ret に置換後の文字列が返ります。