_ Partial Class Status_Bar_Options 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.Label1 = New System.Windows.Forms.Label() Me.Button1 = New System.Windows.Forms.Button() Me.Button2 = New System.Windows.Forms.Button() Me.Button3 = New System.Windows.Forms.Button() Me.OptionBox = New System.Windows.Forms.CheckedListBox() Me.SuspendLayout() ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Location = New System.Drawing.Point(12, 9) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(283, 17) Me.Label1.TabIndex = 2 Me.Label1.Text = "Display the following items in the status bar:" ' 'Button1 ' Me.Button1.Location = New System.Drawing.Point(15, 226) Me.Button1.Name = "Button1" Me.Button1.Size = New System.Drawing.Size(75, 23) Me.Button1.TabIndex = 3 Me.Button1.Text = "Cancel" Me.Button1.UseVisualStyleBackColor = True ' 'Button2 ' Me.Button2.Location = New System.Drawing.Point(225, 226) Me.Button2.Name = "Button2" Me.Button2.Size = New System.Drawing.Size(75, 23) Me.Button2.TabIndex = 3 Me.Button2.Text = "Save" Me.Button2.UseVisualStyleBackColor = True ' 'Button3 ' Me.Button3.Location = New System.Drawing.Point(96, 226) Me.Button3.Name = "Button3" Me.Button3.Size = New System.Drawing.Size(75, 23) Me.Button3.TabIndex = 3 Me.Button3.Text = "Default" Me.Button3.UseVisualStyleBackColor = True ' 'OptionBox ' Me.OptionBox.FormattingEnabled = True Me.OptionBox.Items.AddRange(New Object() {"Characters", "Date", "Directory (Recommended)", "Font Size", "Size", "Status", "Mode"}) Me.OptionBox.Location = New System.Drawing.Point(15, 29) Me.OptionBox.Name = "OptionBox" Me.OptionBox.Size = New System.Drawing.Size(285, 191) Me.OptionBox.TabIndex = 4 ' 'Status_Bar_Options ' Me.AutoScaleDimensions = New System.Drawing.SizeF(8.0!, 16.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(312, 261) Me.Controls.Add(Me.OptionBox) Me.Controls.Add(Me.Button2) Me.Controls.Add(Me.Button3) Me.Controls.Add(Me.Button1) Me.Controls.Add(Me.Label1) Me.MaximizeBox = False Me.MinimizeBox = False Me.Name = "Status_Bar_Options" Me.Text = "Status Bar Options" Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents Label1 As Label Friend WithEvents Button1 As Button Friend WithEvents Button2 As Button Friend WithEvents Button3 As Button Friend WithEvents OptionBox As CheckedListBox End Class