_ Partial Class uscntr_Slaves Inherits System.Windows.Forms.UserControl 'UserControl ü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.dgvSlaves = New System.Windows.Forms.DataGridView() Me.Panel1 = New System.Windows.Forms.Panel() Me.cmdRefresh = New System.Windows.Forms.Button() Me.Label1 = New System.Windows.Forms.Label() CType(Me.dgvSlaves, System.ComponentModel.ISupportInitialize).BeginInit() Me.Panel1.SuspendLayout() Me.SuspendLayout() ' 'dgvSlaves ' Me.dgvSlaves.AllowUserToAddRows = False Me.dgvSlaves.AllowUserToDeleteRows = False Me.dgvSlaves.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill Me.dgvSlaves.AutoSizeRowsMode = System.Windows.Forms.DataGridViewAutoSizeRowsMode.AllCells Me.dgvSlaves.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.dgvSlaves.Dock = System.Windows.Forms.DockStyle.Fill Me.dgvSlaves.Location = New System.Drawing.Point(0, 30) Me.dgvSlaves.MultiSelect = False Me.dgvSlaves.Name = "dgvSlaves" Me.dgvSlaves.ReadOnly = True Me.dgvSlaves.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect Me.dgvSlaves.Size = New System.Drawing.Size(220, 570) Me.dgvSlaves.TabIndex = 0 ' 'Panel1 ' Me.Panel1.BackColor = System.Drawing.SystemColors.ControlLightLight Me.Panel1.Controls.Add(Me.cmdRefresh) Me.Panel1.Controls.Add(Me.Label1) Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top Me.Panel1.Location = New System.Drawing.Point(0, 0) Me.Panel1.Name = "Panel1" Me.Panel1.Size = New System.Drawing.Size(220, 30) Me.Panel1.TabIndex = 1 ' 'cmdRefresh ' Me.cmdRefresh.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.cmdRefresh.BackColor = System.Drawing.SystemColors.ControlLightLight Me.cmdRefresh.FlatAppearance.BorderColor = System.Drawing.Color.DimGray Me.cmdRefresh.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.cmdRefresh.Location = New System.Drawing.Point(193, 3) Me.cmdRefresh.Name = "cmdRefresh" Me.cmdRefresh.Size = New System.Drawing.Size(24, 23) Me.cmdRefresh.TabIndex = 19 Me.cmdRefresh.Text = "R" Me.cmdRefresh.UseVisualStyleBackColor = False Me.cmdRefresh.Visible = False ' 'Label1 ' Me.Label1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Label1.AutoSize = True Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Bold) Me.Label1.Location = New System.Drawing.Point(29, 6) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(158, 15) Me.Label1.TabIndex = 0 Me.Label1.Text = "verknüpfte IP-Adressen:" Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter ' 'uscntr_Slaves ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.AutoSize = True Me.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink Me.Controls.Add(Me.dgvSlaves) Me.Controls.Add(Me.Panel1) Me.MinimumSize = New System.Drawing.Size(220, 600) Me.Name = "uscntr_Slaves" Me.Size = New System.Drawing.Size(220, 600) CType(Me.dgvSlaves, System.ComponentModel.ISupportInitialize).EndInit() Me.Panel1.ResumeLayout(False) Me.Panel1.PerformLayout() Me.ResumeLayout(False) End Sub Friend WithEvents dgvSlaves As DataGridView Friend WithEvents Panel1 As Panel Friend WithEvents Label1 As Label Friend WithEvents cmdRefresh As Button End Class