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 ChartArea5 As System.Windows.Forms.DataVisualization.Charting.ChartArea = New System.Windows.Forms.DataVisualization.Charting.ChartArea() Dim Legend5 As System.Windows.Forms.DataVisualization.Charting.Legend = New System.Windows.Forms.DataVisualization.Charting.Legend() Dim Series5 As System.Windows.Forms.DataVisualization.Charting.Series = New System.Windows.Forms.DataVisualization.Charting.Series() Dim ChartArea6 As System.Windows.Forms.DataVisualization.Charting.ChartArea = New System.Windows.Forms.DataVisualization.Charting.ChartArea() Dim Legend6 As System.Windows.Forms.DataVisualization.Charting.Legend = New System.Windows.Forms.DataVisualization.Charting.Legend() Dim Series6 As System.Windows.Forms.DataVisualization.Charting.Series = New System.Windows.Forms.DataVisualization.Charting.Series() Me.年份清單_cb = New System.Windows.Forms.ComboBox() Me.Label1 = New System.Windows.Forms.Label() Me.月份清單_cb = New System.Windows.Forms.ComboBox() Me.Label25 = New System.Windows.Forms.Label() Me.車種_dgv = New System.Windows.Forms.DataGridView() Me.合計1_dgv = New System.Windows.Forms.DataGridView() Me.合計2_dgv = New System.Windows.Forms.DataGridView() Me.日期_dgv = New System.Windows.Forms.DataGridView() Me.計算_dgv = New System.Windows.Forms.DataGridView() Me.Chart1 = New System.Windows.Forms.DataVisualization.Charting.Chart() Me.Chart2 = New System.Windows.Forms.DataVisualization.Charting.Chart() Me.下一頁_bt = New System.Windows.Forms.Button() Me.上一頁_bt = New System.Windows.Forms.Button() Me.SplitContainer1 = New System.Windows.Forms.SplitContainer() CType(Me.車種_dgv, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.合計1_dgv, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.合計2_dgv, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.日期_dgv, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.計算_dgv, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.Chart1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.Chart2, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).BeginInit() Me.SplitContainer1.Panel1.SuspendLayout() Me.SplitContainer1.Panel2.SuspendLayout() Me.SplitContainer1.SuspendLayout() Me.SuspendLayout() ' '年份清單_cb ' Me.年份清單_cb.FormattingEnabled = True Me.年份清單_cb.Location = New System.Drawing.Point(35, 4) Me.年份清單_cb.Margin = New System.Windows.Forms.Padding(4) Me.年份清單_cb.Name = "年份清單_cb" Me.年份清單_cb.Size = New System.Drawing.Size(74, 24) Me.年份清單_cb.TabIndex = 1748 ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.ImeMode = System.Windows.Forms.ImeMode.NoControl Me.Label1.Location = New System.Drawing.Point(7, 8) Me.Label1.Margin = New System.Windows.Forms.Padding(5, 0, 5, 0) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(19, 16) Me.Label1.TabIndex = 1747 Me.Label1.Text = "年" ' '月份清單_cb ' Me.月份清單_cb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Bold) Me.月份清單_cb.FormattingEnabled = True Me.月份清單_cb.Items.AddRange(New Object() {"", "01", "02", "03", "04", "05", "06", "07", "08", "09", "10", "11", "12"}) Me.月份清單_cb.Location = New System.Drawing.Point(146, 4) Me.月份清單_cb.Margin = New System.Windows.Forms.Padding(4) Me.月份清單_cb.Name = "月份清單_cb" Me.月份清單_cb.Size = New System.Drawing.Size(71, 24) Me.月份清單_cb.TabIndex = 1746 ' 'Label25 ' Me.Label25.AutoSize = True Me.Label25.ImeMode = System.Windows.Forms.ImeMode.NoControl Me.Label25.Location = New System.Drawing.Point(118, 8) Me.Label25.Margin = New System.Windows.Forms.Padding(5, 0, 5, 0) Me.Label25.Name = "Label25" Me.Label25.Size = New System.Drawing.Size(19, 16) Me.Label25.TabIndex = 1745 Me.Label25.Text = "月" ' '車種_dgv ' Me.車種_dgv.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) Me.車種_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill Me.車種_dgv.BackgroundColor = System.Drawing.Color.White Me.車種_dgv.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D Me.車種_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.車種_dgv.Location = New System.Drawing.Point(10, 4) Me.車種_dgv.Margin = New System.Windows.Forms.Padding(4) Me.車種_dgv.Name = "車種_dgv" Me.車種_dgv.RowHeadersWidth = 5 Me.車種_dgv.RowTemplate.Height = 24 Me.車種_dgv.Size = New System.Drawing.Size(230, 306) Me.車種_dgv.TabIndex = 1749 ' '合計1_dgv ' Me.合計1_dgv.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) Me.合計1_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill Me.合計1_dgv.BackgroundColor = System.Drawing.Color.White Me.合計1_dgv.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D Me.合計1_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.合計1_dgv.Location = New System.Drawing.Point(10, 309) Me.合計1_dgv.Margin = New System.Windows.Forms.Padding(4) Me.合計1_dgv.Name = "合計1_dgv" Me.合計1_dgv.RowHeadersWidth = 5 Me.合計1_dgv.RowTemplate.Height = 24 Me.合計1_dgv.Size = New System.Drawing.Size(230, 24) Me.合計1_dgv.TabIndex = 1913 ' '合計2_dgv ' Me.合計2_dgv.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) Me.合計2_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill Me.合計2_dgv.BackgroundColor = System.Drawing.Color.White Me.合計2_dgv.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D Me.合計2_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.合計2_dgv.Location = New System.Drawing.Point(7, 310) Me.合計2_dgv.Margin = New System.Windows.Forms.Padding(4) Me.合計2_dgv.Name = "合計2_dgv" Me.合計2_dgv.RowHeadersWidth = 5 Me.合計2_dgv.RowTemplate.Height = 24 Me.合計2_dgv.Size = New System.Drawing.Size(230, 24) Me.合計2_dgv.TabIndex = 1915 ' '日期_dgv ' Me.日期_dgv.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) Me.日期_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill Me.日期_dgv.BackgroundColor = System.Drawing.Color.White Me.日期_dgv.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D Me.日期_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.日期_dgv.Location = New System.Drawing.Point(7, 31) Me.日期_dgv.Margin = New System.Windows.Forms.Padding(4) Me.日期_dgv.Name = "日期_dgv" Me.日期_dgv.RowHeadersWidth = 5 Me.日期_dgv.RowTemplate.Height = 24 Me.日期_dgv.Size = New System.Drawing.Size(230, 280) Me.日期_dgv.TabIndex = 1914 ' '計算_dgv ' Me.計算_dgv.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) Me.計算_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill Me.計算_dgv.BackgroundColor = System.Drawing.Color.White Me.計算_dgv.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D Me.計算_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.計算_dgv.Location = New System.Drawing.Point(7, 31) Me.計算_dgv.Margin = New System.Windows.Forms.Padding(4) Me.計算_dgv.Name = "計算_dgv" Me.計算_dgv.RowHeadersWidth = 5 Me.計算_dgv.RowTemplate.Height = 24 Me.計算_dgv.Size = New System.Drawing.Size(230, 280) Me.計算_dgv.TabIndex = 1916 ' 'Chart1 ' Me.Chart1.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.Chart1.BackColor = System.Drawing.Color.Transparent ChartArea5.AlignmentOrientation = CType((System.Windows.Forms.DataVisualization.Charting.AreaAlignmentOrientations.Vertical Or System.Windows.Forms.DataVisualization.Charting.AreaAlignmentOrientations.Horizontal), System.Windows.Forms.DataVisualization.Charting.AreaAlignmentOrientations) ChartArea5.AxisX.IntervalAutoMode = System.Windows.Forms.DataVisualization.Charting.IntervalAutoMode.VariableCount ChartArea5.AxisX.IsLabelAutoFit = False ChartArea5.AxisX.LabelAutoFitStyle = CType((((((System.Windows.Forms.DataVisualization.Charting.LabelAutoFitStyles.IncreaseFont Or System.Windows.Forms.DataVisualization.Charting.LabelAutoFitStyles.DecreaseFont) _ Or System.Windows.Forms.DataVisualization.Charting.LabelAutoFitStyles.StaggeredLabels) _ Or System.Windows.Forms.DataVisualization.Charting.LabelAutoFitStyles.LabelsAngleStep30) _ Or System.Windows.Forms.DataVisualization.Charting.LabelAutoFitStyles.LabelsAngleStep45) _ Or System.Windows.Forms.DataVisualization.Charting.LabelAutoFitStyles.WordWrap), System.Windows.Forms.DataVisualization.Charting.LabelAutoFitStyles) ChartArea5.AxisX.LabelStyle.IsStaggered = True ChartArea5.AxisX.MaximumAutoSize = 100.0! ChartArea5.AxisX.TitleFont = New System.Drawing.Font("微軟正黑體", 6.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) ChartArea5.AxisX2.IntervalAutoMode = System.Windows.Forms.DataVisualization.Charting.IntervalAutoMode.VariableCount ChartArea5.AxisX2.MaximumAutoSize = 100.0! ChartArea5.AxisY.MaximumAutoSize = 100.0! ChartArea5.AxisY2.MaximumAutoSize = 100.0! ChartArea5.Name = "ChartArea1" Me.Chart1.ChartAreas.Add(ChartArea5) Legend5.Font = New System.Drawing.Font("微軟正黑體", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Legend5.IsTextAutoFit = False Legend5.Name = "Legend1" Me.Chart1.Legends.Add(Legend5) Me.Chart1.Location = New System.Drawing.Point(193, 4) Me.Chart1.Name = "Chart1" Series5.ChartArea = "ChartArea1" Series5.ChartType = System.Windows.Forms.DataVisualization.Charting.SeriesChartType.StackedColumn Series5.Font = New System.Drawing.Font("微軟正黑體", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Series5.Legend = "Legend1" Series5.Name = "Series1" Me.Chart1.Series.Add(Series5) Me.Chart1.Size = New System.Drawing.Size(1199, 333) Me.Chart1.TabIndex = 1957 Me.Chart1.Text = "Chart1" ' 'Chart2 ' Me.Chart2.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.Chart2.BackColor = System.Drawing.Color.Transparent ChartArea6.AlignmentOrientation = CType((System.Windows.Forms.DataVisualization.Charting.AreaAlignmentOrientations.Vertical Or System.Windows.Forms.DataVisualization.Charting.AreaAlignmentOrientations.Horizontal), System.Windows.Forms.DataVisualization.Charting.AreaAlignmentOrientations) ChartArea6.AxisX.IntervalAutoMode = System.Windows.Forms.DataVisualization.Charting.IntervalAutoMode.VariableCount ChartArea6.AxisX.IsLabelAutoFit = False ChartArea6.AxisX.LabelAutoFitStyle = CType((((((System.Windows.Forms.DataVisualization.Charting.LabelAutoFitStyles.IncreaseFont Or System.Windows.Forms.DataVisualization.Charting.LabelAutoFitStyles.DecreaseFont) _ Or System.Windows.Forms.DataVisualization.Charting.LabelAutoFitStyles.StaggeredLabels) _ Or System.Windows.Forms.DataVisualization.Charting.LabelAutoFitStyles.LabelsAngleStep30) _ Or System.Windows.Forms.DataVisualization.Charting.LabelAutoFitStyles.LabelsAngleStep45) _ Or System.Windows.Forms.DataVisualization.Charting.LabelAutoFitStyles.WordWrap), System.Windows.Forms.DataVisualization.Charting.LabelAutoFitStyles) ChartArea6.AxisX.LabelStyle.IsStaggered = True ChartArea6.AxisX.MaximumAutoSize = 100.0! ChartArea6.AxisX.TitleFont = New System.Drawing.Font("微軟正黑體", 6.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) ChartArea6.AxisX2.IntervalAutoMode = System.Windows.Forms.DataVisualization.Charting.IntervalAutoMode.VariableCount ChartArea6.AxisX2.MaximumAutoSize = 100.0! ChartArea6.AxisY.MaximumAutoSize = 100.0! ChartArea6.AxisY2.MaximumAutoSize = 100.0! ChartArea6.Name = "ChartArea1" Me.Chart2.ChartAreas.Add(ChartArea6) Legend6.Font = New System.Drawing.Font("微軟正黑體", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Legend6.IsTextAutoFit = False Legend6.Name = "Legend1" Me.Chart2.Legends.Add(Legend6) Me.Chart2.Location = New System.Drawing.Point(190, 6) Me.Chart2.Name = "Chart2" Series6.ChartArea = "ChartArea1" Series6.ChartType = System.Windows.Forms.DataVisualization.Charting.SeriesChartType.StackedColumn Series6.Font = New System.Drawing.Font("微軟正黑體", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Series6.Legend = "Legend1" Series6.Name = "Series1" Me.Chart2.Series.Add(Series6) Me.Chart2.Size = New System.Drawing.Size(1199, 329) Me.Chart2.TabIndex = 1958 Me.Chart2.Text = "Chart2" ' '下一頁_bt ' Me.下一頁_bt.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.下一頁_bt.Location = New System.Drawing.Point(1262, 137) Me.下一頁_bt.Name = "下一頁_bt" Me.下一頁_bt.Size = New System.Drawing.Size(75, 55) Me.下一頁_bt.TabIndex = 1960 Me.下一頁_bt.Text = "下一頁" Me.下一頁_bt.UseVisualStyleBackColor = True ' '上一頁_bt ' Me.上一頁_bt.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.上一頁_bt.Location = New System.Drawing.Point(1262, 223) Me.上一頁_bt.Name = "上一頁_bt" Me.上一頁_bt.Size = New System.Drawing.Size(75, 55) Me.上一頁_bt.TabIndex = 1961 Me.上一頁_bt.Text = "上一頁" Me.上一頁_bt.UseVisualStyleBackColor = True ' 'SplitContainer1 ' Me.SplitContainer1.Dock = System.Windows.Forms.DockStyle.Fill Me.SplitContainer1.Location = New System.Drawing.Point(0, 0) Me.SplitContainer1.Name = "SplitContainer1" Me.SplitContainer1.Orientation = System.Windows.Forms.Orientation.Horizontal ' 'SplitContainer1.Panel1 ' Me.SplitContainer1.Panel1.Controls.Add(Me.Label1) Me.SplitContainer1.Panel1.Controls.Add(Me.合計2_dgv) Me.SplitContainer1.Panel1.Controls.Add(Me.Label25) Me.SplitContainer1.Panel1.Controls.Add(Me.年份清單_cb) Me.SplitContainer1.Panel1.Controls.Add(Me.月份清單_cb) Me.SplitContainer1.Panel1.Controls.Add(Me.日期_dgv) Me.SplitContainer1.Panel1.Controls.Add(Me.計算_dgv) Me.SplitContainer1.Panel1.Controls.Add(Me.Chart1) ' 'SplitContainer1.Panel2 ' Me.SplitContainer1.Panel2.Controls.Add(Me.上一頁_bt) Me.SplitContainer1.Panel2.Controls.Add(Me.合計1_dgv) Me.SplitContainer1.Panel2.Controls.Add(Me.下一頁_bt) Me.SplitContainer1.Panel2.Controls.Add(Me.車種_dgv) Me.SplitContainer1.Panel2.Controls.Add(Me.Chart2) Me.SplitContainer1.Size = New System.Drawing.Size(1349, 681) Me.SplitContainer1.SplitterDistance = 340 Me.SplitContainer1.TabIndex = 1962 ' '車輛銷售報表 ' Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(1349, 681) Me.Controls.Add(Me.SplitContainer1) 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) Me.Name = "車輛銷售報表" Me.Text = "車輛銷售報表" CType(Me.車種_dgv, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.合計1_dgv, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.合計2_dgv, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.日期_dgv, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.計算_dgv, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.Chart1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.Chart2, System.ComponentModel.ISupportInitialize).EndInit() Me.SplitContainer1.Panel1.ResumeLayout(False) Me.SplitContainer1.Panel1.PerformLayout() Me.SplitContainer1.Panel2.ResumeLayout(False) CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).EndInit() Me.SplitContainer1.ResumeLayout(False) Me.ResumeLayout(False) End Sub Friend WithEvents 年份清單_cb As ComboBox Friend WithEvents Label1 As Label Friend WithEvents 月份清單_cb As ComboBox Friend WithEvents Label25 As Label Friend WithEvents 合計1_dgv As DataGridView Friend WithEvents 車種_dgv As DataGridView Friend WithEvents 合計2_dgv As DataGridView Friend WithEvents 日期_dgv As DataGridView Friend WithEvents 計算_dgv As DataGridView Friend WithEvents Chart1 As DataVisualization.Charting.Chart Friend WithEvents Chart2 As DataVisualization.Charting.Chart Friend WithEvents 下一頁_bt As Button Friend WithEvents 上一頁_bt As Button Friend WithEvents SplitContainer1 As SplitContainer End Class