_ 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 DataGridViewCellStyle15 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle16 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle17 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle18 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle19 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle20 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle21 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim ChartArea3 As System.Windows.Forms.DataVisualization.Charting.ChartArea = New System.Windows.Forms.DataVisualization.Charting.ChartArea() Dim Legend3 As System.Windows.Forms.DataVisualization.Charting.Legend = New System.Windows.Forms.DataVisualization.Charting.Legend() Dim Series3 As System.Windows.Forms.DataVisualization.Charting.Series = New System.Windows.Forms.DataVisualization.Charting.Series() Me.物料清單_dgv = New System.Windows.Forms.DataGridView() Me.採購日_dgv = New System.Windows.Forms.DataGridView() Me.品名_dgv = New System.Windows.Forms.DataGridView() Me.Panel1 = New System.Windows.Forms.Panel() Me.繪圖1_dgv = New System.Windows.Forms.DataGridView() Me.Chart1 = New System.Windows.Forms.DataVisualization.Charting.Chart() Me.Label14 = New System.Windows.Forms.Label() Me.數列_NUD = New System.Windows.Forms.NumericUpDown() Me.Label12 = New System.Windows.Forms.Label() Me.最大_NUD = New System.Windows.Forms.NumericUpDown() Me.最小_NUD = New System.Windows.Forms.NumericUpDown() Me.Label13 = New System.Windows.Forms.Label() Me.清除圖表_bt = New System.Windows.Forms.Button() Me.採購數量_ch = New System.Windows.Forms.CheckBox() Me.採購平均單價_ch = New System.Windows.Forms.CheckBox() Me.關鍵字查詢_bt = New System.Windows.Forms.Button() Me.關鍵字查詢_tb = New System.Windows.Forms.TextBox() Me.上一筆_bt = New System.Windows.Forms.Button() Me.下一筆_bt = New System.Windows.Forms.Button() Me.清除查詢_bt = New System.Windows.Forms.Button() Me.查詢入圖_bt = New System.Windows.Forms.Button() Me.長條圖_ch = New System.Windows.Forms.CheckBox() Me.折線圖_ch = New System.Windows.Forms.CheckBox() CType(Me.物料清單_dgv, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.採購日_dgv, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.品名_dgv, System.ComponentModel.ISupportInitialize).BeginInit() Me.Panel1.SuspendLayout() CType(Me.繪圖1_dgv, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.Chart1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.數列_NUD, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.最大_NUD, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.最小_NUD, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' '物料清單_dgv ' 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.Name = "物料清單_dgv" Me.物料清單_dgv.RowHeadersWidth = 5 DataGridViewCellStyle15.Font = New System.Drawing.Font("微軟正黑體", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) DataGridViewCellStyle15.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.物料清單_dgv.RowsDefaultCellStyle = DataGridViewCellStyle15 Me.物料清單_dgv.RowTemplate.Height = 24 Me.物料清單_dgv.Size = New System.Drawing.Size(1340, 326) Me.物料清單_dgv.TabIndex = 678 ' '採購日_dgv ' DataGridViewCellStyle16.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer)) Me.採購日_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle16 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.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.採購日_dgv.Location = New System.Drawing.Point(3, 3) Me.採購日_dgv.Name = "採購日_dgv" Me.採購日_dgv.RowHeadersWidth = 5 DataGridViewCellStyle17.Font = New System.Drawing.Font("微軟正黑體", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) DataGridViewCellStyle17.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.採購日_dgv.RowsDefaultCellStyle = DataGridViewCellStyle17 Me.採購日_dgv.RowTemplate.Height = 24 Me.採購日_dgv.Size = New System.Drawing.Size(64, 57) Me.採購日_dgv.TabIndex = 679 ' '品名_dgv ' DataGridViewCellStyle18.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer)) Me.品名_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle18 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.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.品名_dgv.Location = New System.Drawing.Point(73, 3) Me.品名_dgv.Name = "品名_dgv" Me.品名_dgv.RowHeadersWidth = 5 DataGridViewCellStyle19.Font = New System.Drawing.Font("微軟正黑體", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) DataGridViewCellStyle19.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.品名_dgv.RowsDefaultCellStyle = DataGridViewCellStyle19 Me.品名_dgv.RowTemplate.Height = 24 Me.品名_dgv.Size = New System.Drawing.Size(64, 57) Me.品名_dgv.TabIndex = 680 ' 'Panel1 ' Me.Panel1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.Panel1.Controls.Add(Me.繪圖1_dgv) Me.Panel1.Controls.Add(Me.採購日_dgv) Me.Panel1.Controls.Add(Me.品名_dgv) Me.Panel1.Controls.Add(Me.數列_NUD) Me.Panel1.Controls.Add(Me.Label13) Me.Panel1.Controls.Add(Me.最小_NUD) Me.Panel1.Controls.Add(Me.最大_NUD) Me.Panel1.Controls.Add(Me.Label12) Me.Panel1.Controls.Add(Me.Label14) Me.Panel1.Location = New System.Drawing.Point(567, 133) Me.Panel1.Name = "Panel1" Me.Panel1.Size = New System.Drawing.Size(332, 100) Me.Panel1.TabIndex = 681 Me.Panel1.Visible = False ' '繪圖1_dgv ' DataGridViewCellStyle20.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer)) Me.繪圖1_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle20 Me.繪圖1_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.繪圖1_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill Me.繪圖1_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.繪圖1_dgv.Location = New System.Drawing.Point(143, 3) Me.繪圖1_dgv.Name = "繪圖1_dgv" Me.繪圖1_dgv.RowHeadersWidth = 5 DataGridViewCellStyle21.Font = New System.Drawing.Font("微軟正黑體", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) DataGridViewCellStyle21.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.繪圖1_dgv.RowsDefaultCellStyle = DataGridViewCellStyle21 Me.繪圖1_dgv.RowTemplate.Height = 24 Me.繪圖1_dgv.Size = New System.Drawing.Size(64, 57) Me.繪圖1_dgv.TabIndex = 681 ' '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) ChartArea3.Name = "ChartArea1" Me.Chart1.ChartAreas.Add(ChartArea3) Legend3.Name = "Legend1" Me.Chart1.Legends.Add(Legend3) Me.Chart1.Location = New System.Drawing.Point(4, 354) Me.Chart1.Name = "Chart1" Series3.ChartArea = "ChartArea1" Series3.ChartType = System.Windows.Forms.DataVisualization.Charting.SeriesChartType.Line Series3.Legend = "Legend1" Series3.Name = "Series1" Me.Chart1.Series.Add(Series3) Me.Chart1.Size = New System.Drawing.Size(1340, 327) Me.Chart1.TabIndex = 799 Me.Chart1.Text = "Chart2" ' 'Label14 ' Me.Label14.AutoSize = True Me.Label14.Location = New System.Drawing.Point(190, 75) Me.Label14.Name = "Label14" Me.Label14.Size = New System.Drawing.Size(32, 16) Me.Label14.TabIndex = 817 Me.Label14.Text = "數列" ' '數列_NUD ' Me.數列_NUD.Location = New System.Drawing.Point(222, 72) Me.數列_NUD.Name = "數列_NUD" Me.數列_NUD.Size = New System.Drawing.Size(50, 23) Me.數列_NUD.TabIndex = 816 ' 'Label12 ' Me.Label12.AutoSize = True Me.Label12.Location = New System.Drawing.Point(15, 75) Me.Label12.Name = "Label12" Me.Label12.Size = New System.Drawing.Size(32, 16) Me.Label12.TabIndex = 814 Me.Label12.Text = "最小" ' '最大_NUD ' Me.最大_NUD.Location = New System.Drawing.Point(134, 72) Me.最大_NUD.Maximum = New Decimal(New Integer() {1000, 0, 0, 0}) Me.最大_NUD.Name = "最大_NUD" Me.最大_NUD.Size = New System.Drawing.Size(50, 23) Me.最大_NUD.TabIndex = 813 Me.最大_NUD.Value = New Decimal(New Integer() {40, 0, 0, 0}) ' '最小_NUD ' Me.最小_NUD.Location = New System.Drawing.Point(47, 72) Me.最小_NUD.Name = "最小_NUD" Me.最小_NUD.Size = New System.Drawing.Size(50, 23) Me.最小_NUD.TabIndex = 812 ' 'Label13 ' Me.Label13.AutoSize = True Me.Label13.Location = New System.Drawing.Point(103, 75) Me.Label13.Name = "Label13" Me.Label13.Size = New System.Drawing.Size(32, 16) Me.Label13.TabIndex = 815 Me.Label13.Text = "最大" ' '清除圖表_bt ' Me.清除圖表_bt.Location = New System.Drawing.Point(801, 329) Me.清除圖表_bt.Name = "清除圖表_bt" Me.清除圖表_bt.Size = New System.Drawing.Size(75, 25) Me.清除圖表_bt.TabIndex = 818 Me.清除圖表_bt.Text = "清除圖表" Me.清除圖表_bt.UseVisualStyleBackColor = True ' '採購數量_ch ' Me.採購數量_ch.AutoSize = True Me.採購數量_ch.Location = New System.Drawing.Point(115, 331) Me.採購數量_ch.Name = "採購數量_ch" Me.採購數量_ch.Size = New System.Drawing.Size(75, 20) Me.採購數量_ch.TabIndex = 819 Me.採購數量_ch.Text = "採購數量" Me.採購數量_ch.UseVisualStyleBackColor = True ' '採購平均單價_ch ' Me.採購平均單價_ch.AutoSize = True Me.採購平均單價_ch.Checked = True Me.採購平均單價_ch.CheckState = System.Windows.Forms.CheckState.Checked Me.採購平均單價_ch.Location = New System.Drawing.Point(10, 331) Me.採購平均單價_ch.Name = "採購平均單價_ch" Me.採購平均單價_ch.Size = New System.Drawing.Size(99, 20) Me.採購平均單價_ch.TabIndex = 820 Me.採購平均單價_ch.Text = "採購平均單價" Me.採購平均單價_ch.UseVisualStyleBackColor = True ' '關鍵字查詢_bt ' Me.關鍵字查詢_bt.Location = New System.Drawing.Point(412, 329) Me.關鍵字查詢_bt.Name = "關鍵字查詢_bt" Me.關鍵字查詢_bt.Size = New System.Drawing.Size(94, 25) Me.關鍵字查詢_bt.TabIndex = 821 Me.關鍵字查詢_bt.Text = "關鍵字查詢" Me.關鍵字查詢_bt.UseVisualStyleBackColor = True ' '關鍵字查詢_tb ' Me.關鍵字查詢_tb.Location = New System.Drawing.Point(196, 330) Me.關鍵字查詢_tb.Name = "關鍵字查詢_tb" Me.關鍵字查詢_tb.Size = New System.Drawing.Size(216, 23) Me.關鍵字查詢_tb.TabIndex = 822 ' '上一筆_bt ' Me.上一筆_bt.Location = New System.Drawing.Point(505, 329) Me.上一筆_bt.Name = "上一筆_bt" Me.上一筆_bt.Size = New System.Drawing.Size(75, 25) Me.上一筆_bt.TabIndex = 823 Me.上一筆_bt.Text = "上一筆" Me.上一筆_bt.UseVisualStyleBackColor = True ' '下一筆_bt ' Me.下一筆_bt.Location = New System.Drawing.Point(579, 329) Me.下一筆_bt.Name = "下一筆_bt" Me.下一筆_bt.Size = New System.Drawing.Size(75, 25) Me.下一筆_bt.TabIndex = 824 Me.下一筆_bt.Text = "下一筆" Me.下一筆_bt.UseVisualStyleBackColor = True ' '清除查詢_bt ' Me.清除查詢_bt.Location = New System.Drawing.Point(727, 329) Me.清除查詢_bt.Name = "清除查詢_bt" Me.清除查詢_bt.Size = New System.Drawing.Size(75, 25) Me.清除查詢_bt.TabIndex = 825 Me.清除查詢_bt.Text = "清除查詢" Me.清除查詢_bt.UseVisualStyleBackColor = True ' '查詢入圖_bt ' Me.查詢入圖_bt.Location = New System.Drawing.Point(653, 329) Me.查詢入圖_bt.Name = "查詢入圖_bt" Me.查詢入圖_bt.Size = New System.Drawing.Size(75, 25) Me.查詢入圖_bt.TabIndex = 826 Me.查詢入圖_bt.Text = "查詢入圖" Me.查詢入圖_bt.UseVisualStyleBackColor = True ' '長條圖_ch ' Me.長條圖_ch.AutoSize = True Me.長條圖_ch.Checked = True Me.長條圖_ch.CheckState = System.Windows.Forms.CheckState.Checked Me.長條圖_ch.Location = New System.Drawing.Point(911, 332) Me.長條圖_ch.Name = "長條圖_ch" Me.長條圖_ch.Size = New System.Drawing.Size(63, 20) Me.長條圖_ch.TabIndex = 828 Me.長條圖_ch.Text = "長條圖" Me.長條圖_ch.UseVisualStyleBackColor = True ' '折線圖_ch ' Me.折線圖_ch.AutoSize = True Me.折線圖_ch.Location = New System.Drawing.Point(983, 332) Me.折線圖_ch.Name = "折線圖_ch" Me.折線圖_ch.Size = New System.Drawing.Size(63, 20) Me.折線圖_ch.TabIndex = 827 Me.折線圖_ch.Text = "折線圖" Me.折線圖_ch.UseVisualStyleBackColor = True ' '物料採購統計表 ' 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.長條圖_ch) Me.Controls.Add(Me.折線圖_ch) Me.Controls.Add(Me.查詢入圖_bt) Me.Controls.Add(Me.清除查詢_bt) Me.Controls.Add(Me.下一筆_bt) Me.Controls.Add(Me.上一筆_bt) Me.Controls.Add(Me.關鍵字查詢_tb) Me.Controls.Add(Me.關鍵字查詢_bt) Me.Controls.Add(Me.採購平均單價_ch) Me.Controls.Add(Me.採購數量_ch) Me.Controls.Add(Me.清除圖表_bt) Me.Controls.Add(Me.Chart1) Me.Controls.Add(Me.Panel1) 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(3, 4, 3, 4) Me.Name = "物料採購統計表" Me.Text = "物料採購統計表" CType(Me.物料清單_dgv, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.採購日_dgv, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.品名_dgv, System.ComponentModel.ISupportInitialize).EndInit() Me.Panel1.ResumeLayout(False) Me.Panel1.PerformLayout() CType(Me.繪圖1_dgv, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.Chart1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.數列_NUD, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.最大_NUD, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.最小_NUD, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents 物料清單_dgv As DataGridView Friend WithEvents 採購日_dgv As DataGridView Friend WithEvents 品名_dgv As DataGridView Friend WithEvents Panel1 As Panel Friend WithEvents 繪圖1_dgv As DataGridView Friend WithEvents Chart1 As DataVisualization.Charting.Chart Friend WithEvents Label14 As Label Friend WithEvents 數列_NUD As NumericUpDown Friend WithEvents Label12 As Label Friend WithEvents 最大_NUD As NumericUpDown Friend WithEvents 最小_NUD As NumericUpDown Friend WithEvents Label13 As Label Friend WithEvents 清除圖表_bt As Button Friend WithEvents 採購數量_ch As CheckBox Friend WithEvents 採購平均單價_ch As CheckBox Friend WithEvents 關鍵字查詢_bt As Button Friend WithEvents 關鍵字查詢_tb As TextBox Friend WithEvents 上一筆_bt As Button Friend WithEvents 下一筆_bt As Button Friend WithEvents 清除查詢_bt As Button Friend WithEvents 查詢入圖_bt As Button Friend WithEvents 長條圖_ch As CheckBox Friend WithEvents 折線圖_ch As CheckBox End Class