VBの文字列を〜W系APIに渡す

　もともとVBの文字列の内部コードはUnicodeなんで、〜W系APIには素で渡せてもよさそうなもんなんだが9x系の縛りがあってかStringとして渡す場合は必ずANSI変換がかかる。ので〜A系APIを使うのが普通なのだが、いろいろあって〜W系APIを使いたい場合。
　APIの方のLPCTSTR引数は「ByVal 〜 As Long」としておいて、渡すときはStrPtr()の値を渡してやればよい。ただし、これがLPTSTR(つまり渡し先で書き換えあり)だったりするとガクブルもの(汗)なのでちうい。