Accessの文字の置換のクエリについて

質問

Accessについて教えて下さい。
SQLデータベースをODBCを使用して、Accessにてリンクしています。

テーブルのあるフィールドに顧客名が並んでいます。
頭の一文字を○に置換するには、どのようなクエリを組めばいいのでしょうか？
山田　太郎⇒○田　太郎
田中　一郎⇒○中　一郎
佐藤　花子⇒○藤　花子

また、間にスペースが入っている後の文字(名)の置換の方法も教えて下さい。

回答No.1

nora1962

SELECT "○" & Mid(col,2)
FROM t;
こんな感じで。

> また、間にスペースが入っている後の文字(名)の置換の方法も教えて下さい。
間に入っているスペースを削除したいということでしょうか。

Public Function myreplace(inpstr As String) As String
Dim re As Object
Set re = CreateObject("VBScript.RegExp")
re.pattern = "([^　]+)　([^　]+)"
myreplace = re.Replace(inpstr, "$1$2")
End Function

という関数を標準モジュールで定義して

SELECT myreplace(col)
FROM t;

でいけるかと。