_ Partial Class FrmFortschritt 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.Label1 = New System.Windows.Forms.Label Me.ProgressBar1 = New System.Windows.Forms.ProgressBar Me.SuspendLayout() ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Location = New System.Drawing.Point(12, 18) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(261, 13) Me.Label1.TabIndex = 0 Me.Label1.Text = "Die Daten werden nach Excel-Exportiert. Bitte warten." ' 'ProgressBar1 ' Me.ProgressBar1.Location = New System.Drawing.Point(15, 57) Me.ProgressBar1.Name = "ProgressBar1" Me.ProgressBar1.Size = New System.Drawing.Size(353, 23) Me.ProgressBar1.TabIndex = 1 ' 'FrmFortschritt ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(380, 98) Me.Controls.Add(Me.ProgressBar1) Me.Controls.Add(Me.Label1) Me.Name = "FrmFortschritt" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "Excel-Export" Me.TopMost = True Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents Label1 As System.Windows.Forms.Label Friend WithEvents ProgressBar1 As System.Windows.Forms.ProgressBar End Class