_ Partial Class frmPruefplan Inherits System.Windows.Forms.Form 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen. _ 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 'Wird vom Windows Form-Designer benötigt. Private components As System.ComponentModel.IContainer 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich. 'Das Bearbeiten ist mit dem Windows Form-Designer möglich. 'Das Bearbeiten mit dem Code-Editor ist nicht möglich. _ Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmPruefplan)) Me.ToolStrip1 = New System.Windows.Forms.ToolStrip() Me.TSBtnQuit = New System.Windows.Forms.ToolStripButton() Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton() Me.MenuStrip1 = New System.Windows.Forms.MenuStrip() Me.DateiToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.BeendenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.TreeStammdaten = New DevComponents.AdvTree.AdvTree() Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components) Me.Node1 = New DevComponents.AdvTree.Node() Me.NodeConnector1 = New DevComponents.AdvTree.NodeConnector() Me.ElementStyle1 = New DevComponents.DotNetBar.ElementStyle() Me.Panel1 = New System.Windows.Forms.Panel() Me.Panel2 = New System.Windows.Forms.Panel() Me.grpPruefgegenstand = New System.Windows.Forms.GroupBox() Me.lblEreignisse2 = New System.Windows.Forms.Label() Me.lblMassnahmen2 = New System.Windows.Forms.Label() Me.txtEreignisse = New System.Windows.Forms.TextBox() Me.lblEreignisse = New System.Windows.Forms.Label() Me.txtMassnahmen = New System.Windows.Forms.TextBox() Me.lblMassnahmen1 = New System.Windows.Forms.Label() Me.txtPruefgegenstand = New System.Windows.Forms.TextBox() Me.lblPruefgegenstand = New System.Windows.Forms.Label() Me.Panel3 = New System.Windows.Forms.Panel() Me.grpPlanung = New System.Windows.Forms.GroupBox() Me.cbboxZeitpunkt = New System.Windows.Forms.ComboBox() Me.lblZeitpunkt = New System.Windows.Forms.Label() Me.cbboxPeriodizitaet = New System.Windows.Forms.ComboBox() Me.lblPeriodizitaet = New System.Windows.Forms.Label() Me.cbboxPrioritaet = New System.Windows.Forms.ComboBox() Me.lblPrioritaet = New System.Windows.Forms.Label() Me.GrpVerantwortung = New System.Windows.Forms.GroupBox() Me.cbboxVerantwortungISI = New System.Windows.Forms.ComboBox() Me.cbboxVerantwortlich = New System.Windows.Forms.ComboBox() Me.Label1 = New System.Windows.Forms.Label() Me.lblVerantwortlich = New System.Windows.Forms.Label() Me.ToolStrip2 = New System.Windows.Forms.ToolStrip() Me.ToolStrip1.SuspendLayout() Me.MenuStrip1.SuspendLayout() CType(Me.TreeStammdaten, System.ComponentModel.ISupportInitialize).BeginInit() Me.Panel1.SuspendLayout() Me.Panel2.SuspendLayout() Me.grpPruefgegenstand.SuspendLayout() Me.Panel3.SuspendLayout() Me.grpPlanung.SuspendLayout() Me.GrpVerantwortung.SuspendLayout() Me.SuspendLayout() ' 'ToolStrip1 ' Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.TSBtnQuit, Me.ToolStripButton1}) Me.ToolStrip1.Location = New System.Drawing.Point(0, 24) Me.ToolStrip1.Name = "ToolStrip1" Me.ToolStrip1.Size = New System.Drawing.Size(1017, 25) Me.ToolStrip1.TabIndex = 4 Me.ToolStrip1.Text = "ToolStrip1" ' 'TSBtnQuit ' Me.TSBtnQuit.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image Me.TSBtnQuit.Image = CType(resources.GetObject("TSBtnQuit.Image"), System.Drawing.Image) Me.TSBtnQuit.ImageTransparentColor = System.Drawing.Color.Magenta Me.TSBtnQuit.Name = "TSBtnQuit" Me.TSBtnQuit.Size = New System.Drawing.Size(23, 22) Me.TSBtnQuit.Text = "ToolStripButton1" Me.TSBtnQuit.ToolTipText = "Fenster schliessen" ' 'ToolStripButton1 ' Me.ToolStripButton1.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image Me.ToolStripButton1.Image = CType(resources.GetObject("ToolStripButton1.Image"), System.Drawing.Image) Me.ToolStripButton1.ImageTransparentColor = System.Drawing.Color.Magenta Me.ToolStripButton1.Name = "ToolStripButton1" Me.ToolStripButton1.Size = New System.Drawing.Size(23, 22) Me.ToolStripButton1.Text = "ToolStripButton1" Me.ToolStripButton1.ToolTipText = "Neu" ' 'MenuStrip1 ' Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DateiToolStripMenuItem}) Me.MenuStrip1.Location = New System.Drawing.Point(0, 0) Me.MenuStrip1.Name = "MenuStrip1" Me.MenuStrip1.Size = New System.Drawing.Size(1017, 24) Me.MenuStrip1.TabIndex = 3 Me.MenuStrip1.Text = "MenuStrip1" ' 'DateiToolStripMenuItem ' Me.DateiToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BeendenToolStripMenuItem}) Me.DateiToolStripMenuItem.Name = "DateiToolStripMenuItem" Me.DateiToolStripMenuItem.Size = New System.Drawing.Size(46, 20) Me.DateiToolStripMenuItem.Text = "&Datei" ' 'BeendenToolStripMenuItem ' Me.BeendenToolStripMenuItem.Name = "BeendenToolStripMenuItem" Me.BeendenToolStripMenuItem.Size = New System.Drawing.Size(128, 22) Me.BeendenToolStripMenuItem.Text = "&Schliessen" ' 'TreeStammdaten ' Me.TreeStammdaten.AccessibleRole = System.Windows.Forms.AccessibleRole.Outline Me.TreeStammdaten.AllowDrop = True Me.TreeStammdaten.BackColor = System.Drawing.SystemColors.Window ' ' ' Me.TreeStammdaten.BackgroundStyle.Class = "TreeBorderKey" Me.TreeStammdaten.BackgroundStyle.CornerType = DevComponents.DotNetBar.eCornerType.Square Me.TreeStammdaten.Dock = System.Windows.Forms.DockStyle.Left Me.TreeStammdaten.ImageList = Me.ImageList1 Me.TreeStammdaten.LicenseKey = "F962CEC7-CD8F-4911-A9E9-CAB39962FC1F" Me.TreeStammdaten.Location = New System.Drawing.Point(0, 49) Me.TreeStammdaten.Name = "TreeStammdaten" Me.TreeStammdaten.Nodes.AddRange(New DevComponents.AdvTree.Node() {Me.Node1}) Me.TreeStammdaten.NodesConnector = Me.NodeConnector1 Me.TreeStammdaten.NodeStyle = Me.ElementStyle1 Me.TreeStammdaten.PathSeparator = ";" Me.TreeStammdaten.Size = New System.Drawing.Size(323, 596) Me.TreeStammdaten.Styles.Add(Me.ElementStyle1) Me.TreeStammdaten.TabIndex = 5 Me.TreeStammdaten.Text = "AdvTree1" ' 'ImageList1 ' Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer) Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent Me.ImageList1.Images.SetKeyName(0, "Finma.jpg") ' 'Node1 ' Me.Node1.Expanded = True Me.Node1.Name = "Node1" Me.Node1.Text = "Node1" ' 'NodeConnector1 ' Me.NodeConnector1.LineColor = System.Drawing.SystemColors.ControlText ' 'ElementStyle1 ' Me.ElementStyle1.CornerType = DevComponents.DotNetBar.eCornerType.Square Me.ElementStyle1.Name = "ElementStyle1" Me.ElementStyle1.TextColor = System.Drawing.SystemColors.ControlText ' 'Panel1 ' Me.Panel1.Controls.Add(Me.Panel2) Me.Panel1.Controls.Add(Me.ToolStrip2) Me.Panel1.Dock = System.Windows.Forms.DockStyle.Fill Me.Panel1.Location = New System.Drawing.Point(323, 49) Me.Panel1.Name = "Panel1" Me.Panel1.Size = New System.Drawing.Size(694, 596) Me.Panel1.TabIndex = 6 ' 'Panel2 ' Me.Panel2.Controls.Add(Me.grpPruefgegenstand) Me.Panel2.Controls.Add(Me.Panel3) Me.Panel2.Dock = System.Windows.Forms.DockStyle.Left Me.Panel2.Location = New System.Drawing.Point(0, 25) Me.Panel2.Name = "Panel2" Me.Panel2.Size = New System.Drawing.Size(682, 571) Me.Panel2.TabIndex = 2 ' 'grpPruefgegenstand ' Me.grpPruefgegenstand.Controls.Add(Me.lblEreignisse2) Me.grpPruefgegenstand.Controls.Add(Me.lblMassnahmen2) Me.grpPruefgegenstand.Controls.Add(Me.txtEreignisse) Me.grpPruefgegenstand.Controls.Add(Me.lblEreignisse) Me.grpPruefgegenstand.Controls.Add(Me.txtMassnahmen) Me.grpPruefgegenstand.Controls.Add(Me.lblMassnahmen1) Me.grpPruefgegenstand.Controls.Add(Me.txtPruefgegenstand) Me.grpPruefgegenstand.Controls.Add(Me.lblPruefgegenstand) Me.grpPruefgegenstand.Dock = System.Windows.Forms.DockStyle.Fill Me.grpPruefgegenstand.Location = New System.Drawing.Point(0, 118) Me.grpPruefgegenstand.Name = "grpPruefgegenstand" Me.grpPruefgegenstand.Size = New System.Drawing.Size(682, 453) Me.grpPruefgegenstand.TabIndex = 1 Me.grpPruefgegenstand.TabStop = False Me.grpPruefgegenstand.Text = "Prüfgegenstand" ' 'lblEreignisse2 ' Me.lblEreignisse2.AutoSize = True Me.lblEreignisse2.Location = New System.Drawing.Point(8, 178) Me.lblEreignisse2.Name = "lblEreignisse2" Me.lblEreignisse2.Size = New System.Drawing.Size(74, 13) Me.lblEreignisse2.TabIndex = 34 Me.lblEreignisse2.Text = "Info / Rapport" ' 'lblMassnahmen2 ' Me.lblMassnahmen2.AutoSize = True Me.lblMassnahmen2.Location = New System.Drawing.Point(9, 110) Me.lblMassnahmen2.Name = "lblMassnahmen2" Me.lblMassnahmen2.Size = New System.Drawing.Size(83, 13) Me.lblMassnahmen2.TabIndex = 33 Me.lblMassnahmen2.Text = "bei Abweichung" ' 'txtEreignisse ' Me.txtEreignisse.Location = New System.Drawing.Point(96, 165) Me.txtEreignisse.Multiline = True Me.txtEreignisse.Name = "txtEreignisse" Me.txtEreignisse.Size = New System.Drawing.Size(275, 62) Me.txtEreignisse.TabIndex = 32 ' 'lblEreignisse ' Me.lblEreignisse.AutoSize = True Me.lblEreignisse.Location = New System.Drawing.Point(8, 165) Me.lblEreignisse.Name = "lblEreignisse" Me.lblEreignisse.Size = New System.Drawing.Size(55, 13) Me.lblEreignisse.TabIndex = 31 Me.lblEreignisse.Text = "Ereignisse" ' 'txtMassnahmen ' Me.txtMassnahmen.Location = New System.Drawing.Point(96, 97) Me.txtMassnahmen.Multiline = True Me.txtMassnahmen.Name = "txtMassnahmen" Me.txtMassnahmen.Size = New System.Drawing.Size(275, 62) Me.txtMassnahmen.TabIndex = 30 ' 'lblMassnahmen1 ' Me.lblMassnahmen1.AutoSize = True Me.lblMassnahmen1.Location = New System.Drawing.Point(8, 97) Me.lblMassnahmen1.Name = "lblMassnahmen1" Me.lblMassnahmen1.Size = New System.Drawing.Size(70, 13) Me.lblMassnahmen1.TabIndex = 29 Me.lblMassnahmen1.Text = "Massnahmen" ' 'txtPruefgegenstand ' Me.txtPruefgegenstand.Location = New System.Drawing.Point(98, 29) Me.txtPruefgegenstand.Multiline = True Me.txtPruefgegenstand.Name = "txtPruefgegenstand" Me.txtPruefgegenstand.Size = New System.Drawing.Size(275, 62) Me.txtPruefgegenstand.TabIndex = 28 ' 'lblPruefgegenstand ' Me.lblPruefgegenstand.AutoSize = True Me.lblPruefgegenstand.Location = New System.Drawing.Point(10, 29) Me.lblPruefgegenstand.Name = "lblPruefgegenstand" Me.lblPruefgegenstand.Size = New System.Drawing.Size(82, 13) Me.lblPruefgegenstand.TabIndex = 27 Me.lblPruefgegenstand.Text = "Prüfgegenstand" ' 'Panel3 ' Me.Panel3.Controls.Add(Me.grpPlanung) Me.Panel3.Controls.Add(Me.GrpVerantwortung) Me.Panel3.Dock = System.Windows.Forms.DockStyle.Top Me.Panel3.Location = New System.Drawing.Point(0, 0) Me.Panel3.Name = "Panel3" Me.Panel3.Size = New System.Drawing.Size(682, 118) Me.Panel3.TabIndex = 0 ' 'grpPlanung ' Me.grpPlanung.Controls.Add(Me.cbboxZeitpunkt) Me.grpPlanung.Controls.Add(Me.lblZeitpunkt) Me.grpPlanung.Controls.Add(Me.cbboxPeriodizitaet) Me.grpPlanung.Controls.Add(Me.lblPeriodizitaet) Me.grpPlanung.Controls.Add(Me.cbboxPrioritaet) Me.grpPlanung.Controls.Add(Me.lblPrioritaet) Me.grpPlanung.Dock = System.Windows.Forms.DockStyle.Left Me.grpPlanung.Location = New System.Drawing.Point(0, 0) Me.grpPlanung.Name = "grpPlanung" Me.grpPlanung.Size = New System.Drawing.Size(175, 118) Me.grpPlanung.TabIndex = 0 Me.grpPlanung.TabStop = False Me.grpPlanung.Text = "Planung" ' 'cbboxZeitpunkt ' Me.cbboxZeitpunkt.FormattingEnabled = True Me.cbboxZeitpunkt.Location = New System.Drawing.Point(70, 78) Me.cbboxZeitpunkt.Name = "cbboxZeitpunkt" Me.cbboxZeitpunkt.Size = New System.Drawing.Size(94, 21) Me.cbboxZeitpunkt.TabIndex = 32 ' 'lblZeitpunkt ' Me.lblZeitpunkt.AutoSize = True Me.lblZeitpunkt.Location = New System.Drawing.Point(6, 81) Me.lblZeitpunkt.Name = "lblZeitpunkt" Me.lblZeitpunkt.Size = New System.Drawing.Size(52, 13) Me.lblZeitpunkt.TabIndex = 31 Me.lblZeitpunkt.Text = "Zeitpunkt" ' 'cbboxPeriodizitaet ' Me.cbboxPeriodizitaet.FormattingEnabled = True Me.cbboxPeriodizitaet.Location = New System.Drawing.Point(70, 50) Me.cbboxPeriodizitaet.Name = "cbboxPeriodizitaet" Me.cbboxPeriodizitaet.Size = New System.Drawing.Size(94, 21) Me.cbboxPeriodizitaet.TabIndex = 30 ' 'lblPeriodizitaet ' Me.lblPeriodizitaet.AutoSize = True Me.lblPeriodizitaet.Location = New System.Drawing.Point(7, 53) Me.lblPeriodizitaet.Name = "lblPeriodizitaet" Me.lblPeriodizitaet.Size = New System.Drawing.Size(58, 13) Me.lblPeriodizitaet.TabIndex = 29 Me.lblPeriodizitaet.Text = "Periodizität" ' 'cbboxPrioritaet ' Me.cbboxPrioritaet.FormattingEnabled = True Me.cbboxPrioritaet.Location = New System.Drawing.Point(70, 22) Me.cbboxPrioritaet.Name = "cbboxPrioritaet" Me.cbboxPrioritaet.Size = New System.Drawing.Size(94, 21) Me.cbboxPrioritaet.TabIndex = 28 ' 'lblPrioritaet ' Me.lblPrioritaet.AutoSize = True Me.lblPrioritaet.Location = New System.Drawing.Point(7, 25) Me.lblPrioritaet.Name = "lblPrioritaet" Me.lblPrioritaet.Size = New System.Drawing.Size(42, 13) Me.lblPrioritaet.TabIndex = 27 Me.lblPrioritaet.Text = "Priorität" ' 'GrpVerantwortung ' Me.GrpVerantwortung.Controls.Add(Me.cbboxVerantwortungISI) Me.GrpVerantwortung.Controls.Add(Me.cbboxVerantwortlich) Me.GrpVerantwortung.Controls.Add(Me.Label1) Me.GrpVerantwortung.Controls.Add(Me.lblVerantwortlich) Me.GrpVerantwortung.Location = New System.Drawing.Point(177, 6) Me.GrpVerantwortung.Name = "GrpVerantwortung" Me.GrpVerantwortung.Size = New System.Drawing.Size(202, 109) Me.GrpVerantwortung.TabIndex = 1 Me.GrpVerantwortung.TabStop = False Me.GrpVerantwortung.Text = "Verantwortung" ' 'cbboxVerantwortungISI ' Me.cbboxVerantwortungISI.FormattingEnabled = True Me.cbboxVerantwortungISI.Location = New System.Drawing.Point(102, 47) Me.cbboxVerantwortungISI.Name = "cbboxVerantwortungISI" Me.cbboxVerantwortungISI.Size = New System.Drawing.Size(94, 21) Me.cbboxVerantwortungISI.TabIndex = 35 ' 'cbboxVerantwortlich ' Me.cbboxVerantwortlich.FormattingEnabled = True Me.cbboxVerantwortlich.Location = New System.Drawing.Point(102, 14) Me.cbboxVerantwortlich.Name = "cbboxVerantwortlich" Me.cbboxVerantwortlich.Size = New System.Drawing.Size(94, 21) Me.cbboxVerantwortlich.TabIndex = 33 ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Location = New System.Drawing.Point(6, 50) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(92, 13) Me.Label1.TabIndex = 34 Me.Label1.Text = "Verantwortung ISI" ' 'lblVerantwortlich ' Me.lblVerantwortlich.AutoSize = True Me.lblVerantwortlich.Location = New System.Drawing.Point(6, 22) Me.lblVerantwortlich.Name = "lblVerantwortlich" Me.lblVerantwortlich.Size = New System.Drawing.Size(74, 13) Me.lblVerantwortlich.TabIndex = 33 Me.lblVerantwortlich.Text = "Verantwortlich" ' 'ToolStrip2 ' Me.ToolStrip2.Location = New System.Drawing.Point(0, 0) Me.ToolStrip2.Name = "ToolStrip2" Me.ToolStrip2.Size = New System.Drawing.Size(694, 25) Me.ToolStrip2.TabIndex = 0 Me.ToolStrip2.Text = "ToolStrip2" ' 'frmPruefplan ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(1017, 645) Me.Controls.Add(Me.Panel1) Me.Controls.Add(Me.TreeStammdaten) Me.Controls.Add(Me.ToolStrip1) Me.Controls.Add(Me.MenuStrip1) Me.Name = "frmPruefplan" Me.Text = "frmFinmaStammdaten" Me.ToolStrip1.ResumeLayout(False) Me.ToolStrip1.PerformLayout() Me.MenuStrip1.ResumeLayout(False) Me.MenuStrip1.PerformLayout() CType(Me.TreeStammdaten, System.ComponentModel.ISupportInitialize).EndInit() Me.Panel1.ResumeLayout(False) Me.Panel1.PerformLayout() Me.Panel2.ResumeLayout(False) Me.grpPruefgegenstand.ResumeLayout(False) Me.grpPruefgegenstand.PerformLayout() Me.Panel3.ResumeLayout(False) Me.grpPlanung.ResumeLayout(False) Me.grpPlanung.PerformLayout() Me.GrpVerantwortung.ResumeLayout(False) Me.GrpVerantwortung.PerformLayout() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip Friend WithEvents TSBtnQuit As System.Windows.Forms.ToolStripButton Friend WithEvents MenuStrip1 As System.Windows.Forms.MenuStrip Friend WithEvents DateiToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents BeendenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents TreeStammdaten As DevComponents.AdvTree.AdvTree Friend WithEvents Node1 As DevComponents.AdvTree.Node Friend WithEvents NodeConnector1 As DevComponents.AdvTree.NodeConnector Friend WithEvents ElementStyle1 As DevComponents.DotNetBar.ElementStyle Friend WithEvents ImageList1 As System.Windows.Forms.ImageList Friend WithEvents ToolStripButton1 As System.Windows.Forms.ToolStripButton Friend WithEvents Panel1 As System.Windows.Forms.Panel Friend WithEvents Panel2 As System.Windows.Forms.Panel Friend WithEvents grpPruefgegenstand As System.Windows.Forms.GroupBox Friend WithEvents lblEreignisse2 As System.Windows.Forms.Label Friend WithEvents lblMassnahmen2 As System.Windows.Forms.Label Friend WithEvents txtEreignisse As System.Windows.Forms.TextBox Friend WithEvents lblEreignisse As System.Windows.Forms.Label Friend WithEvents txtMassnahmen As System.Windows.Forms.TextBox Friend WithEvents lblMassnahmen1 As System.Windows.Forms.Label Friend WithEvents txtPruefgegenstand As System.Windows.Forms.TextBox Friend WithEvents lblPruefgegenstand As System.Windows.Forms.Label Friend WithEvents Panel3 As System.Windows.Forms.Panel Friend WithEvents grpPlanung As System.Windows.Forms.GroupBox Friend WithEvents cbboxZeitpunkt As System.Windows.Forms.ComboBox Friend WithEvents lblZeitpunkt As System.Windows.Forms.Label Friend WithEvents cbboxPeriodizitaet As System.Windows.Forms.ComboBox Friend WithEvents lblPeriodizitaet As System.Windows.Forms.Label Friend WithEvents cbboxPrioritaet As System.Windows.Forms.ComboBox Friend WithEvents lblPrioritaet As System.Windows.Forms.Label Friend WithEvents GrpVerantwortung As System.Windows.Forms.GroupBox Friend WithEvents cbboxVerantwortungISI As System.Windows.Forms.ComboBox Friend WithEvents cbboxVerantwortlich As System.Windows.Forms.ComboBox Friend WithEvents Label1 As System.Windows.Forms.Label Friend WithEvents lblVerantwortlich As System.Windows.Forms.Label Friend WithEvents ToolStrip2 As System.Windows.Forms.ToolStrip End Class