IEのLocationNameが「???」となってしまいます (ID:101702)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 Debug.Print AscW(Mid(LN, 32, 1)) Debug.Print AscW(Mid(LN, 33, 1)) Debug.Print AscW(Mid(LN, 34, 1)) と実行してみれば、その正体がわかるかと思いますよ。 値自体は正しく取得されていますので、表示上の問題ですね。 その 3 文字の正体は、ChrW(&HA0) & ChrW(&H2013) & ChrW(&HA0) です。 HTML ソースを見ると、問題の 3 文字が文字実体参照「 – 」 と表記されていることが見て取れます。 すなわち、これらは Unicode の   … U+00A0 "No-Break-Space" –… U+2013 "En Dash" に相当します。 しかし VB6 の Unicode 対応は完全なものではありません。たとえば MsgBox "『" & ChrW(&HA0) & ChrW(&H2013) & ChrW(&HA0) & "』" というコードは、VBScript では正しく表示されますが、 VB6 では『???』に文字化けしてしまう事でしょう。 これは日本語環境においては、VB6 の MsgBox、Debug.Print、TextBox等は、 Shift_JIS しか扱えない仕様になっているからです。