Access2010 Replace関数とNz関数の方法に関してｱｸｾｽ初心者です｡ﾌｨｰﾙﾄﾞ内の文字を変更したくて､以下(A)のようなﾓｼﾞｭｰﾙを書きました｡ﾌｨｰﾙﾄﾞ内にnu…

Access2010 Replace関数とNz関数の方法に関して

ｱｸｾｽ初心者です｡
ﾌｨｰﾙﾄﾞ内の文字を変更したくて､以下(A)のようなﾓｼﾞｭｰﾙを書きました｡
ﾌｨｰﾙﾄﾞ内にnull値があり､当然ｴﾗｰで返ってきます｡
そこで､nz関数を組み合わせたいのですが､(B)のように書いてみたところ､方法が悪いのか､引数ｴﾗｰとなり全く解らなくなりました｡
根本的なことが間違っているように想うのですが､ご教示頂けませんでしょうか｡よろしくお願い致します｡

**** (A) ****
Function myReplace5(target As String)
Dim buf As String

buf = target
buf = Replace(buf, "ship-postal-code", "お届け先郵便番号")
buf = Replace(buf, "recipient-name", "お届け先氏名")
buf = Replace(buf, "ship-state", "お届け先住所1行目")

myReplace5 = buf
End Function

**** (B) ****
Function myReplace5(target As String)
Dim buf As String

buf = target
buf = Replace Nz((buf, "ship-postal-code", "お届け先郵便番号"))
buf = Replace Nz((buf, "recipient-name", "お届け先氏名"))
buf = Replace Nz(buf, "ship-state", "お届け先住所1行目"))

myReplace5 = buf
End Function

(B)の構文を記載間違いました｡
以下のように記述して､ｴﾗｰが発生しております｡

■* (B) **

Function myReplace5(target As String)
Dim buf As String

buf = target
buf = Replace(Nz(buf, "ship-postal-code", "お届け先郵便番号"))
buf = Replace(Nz(buf, "recipient-name", "お届け先氏名"))
buf = Replace(Nz(buf, "ship-state", "お届け先住所1行目"))

myReplace5 = buf
End Function

■*** (B) ****

■* (B) **