_ Partial Class Form1 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() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form1)) Me.DokList = New C1.Win.C1TrueDBGrid.C1TrueDBGrid() Me.ToolStrip1 = New System.Windows.Forms.ToolStrip() Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton() Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton() Me.TSBtnExcelExport = New System.Windows.Forms.ToolStripButton() CType(Me.DokList, System.ComponentModel.ISupportInitialize).BeginInit() Me.ToolStrip1.SuspendLayout() Me.SuspendLayout() ' 'DokList ' Me.DokList.AllowSort = False Me.DokList.AlternatingRows = True Me.DokList.Dock = System.Windows.Forms.DockStyle.Fill Me.DokList.FetchRowStyles = True Me.DokList.FilterBar = True Me.DokList.GroupByCaption = "Drag a column header here to group by that column" Me.DokList.Images.Add(CType(resources.GetObject("DokList.Images"), System.Drawing.Image)) Me.DokList.Location = New System.Drawing.Point(0, 25) Me.DokList.Name = "DokList" Me.DokList.PreviewInfo.Location = New System.Drawing.Point(0, 0) Me.DokList.PreviewInfo.Size = New System.Drawing.Size(0, 0) Me.DokList.PreviewInfo.ZoomFactor = 75.0R Me.DokList.PrintInfo.PageSettings = CType(resources.GetObject("DokList.PrintInfo.PageSettings"), System.Drawing.Printing.PageSettings) Me.DokList.ScrollTips = True Me.DokList.Size = New System.Drawing.Size(968, 528) Me.DokList.TabIndex = 11 Me.DokList.Text = "C1TrueDBGrid2" Me.DokList.PropBag = resources.GetString("DokList.PropBag") ' 'ToolStrip1 ' Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButton1, Me.ToolStripButton2, Me.TSBtnExcelExport}) Me.ToolStrip1.Location = New System.Drawing.Point(0, 0) Me.ToolStrip1.Name = "ToolStrip1" Me.ToolStrip1.Size = New System.Drawing.Size(968, 25) Me.ToolStrip1.TabIndex = 12 Me.ToolStrip1.Text = "ToolStrip1" ' '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 = "Fenster schliessen" ' 'ToolStripButton2 ' Me.ToolStripButton2.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image Me.ToolStripButton2.Image = CType(resources.GetObject("ToolStripButton2.Image"), System.Drawing.Image) Me.ToolStripButton2.ImageTransparentColor = System.Drawing.Color.Magenta Me.ToolStripButton2.Name = "ToolStripButton2" Me.ToolStripButton2.Size = New System.Drawing.Size(23, 22) Me.ToolStripButton2.Text = "Daten aufbereiten" ' 'TSBtnExcelExport ' Me.TSBtnExcelExport.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image Me.TSBtnExcelExport.Image = CType(resources.GetObject("TSBtnExcelExport.Image"), System.Drawing.Image) Me.TSBtnExcelExport.ImageTransparentColor = System.Drawing.Color.Magenta Me.TSBtnExcelExport.Name = "TSBtnExcelExport" Me.TSBtnExcelExport.Size = New System.Drawing.Size(23, 22) Me.TSBtnExcelExport.Text = "Daten nach Excel Exportieren" ' 'Form1 ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(968, 553) Me.Controls.Add(Me.DokList) Me.Controls.Add(Me.ToolStrip1) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.Name = "Form1" Me.Text = "Daten auslesen" CType(Me.DokList, System.ComponentModel.ISupportInitialize).EndInit() Me.ToolStrip1.ResumeLayout(False) Me.ToolStrip1.PerformLayout() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents DokList As C1.Win.C1TrueDBGrid.C1TrueDBGrid Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip Friend WithEvents ToolStripButton1 As System.Windows.Forms.ToolStripButton Friend WithEvents ToolStripButton2 As System.Windows.Forms.ToolStripButton Friend WithEvents TSBtnExcelExport As System.Windows.Forms.ToolStripButton End Class