_ Partial Class frmBenutzerBerGruppen 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(frmBenutzerBerGruppen)) Me.Button3 = New System.Windows.Forms.Button() Me.Label9 = New System.Windows.Forms.Label() Me.Label8 = New System.Windows.Forms.Label() 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.Label1 = New System.Windows.Forms.Label() Me.MyComboBox2 = New VERAG_PROG_ALLGEMEIN.MyComboBox() CType(Me.gdvGruppen, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'Button3 ' Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button3.ForeColor = System.Drawing.Color.Black Me.Button3.Location = New System.Drawing.Point(217, 229) Me.Button3.Name = "Button3" Me.Button3.Size = New System.Drawing.Size(34, 23) Me.Button3.TabIndex = 29 Me.Button3.Text = "OK" Me.Button3.UseVisualStyleBackColor = True ' 'Label9 ' Me.Label9.AutoSize = True Me.Label9.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label9.ForeColor = System.Drawing.Color.Black Me.Label9.Location = New System.Drawing.Point(11, 215) Me.Label9.Name = "Label9" Me.Label9.Size = New System.Drawing.Size(108, 13) Me.Label9.TabIndex = 28 Me.Label9.Text = "Gruppe zuordnen:" ' '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(12, 38) Me.Label8.Name = "Label8" Me.Label8.Size = New System.Drawing.Size(59, 13) Me.Label8.TabIndex = 26 Me.Label8.Text = "Gruppen:" ' 'gdvGruppen ' 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, 54) 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(239, 154) Me.gdvGruppen.TabIndex = 25 ' '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 = "Bezeichnung" Me.dgvGrp_bez.Name = "dgvGrp_bez" Me.dgvGrp_bez.ReadOnly = True ' '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, 9) 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." ' 'MyComboBox2 ' Me.MyComboBox2._value = "" Me.MyComboBox2.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) Me.MyComboBox2.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.MyComboBox2.FormattingEnabled = True Me.MyComboBox2.Items.AddRange(New Object() {"FORM", "FUNC", "GLOBAL"}) Me.MyComboBox2.Location = New System.Drawing.Point(12, 231) Me.MyComboBox2.Name = "MyComboBox2" Me.MyComboBox2.Size = New System.Drawing.Size(199, 21) Me.MyComboBox2.TabIndex = 31 ' 'frmBenutzerBerGruppen ' 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, 271) Me.Controls.Add(Me.MyComboBox2) Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.Button3) Me.Controls.Add(Me.Label9) Me.Controls.Add(Me.Label8) Me.Controls.Add(Me.gdvGruppen) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.Name = "frmBenutzerBerGruppen" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "Gruppen" CType(Me.gdvGruppen, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents Button3 As System.Windows.Forms.Button Friend WithEvents Label9 As System.Windows.Forms.Label Friend WithEvents Label8 As System.Windows.Forms.Label Friend WithEvents gdvGruppen As VERAG_PROG_ALLGEMEIN.MyDatagridview Friend WithEvents dgvGrp_id As System.Windows.Forms.DataGridViewTextBoxColumn Friend WithEvents dgvGrp_bez As System.Windows.Forms.DataGridViewTextBoxColumn Friend WithEvents Label1 As System.Windows.Forms.Label Friend WithEvents MyComboBox2 As VERAG_PROG_ALLGEMEIN.MyComboBox End Class