• 締切済み

VB6のイメージコントロールでURLの画像を表示

VB6のイメージコントロール、またはピクチャーコントロールで URLの画像を表示したいです。 ローカルに一度保存してLoadPicture関数を使うことでできそう ですが、ローカルに保存せずに表示することは可能でしょうか?

みんなの回答

  • imogasi
  • ベストアンサー率27% (4737/17068)
回答No.2

URLを指定してBrowserが出すものには、文字も画像も通常は両方ある。そのうちの画像だけに限定した話か。しっかりと質問に書かないとダメでは。 画像(文章は除く)のファイル名を知り、Browserに代わりサーバーから呼んでくるとかBrowserの呼んできているものを取り出すのは難しいのでは。 WebBrowserコントロールで済むことかどうか。

wds32862
質問者

補足

質問には「画像」としか書かなかったんですが、「しっかり」という のは他に何が必要でしたか? 質問文を見て、なぜ「画像」→「Browserが出すもの」→「文字」と 連想されるのか、ちょっと理解できなかったです。

全文を見る
すると、全ての回答が全文表示されます。
  • DreamyCat
  • ベストアンサー率56% (295/524)
回答No.1

エクセルの場合ですがVB6でも同じかと思います。 WebBrowserコントロールだと何も面倒なく表示されますが、それではだめですか? WebBrowser1.Navigate "http://x5.goo.ne.jp/banner5/20091102/091104_cdc_womantakagray_oshiete.gif"  このページの上にある「 年収・・・」の図の例 imageコントロールのpictureプロパティだと 手動でURLを貼り付けて表示させることはできるのですが 自動ではどうすればできるのか???です。

wds32862
質問者

お礼

イメージコントロールのPictureプロパティってデザイン時だと URLの指定ができるんですね。知りませんでした。 実行時もローカルファイルと同じくLoadPictureでやってくれると 助かるんですけどね。 いろいろググってみたらAPIのOleLoadPicturePathでできそうです。 ご回答ありがとうございました。

全文を見る
すると、全ての回答が全文表示されます。

