Partial Class frmBenutzerBerGruppenKopieren 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(frmBenutzerBerGruppenKopieren)) Me.Label8 = New System.Windows.Forms.Label() Me.dgvGruppen = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) Me.Label1 = New System.Windows.Forms.Label() Me.Button3 = New System.Windows.Forms.Button() Me.cboSelectedEmployee = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.Label2 = New System.Windows.Forms.Label() Me.Label3 = New System.Windows.Forms.Label() Me.lblBenutzer = New System.Windows.Forms.Label() Me.Button1 = New System.Windows.Forms.Button() Me.dgv_Id = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.dgv_progId = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.dgv_bergrId = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.dgv_bez = New System.Windows.Forms.DataGridViewTextBoxColumn() CType(Me.dgvGruppen, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'Label8 ' Me.Label8.AutoSize = True Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label8.ForeColor = System.Drawing.Color.Black Me.Label8.Location = New System.Drawing.Point(9, 175) Me.Label8.Name = "Label8" Me.Label8.Size = New System.Drawing.Size(59, 13) Me.Label8.TabIndex = 26 Me.Label8.Text = "Gruppen:" ' 'dgvGruppen ' Me.dgvGruppen.AKTUALISIERUNGS_INTERVALL = -1 Me.dgvGruppen.AllowUserToAddRows = False Me.dgvGruppen.AllowUserToDeleteRows = False Me.dgvGruppen.AllowUserToResizeColumns = False Me.dgvGruppen.AllowUserToResizeRows = False Me.dgvGruppen.BackgroundColor = System.Drawing.Color.White Me.dgvGruppen.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.dgvGruppen.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.dgv_Id, Me.dgv_progId, Me.dgv_bergrId, Me.dgv_bez}) Me.dgvGruppen.Location = New System.Drawing.Point(12, 191) Me.dgvGruppen.MultiSelect = False Me.dgvGruppen.Name = "dgvGruppen" Me.dgvGruppen.ReadOnly = True Me.dgvGruppen.RowHeadersVisible = False Me.dgvGruppen.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect Me.dgvGruppen.Size = New System.Drawing.Size(239, 260) Me.dgvGruppen.TabIndex = 25 ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label1.ForeColor = System.Drawing.Color.Black Me.Label1.Location = New System.Drawing.Point(12, 162) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(233, 13) Me.Label1.TabIndex = 30 Me.Label1.Text = "Dem Benutzer zugeordnete Programm-Gruppen." ' 'Button3 ' Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button3.ForeColor = System.Drawing.Color.Black Me.Button3.Location = New System.Drawing.Point(179, 474) Me.Button3.Name = "Button3" Me.Button3.Size = New System.Drawing.Size(72, 23) Me.Button3.TabIndex = 29 Me.Button3.Text = "OK" Me.Button3.UseVisualStyleBackColor = True ' 'cboSelectedEmployee ' Me.cboSelectedEmployee._allowedValuesFreiText = Nothing Me.cboSelectedEmployee._allowFreiText = False Me.cboSelectedEmployee._value = "" Me.cboSelectedEmployee.FormattingEnabled = True Me.cboSelectedEmployee.Location = New System.Drawing.Point(15, 125) Me.cboSelectedEmployee.Name = "cboSelectedEmployee" Me.cboSelectedEmployee.Size = New System.Drawing.Size(121, 21) Me.cboSelectedEmployee.TabIndex = 31 ' 'Label2 ' Me.Label2.AutoSize = True Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label2.ForeColor = System.Drawing.Color.Black Me.Label2.Location = New System.Drawing.Point(9, 109) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(198, 13) Me.Label2.TabIndex = 32 Me.Label2.Text = "Berechtigungen übernehmen von:" ' 'Label3 ' Me.Label3.AutoSize = True Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label3.ForeColor = System.Drawing.Color.Black Me.Label3.Location = New System.Drawing.Point(12, 7) Me.Label3.Name = "Label3" Me.Label3.Size = New System.Drawing.Size(61, 13) Me.Label3.TabIndex = 33 Me.Label3.Text = "Benutzer:" ' 'lblBenutzer ' Me.lblBenutzer.AutoSize = True Me.lblBenutzer.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.lblBenutzer.ForeColor = System.Drawing.Color.Black Me.lblBenutzer.Location = New System.Drawing.Point(12, 30) Me.lblBenutzer.Name = "lblBenutzer" Me.lblBenutzer.Size = New System.Drawing.Size(75, 13) Me.lblBenutzer.TabIndex = 34 Me.lblBenutzer.Text = "Benuztername" ' 'Button1 ' Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button1.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Button1.ForeColor = System.Drawing.Color.Black Me.Button1.Location = New System.Drawing.Point(15, 55) Me.Button1.Name = "Button1" Me.Button1.Size = New System.Drawing.Size(105, 26) Me.Button1.TabIndex = 35 Me.Button1.Text = "Berechtg. löschen" Me.Button1.UseVisualStyleBackColor = True ' 'dgv_Id ' Me.dgv_Id.HeaderText = "Id" Me.dgv_Id.Name = "dgv_Id" Me.dgv_Id.ReadOnly = True Me.dgv_Id.Visible = False Me.dgv_Id.Width = 50 ' 'dgv_progId ' Me.dgv_progId.HeaderText = "progId" Me.dgv_progId.Name = "dgv_progId" Me.dgv_progId.ReadOnly = True Me.dgv_progId.Width = 50 ' 'dgv_bergrId ' Me.dgv_bergrId.HeaderText = "bergrId" Me.dgv_bergrId.Name = "dgv_bergrId" Me.dgv_bergrId.ReadOnly = True Me.dgv_bergrId.Visible = False ' 'dgv_bez ' Me.dgv_bez.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill Me.dgv_bez.HeaderText = "Bezeichnung" Me.dgv_bez.Name = "dgv_bez" Me.dgv_bez.ReadOnly = True ' 'frmBenutzerBerGruppenKopieren ' 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(271, 518) Me.Controls.Add(Me.Button1) Me.Controls.Add(Me.lblBenutzer) Me.Controls.Add(Me.Label3) Me.Controls.Add(Me.Label2) Me.Controls.Add(Me.cboSelectedEmployee) Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.Button3) Me.Controls.Add(Me.Label8) Me.Controls.Add(Me.dgvGruppen) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.Name = "frmBenutzerBerGruppenKopieren" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "Benutzergruppen kopieren" CType(Me.dgvGruppen, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents Label8 As System.Windows.Forms.Label Friend WithEvents dgvGruppen As VERAG_PROG_ALLGEMEIN.MyDatagridview Friend WithEvents Label1 As System.Windows.Forms.Label Friend WithEvents Button3 As Button Friend WithEvents cboSelectedEmployee As VERAG_PROG_ALLGEMEIN.MyComboBox Friend WithEvents Label2 As Label Friend WithEvents Label3 As Label Friend WithEvents lblBenutzer As Label Friend WithEvents Button1 As Button Friend WithEvents dgv_Id As DataGridViewTextBoxColumn Friend WithEvents dgv_progId As DataGridViewTextBoxColumn Friend WithEvents dgv_bergrId As DataGridViewTextBoxColumn Friend WithEvents dgv_bez As DataGridViewTextBoxColumn End Class