(MVC) MVC (2018)

CefSharp.Winforms.ChromiumWebBrowser minimal example on VB.NET (with cookies collector and script executor).

This is windows forms, translated from CefSharp.MinimalExample to VB.NET.

   1:  <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
   2:  Partial Class BrowserForm
   3:   
   4:      Private components As System.ComponentModel.IContainer = Nothing
   5:   
   6:      <System.Diagnostics.DebuggerNonUserCode()>
   7:      Protected Overrides Sub Dispose(ByVal disposing As Boolean)
   8:          Try
   9:              If disposing AndAlso components IsNot Nothing Then
  10:                  components.Dispose()
  11:              End If
  12:          Finally
  13:              MyBase.Dispose(disposing)
  14:          End Try
  15:      End Sub
  16:      <System.Diagnostics.DebuggerStepThrough()>
  17:      Private Sub InitializeComponent()
  18:          Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(BrowserForm))
  19:          Me.toolStripContainer = New System.Windows.Forms.ToolStripContainer()
  20:          Me.statusLabel = New System.Windows.Forms.Label()
  21:          Me.outputLabel = New System.Windows.Forms.Label()
  22:          Me.toolStrip1 = New System.Windows.Forms.ToolStrip()
  23:          Me.backButton = New System.Windows.Forms.ToolStripButton()
  24:          Me.forwardButton = New System.Windows.Forms.ToolStripButton()
  25:          Me.urlTextBox = New System.Windows.Forms.ToolStripTextBox()
  26:          Me.goButton = New System.Windows.Forms.ToolStripButton()
  27:          Me.menuStrip1 = New System.Windows.Forms.MenuStrip()
  28:          Me.fileToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
  29:          Me.showDevToolsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
  30:          Me.exitToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
  31:          Me.toolStripContainer.ContentPanel.SuspendLayout()
  32:          Me.toolStripContainer.TopToolStripPanel.SuspendLayout()
  33:          Me.toolStripContainer.SuspendLayout()
  34:          Me.toolStrip1.SuspendLayout()
  35:          Me.menuStrip1.SuspendLayout()
  36:          Me.SuspendLayout()
  37:          '
  38:          'toolStripContainer
  39:          '
  40:          '
  41:          'toolStripContainer.ContentPanel
  42:          '
  43:          Me.toolStripContainer.ContentPanel.Controls.Add(Me.statusLabel)
  44:          Me.toolStripContainer.ContentPanel.Controls.Add(Me.outputLabel)
  45:          Me.toolStripContainer.ContentPanel.Size = New System.Drawing.Size(384, 610)
  46:          Me.toolStripContainer.Dock = System.Windows.Forms.DockStyle.Fill
  47:          Me.toolStripContainer.LeftToolStripPanelVisible = False
  48:          Me.toolStripContainer.Location = New System.Drawing.Point(0, 24)
  49:          Me.toolStripContainer.Name = "toolStripContainer"
  50:          Me.toolStripContainer.RightToolStripPanelVisible = False
  51:          Me.toolStripContainer.Size = New System.Drawing.Size(384, 637)
  52:          Me.toolStripContainer.TabIndex = 0
  53:          Me.toolStripContainer.Text = "toolStripContainer1"
  54:          '
  55:          'toolStripContainer.TopToolStripPanel
  56:          '
  57:          Me.toolStripContainer.TopToolStripPanel.Controls.Add(Me.toolStrip1)
  58:          '
  59:          'statusLabel
  60:          '
  61:          Me.statusLabel.AutoSize = True
  62:          Me.statusLabel.Dock = System.Windows.Forms.DockStyle.Bottom
  63:          Me.statusLabel.Location = New System.Drawing.Point(0, 584)
  64:          Me.statusLabel.Name = "statusLabel"
  65:          Me.statusLabel.Size = New System.Drawing.Size(0, 13)
  66:          Me.statusLabel.TabIndex = 1
  67:          '
  68:          'outputLabel
  69:          '
  70:          Me.outputLabel.AutoSize = True
  71:          Me.outputLabel.Dock = System.Windows.Forms.DockStyle.Bottom
  72:          Me.outputLabel.Location = New System.Drawing.Point(0, 597)
  73:          Me.outputLabel.Name = "outputLabel"
  74:          Me.outputLabel.Size = New System.Drawing.Size(0, 13)
  75:          Me.outputLabel.TabIndex = 0
  76:          '
  77:          'toolStrip1
  78:          '
  79:          Me.toolStrip1.Dock = System.Windows.Forms.DockStyle.None
  80:          Me.toolStrip1.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
  81:          Me.toolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.backButton, Me.forwardButton, Me.urlTextBox, Me.goButton})
  82:          Me.toolStrip1.Location = New System.Drawing.Point(0, 0)
  83:          Me.toolStrip1.Name = "toolStrip1"
  84:          Me.toolStrip1.Padding = New System.Windows.Forms.Padding(0)
  85:          Me.toolStrip1.Size = New System.Drawing.Size(384, 27)
  86:          Me.toolStrip1.Stretch = True
  87:          Me.toolStrip1.TabIndex = 0
  88:          '
  89:          'backButton
  90:          '
  91:          Me.backButton.Enabled = False
  92:          Me.backButton.Image = Global.Jotform_Addins2.My.Resources.Resources.nav_left_green
  93:          Me.backButton.ImageTransparentColor = System.Drawing.Color.Magenta
  94:          Me.backButton.Name = "backButton"
  95:          Me.backButton.Size = New System.Drawing.Size(52, 24)
  96:          Me.backButton.Text = "Back"
  97:          '
  98:          'forwardButton
  99:          '
 100:          Me.forwardButton.Enabled = False
 101:          Me.forwardButton.Image = Global.Jotform_Addins2.My.Resources.Resources.nav_right_green
 102:          Me.forwardButton.ImageTransparentColor = System.Drawing.Color.Magenta
 103:          Me.forwardButton.Name = "forwardButton"
 104:          Me.forwardButton.Size = New System.Drawing.Size(70, 24)
 105:          Me.forwardButton.Text = "Forward"
 106:          '
 107:          'urlTextBox
 108:          '
 109:          Me.urlTextBox.AutoSize = False
 110:          Me.urlTextBox.Name = "urlTextBox"
 111:          Me.urlTextBox.Size = New System.Drawing.Size(500, 25)
 112:          '
 113:          'goButton
 114:          '
 115:          Me.goButton.Image = Global.Jotform_Addins2.My.Resources.Resources.nav_plain_green
 116:          Me.goButton.ImageTransparentColor = System.Drawing.Color.Magenta
 117:          Me.goButton.Name = "goButton"
 118:          Me.goButton.Size = New System.Drawing.Size(42, 20)
 119:          Me.goButton.Text = "Go"
 120:          '
 121:          'menuStrip1
 122:          '
 123:          Me.menuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.fileToolStripMenuItem})
 124:          Me.menuStrip1.Location = New System.Drawing.Point(0, 0)
 125:          Me.menuStrip1.Name = "menuStrip1"
 126:          Me.menuStrip1.Size = New System.Drawing.Size(384, 24)
 127:          Me.menuStrip1.TabIndex = 1
 128:          Me.menuStrip1.Text = "menuStrip1"
 129:          '
 130:          'fileToolStripMenuItem
 131:          '
 132:          Me.fileToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.showDevToolsToolStripMenuItem, Me.exitToolStripMenuItem})
 133:          Me.fileToolStripMenuItem.Name = "fileToolStripMenuItem"
 134:          Me.fileToolStripMenuItem.Size = New System.Drawing.Size(37, 20)
 135:          Me.fileToolStripMenuItem.Text = "File"
 136:          '
 137:          'showDevToolsToolStripMenuItem
 138:          '
 139:          Me.showDevToolsToolStripMenuItem.Name = "showDevToolsToolStripMenuItem"
 140:          Me.showDevToolsToolStripMenuItem.Size = New System.Drawing.Size(154, 22)
 141:          Me.showDevToolsToolStripMenuItem.Text = "Show DevTools"
 142:          '
 143:          'exitToolStripMenuItem
 144:          '
 145:          Me.exitToolStripMenuItem.Name = "exitToolStripMenuItem"
 146:          Me.exitToolStripMenuItem.Size = New System.Drawing.Size(154, 22)
 147:          Me.exitToolStripMenuItem.Text = "Exit"
 148:          '
 149:          'BrowserForm
 150:          '
 151:          Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
 152:          Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
 153:          Me.ClientSize = New System.Drawing.Size(384, 661)
 154:          Me.Controls.Add(Me.toolStripContainer)
 155:          Me.Controls.Add(Me.menuStrip1)
 156:          Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
 157:          Me.MainMenuStrip = Me.menuStrip1
 158:          Me.Name = "BrowserForm"
 159:          Me.Text = "WebBrowser"
 160:          Me.toolStripContainer.ContentPanel.ResumeLayout(False)
 161:          Me.toolStripContainer.ContentPanel.PerformLayout()
 162:          Me.toolStripContainer.TopToolStripPanel.ResumeLayout(False)
 163:          Me.toolStripContainer.TopToolStripPanel.PerformLayout()
 164:          Me.toolStripContainer.ResumeLayout(False)
 165:          Me.toolStripContainer.PerformLayout()
 166:          Me.toolStrip1.ResumeLayout(False)
 167:          Me.toolStrip1.PerformLayout()
 168:          Me.menuStrip1.ResumeLayout(False)
 169:          Me.menuStrip1.PerformLayout()
 170:          Me.ResumeLayout(False)
 171:          Me.PerformLayout()
 172:   
 173:      End Sub
 174:   
 175:      Private WithEvents toolStripContainer As System.Windows.Forms.ToolStripContainer
 176:      Private WithEvents toolStrip1 As System.Windows.Forms.ToolStrip
 177:      Private WithEvents backButton As System.Windows.Forms.ToolStripButton
 178:      Private WithEvents forwardButton As System.Windows.Forms.ToolStripButton
 179:      Private WithEvents urlTextBox As System.Windows.Forms.ToolStripTextBox
 180:      Private WithEvents goButton As System.Windows.Forms.ToolStripButton
 181:      Private WithEvents menuStrip1 As System.Windows.Forms.MenuStrip
 182:      Private WithEvents fileToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
 183:      Private WithEvents exitToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
 184:      Private WithEvents outputLabel As System.Windows.Forms.Label
 185:      Private WithEvents statusLabel As System.Windows.Forms.Label
 186:      Private WithEvents showDevToolsToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
 187:  End Class


Comments ( )
Link to this page: //www.vb-net.com/CefSharp_ChromiumWebBrowser/FormDesigner.htm
< THANKS ME>