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
|