ネタ元
http://blogs.wankuma.com/episteme/archive/2007/10/05/100080.aspx
http://blogs.wankuma.com/hatsune/archive/2007/10/05/100071.aspx
Mr.TさんのコメントでReplace関数が紹介されていたので、それを使ってみる。
target = Replace(target, target.Substring(pos , 1), "a", pos , 1)
↑かなーと思ってみたけれど、これじゃ無理。