Datenarchivarchiv

This commit is contained in:
2026-10-18 11:06:41 +02:00
parent 7d89c05b4e
commit 68bf284a8e
2 changed files with 183 additions and 53 deletions

View File

@@ -43,11 +43,15 @@ Partial Class frmDatenarchivarchiv
Me.txtUOrdner1 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.txtOrdner = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.txtKategorie = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.MyComboBox1 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.MyTextBox1 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.Label11 = New System.Windows.Forms.Label()
Me.Label12 = New System.Windows.Forms.Label()
Me.SuspendLayout()
'
'ProgressBar1
'
Me.ProgressBar1.Location = New System.Drawing.Point(29, 123)
Me.ProgressBar1.Location = New System.Drawing.Point(29, 147)
Me.ProgressBar1.Name = "ProgressBar1"
Me.ProgressBar1.Size = New System.Drawing.Size(664, 23)
Me.ProgressBar1.TabIndex = 0
@@ -55,7 +59,7 @@ Partial Class frmDatenarchivarchiv
'Label1
'
Me.Label1.AutoSize = True
Me.Label1.Location = New System.Drawing.Point(350, 153)
Me.Label1.Location = New System.Drawing.Point(350, 177)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(24, 13)
Me.Label1.TabIndex = 1
@@ -64,7 +68,7 @@ Partial Class frmDatenarchivarchiv
'Label2
'
Me.Label2.AutoSize = True
Me.Label2.Location = New System.Drawing.Point(26, 19)
Me.Label2.Location = New System.Drawing.Point(26, 26)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(174, 13)
Me.Label2.TabIndex = 1
@@ -73,7 +77,7 @@ Partial Class frmDatenarchivarchiv
'Label3
'
Me.Label3.AutoSize = True
Me.Label3.Location = New System.Drawing.Point(26, 56)
Me.Label3.Location = New System.Drawing.Point(26, 80)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(55, 13)
Me.Label3.TabIndex = 2
@@ -82,7 +86,7 @@ Partial Class frmDatenarchivarchiv
'Label4
'
Me.Label4.AutoSize = True
Me.Label4.Location = New System.Drawing.Point(160, 56)
Me.Label4.Location = New System.Drawing.Point(160, 80)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(42, 13)
Me.Label4.TabIndex = 4
@@ -91,7 +95,7 @@ Partial Class frmDatenarchivarchiv
'Label5
'
Me.Label5.AutoSize = True
Me.Label5.Location = New System.Drawing.Point(294, 56)
Me.Label5.Location = New System.Drawing.Point(294, 80)
Me.Label5.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(62, 13)
Me.Label5.TabIndex = 6
@@ -100,7 +104,7 @@ Partial Class frmDatenarchivarchiv
'Label6
'
Me.Label6.AutoSize = True
Me.Label6.Location = New System.Drawing.Point(428, 56)
Me.Label6.Location = New System.Drawing.Point(428, 80)
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(62, 13)
Me.Label6.TabIndex = 8
@@ -109,7 +113,7 @@ Partial Class frmDatenarchivarchiv
'Label7
'
Me.Label7.AutoSize = True
Me.Label7.Location = New System.Drawing.Point(562, 56)
Me.Label7.Location = New System.Drawing.Point(562, 80)
Me.Label7.Name = "Label7"
Me.Label7.Size = New System.Drawing.Size(62, 13)
Me.Label7.TabIndex = 10
@@ -118,7 +122,7 @@ Partial Class frmDatenarchivarchiv
'Label8
'
Me.Label8.AutoSize = True
Me.Label8.Location = New System.Drawing.Point(562, 2)
Me.Label8.Location = New System.Drawing.Point(562, 9)
Me.Label8.Name = "Label8"
Me.Label8.Size = New System.Drawing.Size(33, 13)
Me.Label8.TabIndex = 13
@@ -127,7 +131,7 @@ Partial Class frmDatenarchivarchiv
'Button1
'
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button1.Location = New System.Drawing.Point(278, 194)
Me.Button1.Location = New System.Drawing.Point(278, 198)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(165, 33)
Me.Button1.TabIndex = 14
@@ -137,7 +141,7 @@ Partial Class frmDatenarchivarchiv
'Label9
'
Me.Label9.AutoSize = True
Me.Label9.Location = New System.Drawing.Point(428, 2)
Me.Label9.Location = New System.Drawing.Point(428, 9)
Me.Label9.Name = "Label9"
Me.Label9.Size = New System.Drawing.Size(23, 13)
Me.Label9.TabIndex = 17
@@ -146,7 +150,7 @@ Partial Class frmDatenarchivarchiv
'Label10
'
Me.Label10.AutoSize = True
Me.Label10.Location = New System.Drawing.Point(294, 2)
Me.Label10.Location = New System.Drawing.Point(294, 9)
Me.Label10.Name = "Label10"
Me.Label10.Size = New System.Drawing.Size(28, 13)
Me.Label10.TabIndex = 15
@@ -167,7 +171,7 @@ Partial Class frmDatenarchivarchiv
Me.txtBis._Waehrung = False
Me.txtBis._WaehrungZeichen = True
Me.txtBis.ForeColor = System.Drawing.Color.Black
Me.txtBis.Location = New System.Drawing.Point(431, 19)
Me.txtBis.Location = New System.Drawing.Point(431, 26)
Me.txtBis.MaxLength = 10
Me.txtBis.MaxLineLength = -1
Me.txtBis.MaxLines_Warning = ""
@@ -192,7 +196,7 @@ Partial Class frmDatenarchivarchiv
Me.txtVon._Waehrung = False
Me.txtVon._WaehrungZeichen = True
Me.txtVon.ForeColor = System.Drawing.Color.Black
Me.txtVon.Location = New System.Drawing.Point(297, 19)
Me.txtVon.Location = New System.Drawing.Point(297, 26)
Me.txtVon.MaxLength = 10
Me.txtVon.MaxLineLength = -1
Me.txtVon.MaxLines_Warning = ""
@@ -217,7 +221,7 @@ Partial Class frmDatenarchivarchiv
Me.txtMax._Waehrung = False
Me.txtMax._WaehrungZeichen = True
Me.txtMax.ForeColor = System.Drawing.Color.Black
Me.txtMax.Location = New System.Drawing.Point(565, 19)
Me.txtMax.Location = New System.Drawing.Point(565, 26)
Me.txtMax.MaxLineLength = -1
Me.txtMax.MaxLines_Warning = ""
Me.txtMax.MaxLines_Warning_Label = Nothing
@@ -243,7 +247,7 @@ Partial Class frmDatenarchivarchiv
Me.txtUOrdner3._WaehrungZeichen = True
Me.txtUOrdner3.Enabled = False
Me.txtUOrdner3.ForeColor = System.Drawing.Color.Black
Me.txtUOrdner3.Location = New System.Drawing.Point(565, 73)
Me.txtUOrdner3.Location = New System.Drawing.Point(565, 97)
Me.txtUOrdner3.MaxLineLength = -1
Me.txtUOrdner3.MaxLines_Warning = ""
Me.txtUOrdner3.MaxLines_Warning_Label = Nothing
@@ -267,7 +271,7 @@ Partial Class frmDatenarchivarchiv
Me.txtUOrdner2._WaehrungZeichen = True
Me.txtUOrdner2.Enabled = False
Me.txtUOrdner2.ForeColor = System.Drawing.Color.Black
Me.txtUOrdner2.Location = New System.Drawing.Point(431, 73)
Me.txtUOrdner2.Location = New System.Drawing.Point(431, 97)
Me.txtUOrdner2.MaxLineLength = -1
Me.txtUOrdner2.MaxLines_Warning = ""
Me.txtUOrdner2.MaxLines_Warning_Label = Nothing
@@ -291,7 +295,7 @@ Partial Class frmDatenarchivarchiv
Me.txtUOrdner1._WaehrungZeichen = True
Me.txtUOrdner1.Enabled = False
Me.txtUOrdner1.ForeColor = System.Drawing.Color.Black
Me.txtUOrdner1.Location = New System.Drawing.Point(297, 73)
Me.txtUOrdner1.Location = New System.Drawing.Point(297, 97)
Me.txtUOrdner1.MaxLineLength = -1
Me.txtUOrdner1.MaxLines_Warning = ""
Me.txtUOrdner1.MaxLines_Warning_Label = Nothing
@@ -314,7 +318,7 @@ Partial Class frmDatenarchivarchiv
Me.txtOrdner._Waehrung = False
Me.txtOrdner._WaehrungZeichen = True
Me.txtOrdner.ForeColor = System.Drawing.Color.Black
Me.txtOrdner.Location = New System.Drawing.Point(163, 73)
Me.txtOrdner.Location = New System.Drawing.Point(163, 97)
Me.txtOrdner.MaxLineLength = -1
Me.txtOrdner.MaxLines_Warning = ""
Me.txtOrdner.MaxLines_Warning_Label = Nothing
@@ -338,7 +342,7 @@ Partial Class frmDatenarchivarchiv
Me.txtKategorie._Waehrung = False
Me.txtKategorie._WaehrungZeichen = True
Me.txtKategorie.ForeColor = System.Drawing.Color.Black
Me.txtKategorie.Location = New System.Drawing.Point(29, 73)
Me.txtKategorie.Location = New System.Drawing.Point(29, 97)
Me.txtKategorie.MaxLineLength = -1
Me.txtKategorie.MaxLines_Warning = ""
Me.txtKategorie.MaxLines_Warning_Label = Nothing
@@ -347,12 +351,70 @@ Partial Class frmDatenarchivarchiv
Me.txtKategorie.TabIndex = 3
Me.txtKategorie.Text = "DOKUMENTE"
'
'MyComboBox1
'
Me.MyComboBox1._allowedValuesFreiText = Nothing
Me.MyComboBox1._allowFreiText = False
Me.MyComboBox1._value = ""
Me.MyComboBox1.FormattingEnabled = True
Me.MyComboBox1.Location = New System.Drawing.Point(343, 47)
Me.MyComboBox1.Name = "MyComboBox1"
Me.MyComboBox1.Size = New System.Drawing.Size(82, 21)
Me.MyComboBox1.TabIndex = 19
'
'MyTextBox1
'
Me.MyTextBox1._DateTimeOnly = False
Me.MyTextBox1._numbersOnly = False
Me.MyTextBox1._numbersOnlyKommastellen = ""
Me.MyTextBox1._numbersOnlyTrennzeichen = True
Me.MyTextBox1._Prozent = False
Me.MyTextBox1._ShortDateNew = False
Me.MyTextBox1._ShortDateOnly = False
Me.MyTextBox1._TimeOnly = False
Me.MyTextBox1._TimeOnly_Seconds = False
Me.MyTextBox1._value = "1000"
Me.MyTextBox1._Waehrung = False
Me.MyTextBox1._WaehrungZeichen = True
Me.MyTextBox1.ForeColor = System.Drawing.Color.Black
Me.MyTextBox1.Location = New System.Drawing.Point(467, 47)
Me.MyTextBox1.MaxLineLength = -1
Me.MyTextBox1.MaxLines_Warning = ""
Me.MyTextBox1.MaxLines_Warning_Label = Nothing
Me.MyTextBox1.Name = "MyTextBox1"
Me.MyTextBox1.Size = New System.Drawing.Size(92, 20)
Me.MyTextBox1.TabIndex = 20
Me.MyTextBox1.Text = "1000"
Me.MyTextBox1.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
'
'Label11
'
Me.Label11.AutoSize = True
Me.Label11.Location = New System.Drawing.Point(431, 50)
Me.Label11.Name = "Label11"
Me.Label11.Size = New System.Drawing.Size(30, 13)
Me.Label11.TabIndex = 22
Me.Label11.Text = "Jahr:"
'
'Label12
'
Me.Label12.AutoSize = True
Me.Label12.Location = New System.Drawing.Point(297, 50)
Me.Label12.Name = "Label12"
Me.Label12.Size = New System.Drawing.Size(40, 13)
Me.Label12.TabIndex = 21
Me.Label12.Text = "Monat:"
'
'frmDatenarchivarchiv
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.BackColor = System.Drawing.Color.White
Me.ClientSize = New System.Drawing.Size(722, 239)
Me.Controls.Add(Me.Label11)
Me.Controls.Add(Me.Label12)
Me.Controls.Add(Me.MyTextBox1)
Me.Controls.Add(Me.MyComboBox1)
Me.Controls.Add(Me.txtBis)
Me.Controls.Add(Me.Label9)
Me.Controls.Add(Me.txtVon)
@@ -402,4 +464,8 @@ Partial Class frmDatenarchivarchiv
Friend WithEvents Label9 As Label
Friend WithEvents txtVon As VERAG_PROG_ALLGEMEIN.MyTextBox
Friend WithEvents Label10 As Label
Friend WithEvents MyComboBox1 As VERAG_PROG_ALLGEMEIN.MyComboBox
Friend WithEvents MyTextBox1 As VERAG_PROG_ALLGEMEIN.MyTextBox
Friend WithEvents Label11 As Label
Friend WithEvents Label12 As Label
End Class