関連するQ&A

  • ExcelVBAのフォーム上のimageコントロールにWeb上にある画

    ExcelVBAのフォーム上のimageコントロールにWeb上にある画像を表示したいのですが、VBE上のプロパティで設定するときは表示されるのに、プログラム上で設定するとエラーが出ます。 Image1.Picture = LoadPicture(strURL)で設定しましたが無理でした。 どうやら、LoadPicture関数での設定では駄目なようです。 VBE上では出来るので、何かしら方法があると思うのですが、いかがでしょうか? よろしくお願いいたします。

  • イメージコントロールについてVB6

    Image1.Picture = LoadPicture("C:\VB練習\テストプログラム\ime1.jpg") と作ります。当然作っている時は上の順番でフォルダ から読み込まれてime1.jpgが表示されます。 ただ配布用にパッケージしてから他のPCで起動させると ("C:\VB練習\テストプログラム\ime1.jpg") が見当たりませんのようなエラーが出てプログラムが起動しません(T_T; 対処方法はありますか?

  • Image or Pictureコントロールについて

    VB6でImageコントロールとPictureコントロールを使って簡単なアニメーションを作っている最中に以下の事を気づきました。 Pictureコントロールの場合、背景色がBackgroundColorなのに対し、作成した画像が透過GIFの為かImageコントロールは画像の部分だけ表示されて、後ろの画像に溶け込んだように表示されます。 機能面ではPictureコントロールの方が上(Imageコントロールに無い機能は何かは知りませんが)のような気がしたのですが、この場合の見た目はImageコントロールの方が良いのですが、本来こういうものでしょうか? ちなみにVB.NETはどうなっているのでしょうか?

  • コントロールの挿入と同時に画像を表示する方法

    アクティブエックスコントロールのイメージコントロールの設置と同時に、 画像をそのコントロールに表示するvbaを作ってるのですが、 実行時エラー438が発生します。 Sub test() Dim objOLE As OLEObject Set objOLE = ActiveSheet.OLEObjects.Add("Forms.Image.1") With objOLE .Name = "Image" .Picture = LoadPicture("C:\1.gif") End With End Sub C:\1.gifのパスをブラウザで表示させることはできるので、ファイルは存在しているし、 パスは間違っていません。 .Picture = LoadPicture("C:\1.gif") をコメントアウトすれば正常にコントロールが挿入されます。 コントロールの挿入と同時に画像を表示する方法を教えてください。 ご回答よろしくお願いします。

  • Imageコントロール vba

    Imageコントロールをsheetに直接はりました。 sheetにはったイメージをExcelを開いたときにリンク先のものに変えたいです。 Image1_Click()を使えばクリックすると切り替えることができます。 Image1.Picture = LoadPicture("C:\イメージ.bmp") クリックせずにExcelをひらくと「イメージ.bmp」を参照して画像が変わるようにしたいのですが、どうしたらよいでしょうか。

  • イメージコントロールに画像をセット

    イメージコントロールに画像をセットしたいのですが、下記ではうまく動きません。 どうしたらよいでしょうか。 Private Sub Workbook_Open() ActiveSheet.OLEObjects.Add(ClassType:="Forms.Image.1", Link:=False, _ DisplayAsIcon:=False, Left:=137.25, Top:=20.25, Width:=270, Height:= _ 154.5).Select Worksheets("Sheet1").Image1.Picture = LoadPicture("D:\My doc\My Pictures\11.jpg") End Sub

  • 連続で印刷すると画像が更新されない(Excelのイメージコントロール)

    いつもお世話になります。 エクセルのイメージコントロールを使用しているのですが、 なかなかうまく行かないので、アドバイスをお願いします。 シートにイメージコントロールをいくつか(8個)配置しました。 マクロで LoadPicture を使用し画像を読み込ませました。 Rangeで範囲を指定して印刷しました。 一旦、Sheet1.Image1.Picture = Nothing と開放しました。 そのイメージコントロールに別画像を LoadPicture させました。 同様に印刷させましたが、画像は最初に読み込ませたもののままです。 マクロが終了して見ると、最新の画像に更新されているのですが、 印刷したものでは(プリビューでも)更新されません。 Redraw させたり Refresh させるコマンドはないかと思いましたが見つかりません。 同じマクロで画像のコメントをセルに表示させているのですが、 こちにはどんどん更新しています。 画像だけが、最初に読み込んだ画像のままで印刷されてしまいます。 印刷範囲は常に同じです。 原因なり対処法なりをお教え下さいますようお願いします。

  • VB2005 コントロールの背景を透過

    フォームにバックグラウンドイメージを設定しているのですが その上にグループボックスやラベルを貼り付けたら、フォームのイメージが隠れてしまいます。 VB6はコントロールに背景を透過にするプロパティがあったので探してみたのですが、見当たりません。 おそらくVB2005でも簡単に透過設定できると思うのですが… グループボックスとラベルを透過に設定する簡単な方法はありますでしょうか? (コントロールの継承になってくる?) また、これはおそらく無理だと思うのですが ピクチャーボックスで表示されている画像の透過部分にも フォームの背景イメージを表示させる、ということは可能でしょうか? よろしくお願い致します。

  • Imageコントロールにグラフを表示させるには

    Excel VBAでフォームにイメージコントロールを配置して、そこにエクセルで作成したグラフ(グラフシート)を表示するようなプログラムは作成可能でしょうか? 例えば、 まずワークシートのデータを元にグラフ(グラフシート)を作成し、作成したグラフをフォーム上のイメージコントロールに表示させる一連の作業をVBAでプログラミングできるかどうかということです。 Userform1.MultiPage1.Image1.Picture = .........といった感じです。 もしくは、作成したグラフをgif形式の画像として特定のディレクトリなりフォルダに保存して、その画像ファイルを読み込むことで対応はできるでしょうか? よろしくお願いします。

  • ウインドウへのイメージ画像の表示について

    メインウインドウにイメージを貼り付けたいと思うのですが ウインドウのクライアントエリア全体にでは無く 添付画像の様に任意の場所に任意の大きさで表示したいと思っています。 当初は「イメージボックス」(ピクチャボックス)を使うことを 考えたのですが、画像が自動的にコントロールの大きさに合わせて 拡大縮小されたり、スクロールバーが付けられなかったりして うまく扱えませんでした。 イメージの周りに「クライアントエッジ」が付けられればと思います。 「クライアントエリアのみの子ウインドウ」のようなものが あって、それをメインウインドウに貼り付ける、みたいな ことが出来ればいいなと思っているのですが、良い方法が ありましたら教えて下さい。 ActiveBasicを使っていますが、教えて頂く際には CやVBでも構いません。