_ Partial Class frmBerechtigungenUser 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(frmBerechtigungenUser)) Me.gdvGruppen = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) Me.dgvGrp_id = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.dgvGrp_bez = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.lbl = New System.Windows.Forms.Label() CType(Me.gdvGruppen, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'gdvGruppen ' Me.gdvGruppen.AKTUALISIERUNGS_INTERVALL = -1 Me.gdvGruppen.AllowUserToAddRows = False Me.gdvGruppen.AllowUserToDeleteRows = False Me.gdvGruppen.AllowUserToResizeColumns = False Me.gdvGruppen.AllowUserToResizeRows = False Me.gdvGruppen.BackgroundColor = System.Drawing.Color.White Me.gdvGruppen.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.gdvGruppen.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.dgvGrp_id, Me.dgvGrp_bez}) Me.gdvGruppen.Location = New System.Drawing.Point(12, 33) Me.gdvGruppen.MultiSelect = False Me.gdvGruppen.Name = "gdvGruppen" Me.gdvGruppen.ReadOnly = True Me.gdvGruppen.RowHeadersVisible = False Me.gdvGruppen.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect Me.gdvGruppen.Size = New System.Drawing.Size(302, 533) Me.gdvGruppen.TabIndex = 21 ' 'dgvGrp_id ' Me.dgvGrp_id.HeaderText = "Id" Me.dgvGrp_id.Name = "dgvGrp_id" Me.dgvGrp_id.ReadOnly = True Me.dgvGrp_id.Visible = False Me.dgvGrp_id.Width = 50 ' 'dgvGrp_bez ' Me.dgvGrp_bez.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill Me.dgvGrp_bez.HeaderText = "Username" Me.dgvGrp_bez.Name = "dgvGrp_bez" Me.dgvGrp_bez.ReadOnly = True ' 'lbl ' Me.lbl.AutoSize = True Me.lbl.Location = New System.Drawing.Point(13, 14) Me.lbl.Name = "lbl" Me.lbl.Size = New System.Drawing.Size(119, 13) Me.lbl.TabIndex = 22 Me.lbl.Text = "Benutzer in der Gruppe:" ' 'frmBerechtigungenUser ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(326, 576) Me.Controls.Add(Me.lbl) Me.Controls.Add(Me.gdvGruppen) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.Name = "frmBerechtigungenUser" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "Berechtigungen - Benutzer" CType(Me.gdvGruppen, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents gdvGruppen As VERAG_PROG_ALLGEMEIN.MyDatagridview Friend WithEvents dgvGrp_id As DataGridViewTextBoxColumn Friend WithEvents dgvGrp_bez As DataGridViewTextBoxColumn Friend WithEvents lbl As Label End Class