おはようございます、ebifurai55です。

質問を返します。

>> その辺確認いただけないでしょうか？
>？？「その辺」とは、何を指していますか？

その辺とは仮面弁士さんもVB6もVBを使っているか？
です。バージョンが違ってるとまずいですよね・・・

>> ' If Not IsPicture(URL, Flags, TargetFrameName, PostData, Headers) Then 
>おぉっと。ここをコメントにしてしまっていたのですか。それでは確かに
>>> 普通のAタグも新しいウィンドウ（_blank）で開いてしまうのですが、
>になってしまっていたでしょうね。
これなんですが、引数の数が足りてないような気がします。
JPG,GIF,PNGの判定ファンクションで
>Public Function IsPicture(ByVal URL As String) As Boolean
となってますが、
ByValとは何でしょうか？、これが先に判らない事で、また
URLが引数でブーリアン値を設定しているように見えますが、
上のIf Not ～だと複数の引数が設定されてますよね？
If Not ～をコメント解除するとエラーになってしまいます。これも上に
書いたVBのバージョン違いなのではないか？と思ったしだいです。
また推測で書きますが、If Not ～はIsPictureがTrueじゃなかったら
BeforeNavigate2をExit subをするという事でよろしいでしょうか？
つまり画像じゃなかったらBeforeNavigate2を出て、
画像だったらTarget=_blankを指定して、声クリックも判定させる。
でもそうすると、通常のリンクで声クリックが出せないような気が
するのですが、この処理の流れは合っているのでしょうか？
VB歴が少ないので処理の流れがわかりません。すいません。
僕の環境だと、Timer1_timerにCall PlaySoundを指定すると音が鳴らず、
BeforeNavigate2に置くと音が鳴ります。


>> Sub Toolbar1_ButtonClick
>戻る/進むボタンを加えるときには、Sub WebBrowser1_CommandStateChange の
>イベントプロシージャも組み込むようにしてください。このイベントの
>Command 引数と Enabled 引数を見ることで、ボタンの使用可否を制御できます。
>なお、Command は CSC_NAVIGATEFORWARD / CSC_NAVIGATEBACK / CSC_UPDATECOMMANDS の
>いずれかの定数値となります。

やってみた事はないのですが、
そこまで必要じゃないのですが、検討しておきます。

>
>> 進むボタンを押したときBeforeNavigate2の音声が
>> 再生されてしまいます。
>進むボタンを押したかどうかを変数に保持しておき、それによって、
>　Call PlaySound("clicklink.wav", 0, SND_ASYNC)
>の行を実行させるかどうかを切り替えてみては如何でしょう。 

先ほどテストしてみた限り、ちょっとタイミングが遅れたり、聞こえなかったり
するのですが、しばらくすると聞こえるようになるので良しとします。


また、このトピック段々タイトルと話しが違ってきている様なので
必要ならば新しくトピックを立てます。質問したい事はたくさんあります。