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

回答の条件
  • 1人2回まで
  • 13歳以上
  • 登録:2010/05/06 23:29:10
  • 終了:2010/05/13 23:30:03

回答(2件)

id:HALSPECIAL No.1

HALSPECIAL回答回数407ベストアンサー獲得回数862010/05/07 00:26:04

ポイント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

ko8820回答回数1221ベストアンサー獲得回数692010/05/07 08:58:12

ポイント35pt

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

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

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

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

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

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

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

絞り込み :
はてなココの「ともだち」を表示します。
回答リクエストを送信したユーザーはいません