GIFアニメーションをPictureに表示するには？

解決

卵 2005-12-09 01:06:18 No: 128701

お世話になってます。
VB6.0、WIndowsXPで開発しています。
PictureにGIFアニメーションを貼り付けて表示させたいのですが、画像が動きません。
どなたか表示方法をご存知でしたら、教えていただけませんでしょうか??

matsu 2005-12-09 01:50:42 No: 128702

過去ログにもありますが、WebBrowserコントロールを使う必要があります。

http://madia.world.coocan.jp/cgi-bin/VBBBS2/wwwlng.cgi?print+200401/04010131.txt

卵 2005-12-09 18:38:32 No: 128703

matsu様：回答ありがとうございます。
過去ログを見て、設定して書いてみたのですが、
実行時エラー91「オブジェクト変数またはWithブロック変数が設定されていません」と出ました。
ちなみに、ソースはこれです↓

Private Sub Form_Load()
Dim HStyl As HTMLStyle
Dim GifFileName As String

    GifFileName = App.Path & "\xxx.gif"
    WebBrowser1.Navigate GifFileName
    Set HStyl = WebBrowser1.Document.body.Style
    HStyl.overflow = "hidden"
    Set HStyl = Nothing
End Sub

何か設定が足りないのでしょうか??
申し訳ありませんが、教えてください・・・

卵 2005-12-09 18:49:31 No: 128704

すいません!!

サイトを探していたら、方法見つけました!!

よく探せばよかった・・・汗

お世話になりました!!またお願いします。

ガッ 2005-12-09 18:54:39 No: 128705

WebBroserを使うためにはコンポーネント：Microsoft Internet Controls
が必要です。これは追加していますか？
WebBroserコンポーネントをFormに貼り付けていますか？
HTMLStyleクラス(インタフェイス？)を使うためには Microsoft HTML Object Library を参照設定する必要があります。参照設定していますか？

くらいかな。

ガッ 2005-12-09 18:54:57 No: 128706

('Ａ｀) おめでとうございます。

卵 2005-12-09 22:00:18 No: 128707

ガッ様：回答ありがとうございました!!またお願いします。