Permalink
Cannot retrieve contributors at this time
Fetching contributors…
| ' <snippet1> | |
| Imports System | |
| Imports System.Collections.Generic | |
| Imports System.ComponentModel | |
| Imports System.Drawing | |
| Imports System.Windows.Forms | |
| Public Class Form1 | |
| Inherits Form | |
| Public Sub New() | |
| Me.InitializeComponent() | |
| End Sub | |
| ' <snippet2> | |
| ' This utility method assigns the value of a ToolStripItem | |
| ' control's Text property to the Text property of the | |
| ' ToolStripStatusLabel. | |
| Private Sub UpdateStatus(ByVal item As ToolStripItem) | |
| If item IsNot Nothing Then | |
| Dim msg As String = String.Format("{0} selected", item.Text) | |
| Me.StatusStrip1.Items(0).Text = msg | |
| End If | |
| End Sub | |
| ' </snippet2> | |
| ' <snippet3> | |
| ' This method is the DropDownItemClicked event handler. | |
| ' It passes the ClickedItem object to a utility method | |
| ' called UpdateStatus, which updates the text displayed | |
| ' in the StatusStrip control. | |
| Private Sub FileToolStripMenuItem_DropDownItemClicked( _ | |
| ByVal sender As System.Object, _ | |
| ByVal e As System.Windows.Forms.ToolStripItemClickedEventArgs) _ | |
| Handles FileToolStripMenuItem.DropDownItemClicked | |
| Me.UpdateStatus(e.ClickedItem) | |
| End Sub | |
| ' </snippet3> | |
| 'Form overrides dispose to clean up the component list. | |
| <System.Diagnostics.DebuggerNonUserCode()> _ | |
| Protected Overrides Sub Dispose(ByVal disposing As Boolean) | |
| If disposing AndAlso components IsNot Nothing Then | |
| components.Dispose() | |
| End If | |
| MyBase.Dispose(disposing) | |
| End Sub | |
| Friend WithEvents MenuStrip1 As System.Windows.Forms.MenuStrip | |
| Friend WithEvents FileToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem | |
| Friend WithEvents NewToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem | |
| Friend WithEvents OpenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem | |
| Friend WithEvents toolStripSeparator As System.Windows.Forms.ToolStripSeparator | |
| Friend WithEvents SaveToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem | |
| Friend WithEvents SaveAsToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem | |
| Friend WithEvents toolStripSeparator1 As System.Windows.Forms.ToolStripSeparator | |
| Friend WithEvents PrintToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem | |
| Friend WithEvents PrintPreviewToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem | |
| Friend WithEvents toolStripSeparator2 As System.Windows.Forms.ToolStripSeparator | |
| Friend WithEvents ExitToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem | |
| Friend WithEvents EditToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem | |
| Friend WithEvents UndoToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem | |
| Friend WithEvents RedoToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem | |
| Friend WithEvents toolStripSeparator3 As System.Windows.Forms.ToolStripSeparator | |
| Friend WithEvents CutToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem | |
| Friend WithEvents CopyToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem | |
| Friend WithEvents PasteToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem | |
| Friend WithEvents toolStripSeparator4 As System.Windows.Forms.ToolStripSeparator | |
| Friend WithEvents SelectAllToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem | |
| Friend WithEvents ToolsToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem | |
| Friend WithEvents CustomizeToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem | |
| Friend WithEvents OptionsToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem | |
| Friend WithEvents HelpToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem | |
| Friend WithEvents ContentsToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem | |
| Friend WithEvents IndexToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem | |
| Friend WithEvents SearchToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem | |
| Friend WithEvents toolStripSeparator5 As System.Windows.Forms.ToolStripSeparator | |
| Friend WithEvents AboutToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem | |
| Friend WithEvents StatusStrip1 As System.Windows.Forms.StatusStrip | |
| Friend WithEvents ToolStripStatusLabel1 As System.Windows.Forms.ToolStripStatusLabel | |
| '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. | |
| <System.Diagnostics.DebuggerStepThrough()> _ | |
| Private Sub InitializeComponent() | |
| Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form1)) | |
| Me.MenuStrip1 = New System.Windows.Forms.MenuStrip | |
| Me.FileToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem | |
| Me.NewToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem | |
| Me.OpenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem | |
| Me.toolStripSeparator = New System.Windows.Forms.ToolStripSeparator | |
| Me.SaveToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem | |
| Me.SaveAsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem | |
| Me.toolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator | |
| Me.PrintToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem | |
| Me.PrintPreviewToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem | |
| Me.toolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator | |
| Me.ExitToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem | |
| Me.EditToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem | |
| Me.UndoToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem | |
| Me.RedoToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem | |
| Me.toolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator | |
| Me.CutToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem | |
| Me.CopyToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem | |
| Me.PasteToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem | |
| Me.toolStripSeparator4 = New System.Windows.Forms.ToolStripSeparator | |
| Me.SelectAllToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem | |
| Me.ToolsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem | |
| Me.CustomizeToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem | |
| Me.OptionsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem | |
| Me.HelpToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem | |
| Me.ContentsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem | |
| Me.IndexToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem | |
| Me.SearchToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem | |
| Me.toolStripSeparator5 = New System.Windows.Forms.ToolStripSeparator | |
| Me.AboutToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem | |
| Me.StatusStrip1 = New System.Windows.Forms.StatusStrip | |
| Me.ToolStripStatusLabel1 = New System.Windows.Forms.ToolStripStatusLabel | |
| Me.MenuStrip1.SuspendLayout() | |
| Me.StatusStrip1.SuspendLayout() | |
| Me.SuspendLayout() | |
| ' | |
| 'MenuStrip1 | |
| ' | |
| Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.FileToolStripMenuItem, Me.EditToolStripMenuItem, Me.ToolsToolStripMenuItem, Me.HelpToolStripMenuItem}) | |
| Me.MenuStrip1.Location = New System.Drawing.Point(0, 0) | |
| Me.MenuStrip1.Name = "MenuStrip1" | |
| Me.MenuStrip1.Size = New System.Drawing.Size(292, 24) | |
| Me.MenuStrip1.TabIndex = 0 | |
| Me.MenuStrip1.Text = "MenuStrip1" | |
| ' | |
| 'FileToolStripMenuItem | |
| ' | |
| Me.FileToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.NewToolStripMenuItem, Me.OpenToolStripMenuItem, Me.toolStripSeparator, Me.SaveToolStripMenuItem, Me.SaveAsToolStripMenuItem, Me.toolStripSeparator1, Me.PrintToolStripMenuItem, Me.PrintPreviewToolStripMenuItem, Me.toolStripSeparator2, Me.ExitToolStripMenuItem}) | |
| Me.FileToolStripMenuItem.Name = "FileToolStripMenuItem" | |
| Me.FileToolStripMenuItem.Size = New System.Drawing.Size(35, 20) | |
| Me.FileToolStripMenuItem.Text = "&File" | |
| ' | |
| 'NewToolStripMenuItem | |
| ' | |
| Me.NewToolStripMenuItem.Image = CType(resources.GetObject("NewToolStripMenuItem.Image"), System.Drawing.Image) | |
| Me.NewToolStripMenuItem.ImageTransparentColor = System.Drawing.Color.Magenta | |
| Me.NewToolStripMenuItem.Name = "NewToolStripMenuItem" | |
| Me.NewToolStripMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.N), System.Windows.Forms.Keys) | |
| Me.NewToolStripMenuItem.Size = New System.Drawing.Size(152, 22) | |
| Me.NewToolStripMenuItem.Text = "&New" | |
| ' | |
| 'OpenToolStripMenuItem | |
| ' | |
| Me.OpenToolStripMenuItem.Image = CType(resources.GetObject("OpenToolStripMenuItem.Image"), System.Drawing.Image) | |
| Me.OpenToolStripMenuItem.ImageTransparentColor = System.Drawing.Color.Magenta | |
| Me.OpenToolStripMenuItem.Name = "OpenToolStripMenuItem" | |
| Me.OpenToolStripMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.O), System.Windows.Forms.Keys) | |
| Me.OpenToolStripMenuItem.Size = New System.Drawing.Size(152, 22) | |
| Me.OpenToolStripMenuItem.Text = "&Open" | |
| ' | |
| 'toolStripSeparator | |
| ' | |
| Me.toolStripSeparator.Name = "toolStripSeparator" | |
| Me.toolStripSeparator.Size = New System.Drawing.Size(149, 6) | |
| ' | |
| 'SaveToolStripMenuItem | |
| ' | |
| Me.SaveToolStripMenuItem.Image = CType(resources.GetObject("SaveToolStripMenuItem.Image"), System.Drawing.Image) | |
| Me.SaveToolStripMenuItem.ImageTransparentColor = System.Drawing.Color.Magenta | |
| Me.SaveToolStripMenuItem.Name = "SaveToolStripMenuItem" | |
| Me.SaveToolStripMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.S), System.Windows.Forms.Keys) | |
| Me.SaveToolStripMenuItem.Size = New System.Drawing.Size(152, 22) | |
| Me.SaveToolStripMenuItem.Text = "&Save" | |
| ' | |
| 'SaveAsToolStripMenuItem | |
| ' | |
| Me.SaveAsToolStripMenuItem.Name = "SaveAsToolStripMenuItem" | |
| Me.SaveAsToolStripMenuItem.Size = New System.Drawing.Size(152, 22) | |
| Me.SaveAsToolStripMenuItem.Text = "Save &As" | |
| ' | |
| 'toolStripSeparator1 | |
| ' | |
| Me.toolStripSeparator1.Name = "toolStripSeparator1" | |
| Me.toolStripSeparator1.Size = New System.Drawing.Size(149, 6) | |
| ' | |
| 'PrintToolStripMenuItem | |
| ' | |
| Me.PrintToolStripMenuItem.Image = CType(resources.GetObject("PrintToolStripMenuItem.Image"), System.Drawing.Image) | |
| Me.PrintToolStripMenuItem.ImageTransparentColor = System.Drawing.Color.Magenta | |
| Me.PrintToolStripMenuItem.Name = "PrintToolStripMenuItem" | |
| Me.PrintToolStripMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.P), System.Windows.Forms.Keys) | |
| Me.PrintToolStripMenuItem.Size = New System.Drawing.Size(152, 22) | |
| Me.PrintToolStripMenuItem.Text = "&Print" | |
| ' | |
| 'PrintPreviewToolStripMenuItem | |
| ' | |
| Me.PrintPreviewToolStripMenuItem.Image = CType(resources.GetObject("PrintPreviewToolStripMenuItem.Image"), System.Drawing.Image) | |
| Me.PrintPreviewToolStripMenuItem.ImageTransparentColor = System.Drawing.Color.Magenta | |
| Me.PrintPreviewToolStripMenuItem.Name = "PrintPreviewToolStripMenuItem" | |
| Me.PrintPreviewToolStripMenuItem.Size = New System.Drawing.Size(152, 22) | |
| Me.PrintPreviewToolStripMenuItem.Text = "Print Pre&view" | |
| ' | |
| 'toolStripSeparator2 | |
| ' | |
| Me.toolStripSeparator2.Name = "toolStripSeparator2" | |
| Me.toolStripSeparator2.Size = New System.Drawing.Size(149, 6) | |
| ' | |
| 'ExitToolStripMenuItem | |
| ' | |
| Me.ExitToolStripMenuItem.Name = "ExitToolStripMenuItem" | |
| Me.ExitToolStripMenuItem.Size = New System.Drawing.Size(152, 22) | |
| Me.ExitToolStripMenuItem.Text = "E&xit" | |
| ' | |
| 'EditToolStripMenuItem | |
| ' | |
| Me.EditToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.UndoToolStripMenuItem, Me.RedoToolStripMenuItem, Me.toolStripSeparator3, Me.CutToolStripMenuItem, Me.CopyToolStripMenuItem, Me.PasteToolStripMenuItem, Me.toolStripSeparator4, Me.SelectAllToolStripMenuItem}) | |
| Me.EditToolStripMenuItem.Name = "EditToolStripMenuItem" | |
| Me.EditToolStripMenuItem.Size = New System.Drawing.Size(37, 20) | |
| Me.EditToolStripMenuItem.Text = "&Edit" | |
| ' | |
| 'UndoToolStripMenuItem | |
| ' | |
| Me.UndoToolStripMenuItem.Name = "UndoToolStripMenuItem" | |
| Me.UndoToolStripMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.Z), System.Windows.Forms.Keys) | |
| Me.UndoToolStripMenuItem.Size = New System.Drawing.Size(150, 22) | |
| Me.UndoToolStripMenuItem.Text = "&Undo" | |
| ' | |
| 'RedoToolStripMenuItem | |
| ' | |
| Me.RedoToolStripMenuItem.Name = "RedoToolStripMenuItem" | |
| Me.RedoToolStripMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.Y), System.Windows.Forms.Keys) | |
| Me.RedoToolStripMenuItem.Size = New System.Drawing.Size(150, 22) | |
| Me.RedoToolStripMenuItem.Text = "&Redo" | |
| ' | |
| 'toolStripSeparator3 | |
| ' | |
| Me.toolStripSeparator3.Name = "toolStripSeparator3" | |
| Me.toolStripSeparator3.Size = New System.Drawing.Size(147, 6) | |
| ' | |
| 'CutToolStripMenuItem | |
| ' | |
| Me.CutToolStripMenuItem.Image = CType(resources.GetObject("CutToolStripMenuItem.Image"), System.Drawing.Image) | |
| Me.CutToolStripMenuItem.ImageTransparentColor = System.Drawing.Color.Magenta | |
| Me.CutToolStripMenuItem.Name = "CutToolStripMenuItem" | |
| Me.CutToolStripMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.X), System.Windows.Forms.Keys) | |
| Me.CutToolStripMenuItem.Size = New System.Drawing.Size(150, 22) | |
| Me.CutToolStripMenuItem.Text = "Cu&t" | |
| ' | |
| 'CopyToolStripMenuItem | |
| ' | |
| Me.CopyToolStripMenuItem.Image = CType(resources.GetObject("CopyToolStripMenuItem.Image"), System.Drawing.Image) | |
| Me.CopyToolStripMenuItem.ImageTransparentColor = System.Drawing.Color.Magenta | |
| Me.CopyToolStripMenuItem.Name = "CopyToolStripMenuItem" | |
| Me.CopyToolStripMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.C), System.Windows.Forms.Keys) | |
| Me.CopyToolStripMenuItem.Size = New System.Drawing.Size(150, 22) | |
| Me.CopyToolStripMenuItem.Text = "&Copy" | |
| ' | |
| 'PasteToolStripMenuItem | |
| ' | |
| Me.PasteToolStripMenuItem.Image = CType(resources.GetObject("PasteToolStripMenuItem.Image"), System.Drawing.Image) | |
| Me.PasteToolStripMenuItem.ImageTransparentColor = System.Drawing.Color.Magenta | |
| Me.PasteToolStripMenuItem.Name = "PasteToolStripMenuItem" | |
| Me.PasteToolStripMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.V), System.Windows.Forms.Keys) | |
| Me.PasteToolStripMenuItem.Size = New System.Drawing.Size(150, 22) | |
| Me.PasteToolStripMenuItem.Text = "&Paste" | |
| ' | |
| 'toolStripSeparator4 | |
| ' | |
| Me.toolStripSeparator4.Name = "toolStripSeparator4" | |
| Me.toolStripSeparator4.Size = New System.Drawing.Size(147, 6) | |
| ' | |
| 'SelectAllToolStripMenuItem | |
| ' | |
| Me.SelectAllToolStripMenuItem.Name = "SelectAllToolStripMenuItem" | |
| Me.SelectAllToolStripMenuItem.Size = New System.Drawing.Size(150, 22) | |
| Me.SelectAllToolStripMenuItem.Text = "Select &All" | |
| ' | |
| 'ToolsToolStripMenuItem | |
| ' | |
| Me.ToolsToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.CustomizeToolStripMenuItem, Me.OptionsToolStripMenuItem}) | |
| Me.ToolsToolStripMenuItem.Name = "ToolsToolStripMenuItem" | |
| Me.ToolsToolStripMenuItem.Size = New System.Drawing.Size(44, 20) | |
| Me.ToolsToolStripMenuItem.Text = "&Tools" | |
| ' | |
| 'CustomizeToolStripMenuItem | |
| ' | |
| Me.CustomizeToolStripMenuItem.Name = "CustomizeToolStripMenuItem" | |
| Me.CustomizeToolStripMenuItem.Size = New System.Drawing.Size(134, 22) | |
| Me.CustomizeToolStripMenuItem.Text = "&Customize" | |
| ' | |
| 'OptionsToolStripMenuItem | |
| ' | |
| Me.OptionsToolStripMenuItem.Name = "OptionsToolStripMenuItem" | |
| Me.OptionsToolStripMenuItem.Size = New System.Drawing.Size(134, 22) | |
| Me.OptionsToolStripMenuItem.Text = "&Options" | |
| ' | |
| 'HelpToolStripMenuItem | |
| ' | |
| Me.HelpToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ContentsToolStripMenuItem, Me.IndexToolStripMenuItem, Me.SearchToolStripMenuItem, Me.toolStripSeparator5, Me.AboutToolStripMenuItem}) | |
| Me.HelpToolStripMenuItem.Name = "HelpToolStripMenuItem" | |
| Me.HelpToolStripMenuItem.Size = New System.Drawing.Size(40, 20) | |
| Me.HelpToolStripMenuItem.Text = "&Help" | |
| ' | |
| 'ContentsToolStripMenuItem | |
| ' | |
| Me.ContentsToolStripMenuItem.Name = "ContentsToolStripMenuItem" | |
| Me.ContentsToolStripMenuItem.Size = New System.Drawing.Size(152, 22) | |
| Me.ContentsToolStripMenuItem.Text = "&Contents" | |
| ' | |
| 'IndexToolStripMenuItem | |
| ' | |
| Me.IndexToolStripMenuItem.Name = "IndexToolStripMenuItem" | |
| Me.IndexToolStripMenuItem.Size = New System.Drawing.Size(152, 22) | |
| Me.IndexToolStripMenuItem.Text = "&Index" | |
| ' | |
| 'SearchToolStripMenuItem | |
| ' | |
| Me.SearchToolStripMenuItem.Name = "SearchToolStripMenuItem" | |
| Me.SearchToolStripMenuItem.Size = New System.Drawing.Size(152, 22) | |
| Me.SearchToolStripMenuItem.Text = "&Search" | |
| ' | |
| 'toolStripSeparator5 | |
| ' | |
| Me.toolStripSeparator5.Name = "toolStripSeparator5" | |
| Me.toolStripSeparator5.Size = New System.Drawing.Size(149, 6) | |
| ' | |
| 'AboutToolStripMenuItem | |
| ' | |
| Me.AboutToolStripMenuItem.Name = "AboutToolStripMenuItem" | |
| Me.AboutToolStripMenuItem.Size = New System.Drawing.Size(152, 22) | |
| Me.AboutToolStripMenuItem.Text = "&About..." | |
| ' | |
| 'StatusStrip1 | |
| ' | |
| Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripStatusLabel1}) | |
| Me.StatusStrip1.Location = New System.Drawing.Point(0, 251) | |
| Me.StatusStrip1.Name = "StatusStrip1" | |
| Me.StatusStrip1.Size = New System.Drawing.Size(292, 22) | |
| Me.StatusStrip1.TabIndex = 1 | |
| Me.StatusStrip1.Text = "StatusStrip1" | |
| ' | |
| 'ToolStripStatusLabel1 | |
| ' | |
| Me.ToolStripStatusLabel1.Name = "ToolStripStatusLabel1" | |
| Me.ToolStripStatusLabel1.Size = New System.Drawing.Size(111, 17) | |
| Me.ToolStripStatusLabel1.Text = "ToolStripStatusLabel1" | |
| ' | |
| 'Form1 | |
| ' | |
| Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) | |
| Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font | |
| Me.ClientSize = New System.Drawing.Size(292, 273) | |
| Me.Controls.Add(Me.StatusStrip1) | |
| Me.Controls.Add(Me.MenuStrip1) | |
| Me.MainMenuStrip = Me.MenuStrip1 | |
| Me.Name = "Form1" | |
| Me.Text = "Form1" | |
| Me.MenuStrip1.ResumeLayout(False) | |
| Me.MenuStrip1.PerformLayout() | |
| Me.StatusStrip1.ResumeLayout(False) | |
| Me.StatusStrip1.PerformLayout() | |
| Me.ResumeLayout(False) | |
| Me.PerformLayout() | |
| End Sub | |
| <STAThread()> _ | |
| Shared Sub Main() | |
| Application.EnableVisualStyles() | |
| Application.Run(New Form1()) | |
| End Sub | |
| End Class | |
| ' </snippet1> |