独自の IE - VB を使用した DIY ブラウザー

独自のブラウザを作成しますか?間違いはありますか？ IE のような巨大なソフトは言うに及ばず、コンパクトな Opera でさえ、私たち一般人のほとんどは決してそれを実行することはできません。ただし、VB5.0 プロフェッショナル バージョンがマシンにインストールされている場合は、作業がはるかに簡単になります。さあ、行きましょう！

プログラムの主役は ActiveX コントロール、WebBrowser です。もちろん、デフォルトでは VB ツールボックスに含まれていません。その方法は、ツールボックスを右クリックし、表示されるショートカット メニューで [パーツ...] を選択し、追加されていることを確認します。ポップアップ ダイアログ ボックスで [コントロール] タブを選択し、[Microsoft インターネット コントロール] を見つけて、その前にある小さなボックスをオンにして、[OK] を選択します。この時点で、ツールボックスにさらに 2 つの小さなアイコンが表示されます。その中で、地球のアイコンで表されるコントロールが必要な WebBrowser です。

多くの人は WebBrowser コントロールにあまり詳しくなく、VB ヘルプにもそれに関する内容がないため (とにかく見つかりませんでした)、スペースの制限により、そのプロパティ、メソッド、イベントを紹介する必要があります。以下のプログラムで使用されるもののみを取り上げます。

プロパティ: LocationURL コントロールによって表示される WEB ページの URL を返します。

メソッド: 指定された URL に移動するか、指定された HTML ファイルを開きます。

イベント： 1． DownloadBegin ダウンロード操作の開始時に発生します。

2. DownloadComplete ダウンロード操作が完了、終了、または失敗したときに発生します。

3. ProgressChange WebBrowser コントロールは、ダウンロード操作の進行状況を追跡し、このイベントを定期的にトリガーします。構文は次のとおりです: Sub WebBrowser_ProgressChange (ByVal Progress As Long、ByVal ProgressMax As Long)。 Progress 引数は現在ダウンロードされているデータの合計量であり、ProgressMax 引数はダウンロードされるデータの合計量です。

4. TitleChange は、現在のドキュメントのタイトルが変更されるとトリガーされます。

WebBrowser コントロールに加えて、プログラムには、URL アドレスを表示するために使用される Label コントロール: Label1、ComboBox コントロール: combo1、ダウンロードの進行状況を表示するために使用される ProgressBar コントロール: ProgressBar1 も必要です。 ActiveX コントロールは Microsoft Windows Common Controls 5.0 のメンバーです。ツールボックスに追加する方法は WebBrowser コントロールと同じです)。これらのコントロールのプロパティ値はデフォルト値を使用します。

プログラムリストは次のとおりです。