_ Partial Class 查看燈位 Inherits System.Windows.Forms.Form 'Form 覆寫 Dispose 以清除元件清單。 _ 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 '為 Windows Form 設計工具的必要項 Private components As System.ComponentModel.IContainer '注意: 以下為 Windows Form 設計工具所需的程序 '可以使用 Windows Form 設計工具進行修改。 '請勿使用程式碼編輯器進行修改。 _ Private Sub InitializeComponent() Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Me.人員表_dgv = New System.Windows.Forms.DataGridView() CType(Me.人員表_dgv, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' '人員表_dgv ' DataGridViewCellStyle1.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer)) Me.人員表_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1 Me.人員表_dgv.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.人員表_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill Me.人員表_dgv.BackgroundColor = System.Drawing.Color.White Me.人員表_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.人員表_dgv.Location = New System.Drawing.Point(4, 3) Me.人員表_dgv.Margin = New System.Windows.Forms.Padding(7, 7, 7, 7) Me.人員表_dgv.Name = "人員表_dgv" Me.人員表_dgv.ReadOnly = True Me.人員表_dgv.RowHeadersWidth = 5 Me.人員表_dgv.RowTemplate.Height = 24 Me.人員表_dgv.Size = New System.Drawing.Size(678, 423) Me.人員表_dgv.TabIndex = 961 ' '查看燈位 ' Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(685, 428) Me.Controls.Add(Me.人員表_dgv) Me.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Margin = New System.Windows.Forms.Padding(4, 4, 4, 4) Me.Name = "查看燈位" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "查看燈位" CType(Me.人員表_dgv, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) End Sub Friend WithEvents 人員表_dgv As DataGridView End Class