VS2005 VBでIE8のようにWebBrowserをつかってタブで表示したいと思います。タブの動的追加はわかるのですが、できたタブにWebBrowserはどのように動的に追加するのでしょうか?

回答の条件
  • 1人2回まで
  • 登録:
  • 終了:2010/05/13 23:30:03
※ 有料アンケート・ポイント付き質問機能は2023年2月28日に終了しました。

回答2件)

id:HALSPECIAL No.1

回答回数407ベストアンサー獲得回数86

ポイント35pt

まず試しに空のフォームにWebBrowserコントロールを貼り付け、保存し、「Form1.Designer.vb」

のようなデザイン用のファイルをテキストエディタで開いてみてください。

すると、このあたりが必要なのだということが見えてきます。

Me.WebBrowser1 = New System.Windows.Forms.WebBrowser
'Me.SuspendLayout()		'これはコメントアウト
'
'WebBrowser1
'
Me.WebBrowser1.Dock = System.Windows.Forms.DockStyle.Fill
Me.WebBrowser1.Location = New System.Drawing.Point(0, 0)
Me.WebBrowser1.MinimumSize = New System.Drawing.Size(20, 20)
Me.WebBrowser1.Name = "WebBrowser1"
Me.WebBrowser1.Size = New System.Drawing.Size(292, 266)
Me.WebBrowser1.TabIndex = 0
・・・

Friend WithEvents WebBrowser1 As System.Windows.Forms.WebBrowser

という事で、こんな感じになると思います。

Public Class Form1
    Private WithEvents _webBrowser As System.Windows.Forms.WebBrowser

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        _webBrowser = New System.Windows.Forms.WebBrowser
        '
        'WebBrowser1
        '
        _webBrowser.Parent = Me		'※ペアレントを指定
        _webBrowser.Dock = System.Windows.Forms.DockStyle.Fill
        _webBrowser.Location = New System.Drawing.Point(0, 0)
        _webBrowser.MinimumSize = New System.Drawing.Size(20, 20)
        _webBrowser.Name = "WebBrowser1"
        _webBrowser.Size = New System.Drawing.Size(292, 266)
        _webBrowser.TabIndex = 0

    End Sub
End Class
id:ko8820 No.2

回答回数1221ベストアンサー獲得回数69

ポイント35pt

WebBrowserコントロールをコントロール配列にして、

このコントロール配列のを動的に明示的にnewしてオブジェクトを

生成することで実現します。

コメントはまだありません

この質問への反応(ブックマークコメント)

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

回答リクエストを送信したユーザーはいません