_ Partial Class Form1 Inherits System.Windows.Forms.Form 'Form overrides dispose to clean up the component list. _ Protected Overrides Sub Dispose(ByVal disposing As Boolean) Try If disposing AndAlso components IsNot Nothing Then components.Dispose() End If Finally MyBase.Dispose(disposing) End Try End Sub 'Required by the Windows Form Designer Private components As System.ComponentModel.IContainer 'NOTE: The following procedure is required by the Windows Form Designer 'It can be modified using the Windows Form Designer. 'Do not modify it using the code editor. _ Private Sub InitializeComponent() Me.MenuStrip1 = New System.Windows.Forms.MenuStrip() Me.FileToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.OpenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.SaveToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.PreviewToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.Button1 = New System.Windows.Forms.Button() Me.Button2 = New System.Windows.Forms.Button() Me.Button3 = New System.Windows.Forms.Button() Me.RichTextBox1 = New System.Windows.Forms.RichTextBox() Me.WebBrowser1 = New System.Windows.Forms.WebBrowser() Me.AboutToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.ExitToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.MenuStrip1.SuspendLayout() Me.SuspendLayout() ' 'MenuStrip1 ' Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.FileToolStripMenuItem}) Me.MenuStrip1.Location = New System.Drawing.Point(0, 0) Me.MenuStrip1.Name = "MenuStrip1" Me.MenuStrip1.Size = New System.Drawing.Size(773, 24) Me.MenuStrip1.TabIndex = 0 Me.MenuStrip1.Text = "MenuStrip1" ' 'FileToolStripMenuItem ' Me.FileToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.OpenToolStripMenuItem, Me.SaveToolStripMenuItem, Me.PreviewToolStripMenuItem, Me.AboutToolStripMenuItem, Me.ExitToolStripMenuItem}) Me.FileToolStripMenuItem.Name = "FileToolStripMenuItem" Me.FileToolStripMenuItem.Size = New System.Drawing.Size(37, 20) Me.FileToolStripMenuItem.Text = "&File" ' 'OpenToolStripMenuItem ' Me.OpenToolStripMenuItem.Name = "OpenToolStripMenuItem" Me.OpenToolStripMenuItem.Size = New System.Drawing.Size(152, 22) Me.OpenToolStripMenuItem.Text = "&Open" ' 'SaveToolStripMenuItem ' Me.SaveToolStripMenuItem.Name = "SaveToolStripMenuItem" Me.SaveToolStripMenuItem.Size = New System.Drawing.Size(152, 22) Me.SaveToolStripMenuItem.Text = "&Save" ' 'PreviewToolStripMenuItem ' Me.PreviewToolStripMenuItem.Name = "PreviewToolStripMenuItem" Me.PreviewToolStripMenuItem.Size = New System.Drawing.Size(152, 22) Me.PreviewToolStripMenuItem.Text = "&Preview" ' 'Button1 ' Me.Button1.Location = New System.Drawing.Point(22, 388) Me.Button1.Name = "Button1" Me.Button1.Size = New System.Drawing.Size(75, 23) Me.Button1.TabIndex = 1 Me.Button1.Text = "Open" Me.Button1.UseVisualStyleBackColor = True ' 'Button2 ' Me.Button2.Location = New System.Drawing.Point(115, 388) Me.Button2.Name = "Button2" Me.Button2.Size = New System.Drawing.Size(75, 23) Me.Button2.TabIndex = 2 Me.Button2.Text = "Save" Me.Button2.UseVisualStyleBackColor = True ' 'Button3 ' Me.Button3.Location = New System.Drawing.Point(209, 388) Me.Button3.Name = "Button3" Me.Button3.Size = New System.Drawing.Size(75, 23) Me.Button3.TabIndex = 3 Me.Button3.Text = "Preview" Me.Button3.UseVisualStyleBackColor = True ' 'RichTextBox1 ' Me.RichTextBox1.Location = New System.Drawing.Point(22, 42) Me.RichTextBox1.Name = "RichTextBox1" Me.RichTextBox1.Size = New System.Drawing.Size(356, 322) Me.RichTextBox1.TabIndex = 4 Me.RichTextBox1.Text = "" ' 'WebBrowser1 ' Me.WebBrowser1.Location = New System.Drawing.Point(396, 42) Me.WebBrowser1.MinimumSize = New System.Drawing.Size(20, 20) Me.WebBrowser1.Name = "WebBrowser1" Me.WebBrowser1.Size = New System.Drawing.Size(352, 322) Me.WebBrowser1.TabIndex = 5 ' 'AboutToolStripMenuItem ' Me.AboutToolStripMenuItem.Name = "AboutToolStripMenuItem" Me.AboutToolStripMenuItem.Size = New System.Drawing.Size(152, 22) Me.AboutToolStripMenuItem.Text = "About" ' 'ExitToolStripMenuItem ' Me.ExitToolStripMenuItem.Name = "ExitToolStripMenuItem" Me.ExitToolStripMenuItem.Size = New System.Drawing.Size(152, 22) Me.ExitToolStripMenuItem.Text = "Exit" ' 'Form1 ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(773, 467) Me.Controls.Add(Me.WebBrowser1) Me.Controls.Add(Me.RichTextBox1) Me.Controls.Add(Me.Button3) Me.Controls.Add(Me.Button2) Me.Controls.Add(Me.Button1) Me.Controls.Add(Me.MenuStrip1) Me.MainMenuStrip = Me.MenuStrip1 Me.Name = "Form1" Me.Text = "HTML Editor" Me.MenuStrip1.ResumeLayout(False) Me.MenuStrip1.PerformLayout() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents MenuStrip1 As MenuStrip Friend WithEvents FileToolStripMenuItem As ToolStripMenuItem Friend WithEvents OpenToolStripMenuItem As ToolStripMenuItem Friend WithEvents SaveToolStripMenuItem As ToolStripMenuItem Friend WithEvents PreviewToolStripMenuItem As ToolStripMenuItem Friend WithEvents Button1 As Button Friend WithEvents Button2 As Button Friend WithEvents Button3 As Button Friend WithEvents RichTextBox1 As RichTextBox Friend WithEvents WebBrowser1 As WebBrowser Friend WithEvents AboutToolStripMenuItem As ToolStripMenuItem Friend WithEvents ExitToolStripMenuItem As ToolStripMenuItem End Class