まず試しに空のフォームに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
コメント(0件)