これのvbscript版 http://blog.livedoor.jp/dankogai/archives/51781629.html life = "生" death = "死" msgbox unescape("%u" & hex(ascw(life) and ascw(death)))