_ 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() Me.components = New System.ComponentModel.Container() Dim DataGridViewCellStyle7 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle8 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle9 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Me.TextBox4 = New System.Windows.Forms.TextBox() Me.TextBox1 = New System.Windows.Forms.TextBox() Me.TextBox6 = New System.Windows.Forms.TextBox() Me.Label22 = New System.Windows.Forms.Label() Me.TextBox10 = New System.Windows.Forms.TextBox() Me.Label15 = New System.Windows.Forms.Label() Me.TextBox13 = New System.Windows.Forms.TextBox() Me.Label10 = New System.Windows.Forms.Label() Me.Label7 = New System.Windows.Forms.Label() Me.DataGridView1 = New System.Windows.Forms.DataGridView() Me.Button2 = New System.Windows.Forms.Button() Me.Button1 = New System.Windows.Forms.Button() Me.Label20 = New System.Windows.Forms.Label() Me.Label4 = New System.Windows.Forms.Label() Me.DateTimePicker2 = New System.Windows.Forms.DateTimePicker() Me.DateTimePicker1 = New System.Windows.Forms.DateTimePicker() Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.重新整理ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.DataGridView2 = New System.Windows.Forms.DataGridView() Me.CheckBox1 = New System.Windows.Forms.CheckBox() Me.CheckBox3 = New System.Windows.Forms.CheckBox() Me.CheckBox2 = New System.Windows.Forms.CheckBox() Me.一般月 = New System.Windows.Forms.CheckBox() Me.會計月 = New System.Windows.Forms.CheckBox() CType(Me.DataGridView1, System.ComponentModel.ISupportInitialize).BeginInit() Me.ContextMenuStrip1.SuspendLayout() CType(Me.DataGridView2, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'TextBox4 ' Me.TextBox4.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.TextBox4.Location = New System.Drawing.Point(982, 28) Me.TextBox4.Name = "TextBox4" Me.TextBox4.Size = New System.Drawing.Size(100, 23) Me.TextBox4.TabIndex = 1073 Me.TextBox4.Text = "0" Me.TextBox4.TextAlign = System.Windows.Forms.HorizontalAlignment.Center ' 'TextBox1 ' Me.TextBox1.ForeColor = System.Drawing.Color.Green Me.TextBox1.Location = New System.Drawing.Point(761, 28) Me.TextBox1.Name = "TextBox1" Me.TextBox1.Size = New System.Drawing.Size(100, 23) Me.TextBox1.TabIndex = 1074 Me.TextBox1.Text = "0" Me.TextBox1.TextAlign = System.Windows.Forms.HorizontalAlignment.Center ' 'TextBox6 ' Me.TextBox6.ForeColor = System.Drawing.Color.Maroon Me.TextBox6.Location = New System.Drawing.Point(520, 28) Me.TextBox6.Name = "TextBox6" Me.TextBox6.Size = New System.Drawing.Size(100, 23) Me.TextBox6.TabIndex = 1075 Me.TextBox6.Text = "0" Me.TextBox6.TextAlign = System.Windows.Forms.HorizontalAlignment.Center ' 'Label22 ' Me.Label22.AutoSize = True Me.Label22.ForeColor = System.Drawing.Color.Black Me.Label22.Location = New System.Drawing.Point(711, 6) Me.Label22.Name = "Label22" Me.Label22.Size = New System.Drawing.Size(44, 16) Me.Label22.TabIndex = 1077 Me.Label22.Text = "供應商" ' 'TextBox10 ' Me.TextBox10.ForeColor = System.Drawing.Color.Purple Me.TextBox10.Location = New System.Drawing.Point(982, 3) Me.TextBox10.Name = "TextBox10" Me.TextBox10.Size = New System.Drawing.Size(100, 23) Me.TextBox10.TabIndex = 1076 Me.TextBox10.Text = "0" Me.TextBox10.TextAlign = System.Windows.Forms.HorizontalAlignment.Center ' 'Label15 ' Me.Label15.AutoSize = True Me.Label15.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.Label15.Location = New System.Drawing.Point(920, 31) Me.Label15.Name = "Label15" Me.Label15.Size = New System.Drawing.Size(56, 16) Me.Label15.TabIndex = 1069 Me.Label15.Text = "採購成本" ' 'TextBox13 ' Me.TextBox13.ForeColor = System.Drawing.Color.Black Me.TextBox13.Location = New System.Drawing.Point(761, 3) Me.TextBox13.Name = "TextBox13" Me.TextBox13.Size = New System.Drawing.Size(100, 23) Me.TextBox13.TabIndex = 1079 Me.TextBox13.TextAlign = System.Windows.Forms.HorizontalAlignment.Center ' 'Label10 ' Me.Label10.AutoSize = True Me.Label10.ForeColor = System.Drawing.Color.Green Me.Label10.Location = New System.Drawing.Point(634, 31) Me.Label10.Name = "Label10" Me.Label10.Size = New System.Drawing.Size(121, 16) Me.Label10.TabIndex = 1070 Me.Label10.Text = "採購已到廠_採購成本" ' 'Label7 ' Me.Label7.AutoSize = True Me.Label7.ForeColor = System.Drawing.Color.Maroon Me.Label7.Location = New System.Drawing.Point(393, 31) Me.Label7.Name = "Label7" Me.Label7.Size = New System.Drawing.Size(121, 16) Me.Label7.TabIndex = 1071 Me.Label7.Text = "採購未到廠_採購成本" ' 'DataGridView1 ' Me.DataGridView1.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.DataGridView1.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.DataGridView1.Location = New System.Drawing.Point(250, 57) Me.DataGridView1.Name = "DataGridView1" Me.DataGridView1.RowHeadersWidth = 5 DataGridViewCellStyle7.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.DataGridView1.RowsDefaultCellStyle = DataGridViewCellStyle7 Me.DataGridView1.RowTemplate.Height = 24 Me.DataGridView1.Size = New System.Drawing.Size(1657, 918) Me.DataGridView1.TabIndex = 1084 ' 'Button2 ' Me.Button2.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Button2.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.Button2.Location = New System.Drawing.Point(208, 29) Me.Button2.Name = "Button2" Me.Button2.Size = New System.Drawing.Size(97, 23) Me.Button2.TabIndex = 1083 Me.Button2.Text = "下個月" Me.Button2.UseVisualStyleBackColor = True ' 'Button1 ' Me.Button1.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Button1.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.Button1.Location = New System.Drawing.Point(208, 4) Me.Button1.Name = "Button1" Me.Button1.Size = New System.Drawing.Size(97, 23) Me.Button1.TabIndex = 1082 Me.Button1.Text = "上個月" Me.Button1.UseVisualStyleBackColor = True ' 'Label20 ' Me.Label20.AutoSize = True Me.Label20.ForeColor = System.Drawing.Color.Purple Me.Label20.Location = New System.Drawing.Point(867, 6) Me.Label20.Name = "Label20" Me.Label20.Size = New System.Drawing.Size(109, 16) Me.Label20.TabIndex = 1072 Me.Label20.Text = "採購成本_依供應商" ' 'Label4 ' Me.Label4.AutoSize = True Me.Label4.Location = New System.Drawing.Point(97, 8) Me.Label4.Name = "Label4" Me.Label4.Size = New System.Drawing.Size(20, 16) Me.Label4.TabIndex = 1081 Me.Label4.Text = "到" ' 'DateTimePicker2 ' Me.DateTimePicker2.DropDownAlign = System.Windows.Forms.LeftRightAlignment.Right Me.DateTimePicker2.Format = System.Windows.Forms.DateTimePickerFormat.[Short] Me.DateTimePicker2.Location = New System.Drawing.Point(119, 4) Me.DateTimePicker2.Name = "DateTimePicker2" Me.DateTimePicker2.Size = New System.Drawing.Size(87, 23) Me.DateTimePicker2.TabIndex = 1080 ' 'DateTimePicker1 ' Me.DateTimePicker1.Format = System.Windows.Forms.DateTimePickerFormat.[Short] Me.DateTimePicker1.Location = New System.Drawing.Point(8, 4) Me.DateTimePicker1.Name = "DateTimePicker1" Me.DateTimePicker1.Size = New System.Drawing.Size(87, 23) Me.DateTimePicker1.TabIndex = 1078 ' 'ContextMenuStrip1 ' Me.ContextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.重新整理ToolStripMenuItem}) Me.ContextMenuStrip1.Name = "ContextMenuStrip1" Me.ContextMenuStrip1.Size = New System.Drawing.Size(123, 26) ' '重新整理ToolStripMenuItem ' Me.重新整理ToolStripMenuItem.Name = "重新整理ToolStripMenuItem" Me.重新整理ToolStripMenuItem.Size = New System.Drawing.Size(122, 22) Me.重新整理ToolStripMenuItem.Text = "重新整理" ' 'DataGridView2 ' DataGridViewCellStyle8.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(192, Byte), Integer)) Me.DataGridView2.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle8 Me.DataGridView2.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) Me.DataGridView2.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill Me.DataGridView2.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.DataGridView2.Location = New System.Drawing.Point(7, 57) Me.DataGridView2.Name = "DataGridView2" Me.DataGridView2.RowHeadersWidth = 5 DataGridViewCellStyle9.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.DataGridView2.RowsDefaultCellStyle = DataGridViewCellStyle9 Me.DataGridView2.RowTemplate.Height = 24 Me.DataGridView2.Size = New System.Drawing.Size(237, 918) Me.DataGridView2.TabIndex = 1085 ' 'CheckBox1 ' Me.CheckBox1.AutoSize = True Me.CheckBox1.Location = New System.Drawing.Point(311, 30) Me.CheckBox1.Name = "CheckBox1" Me.CheckBox1.Size = New System.Drawing.Size(87, 20) Me.CheckBox1.TabIndex = 1091 Me.CheckBox1.Text = "顯示彙總表" Me.CheckBox1.UseVisualStyleBackColor = True ' 'CheckBox3 ' Me.CheckBox3.AutoSize = True Me.CheckBox3.Location = New System.Drawing.Point(311, 6) Me.CheckBox3.Name = "CheckBox3" Me.CheckBox3.Size = New System.Drawing.Size(99, 20) Me.CheckBox3.TabIndex = 1094 Me.CheckBox3.Text = "隱藏單據編號" Me.CheckBox3.UseVisualStyleBackColor = True ' 'CheckBox2 ' Me.CheckBox2.AutoSize = True Me.CheckBox2.Location = New System.Drawing.Point(416, 6) Me.CheckBox2.Name = "CheckBox2" Me.CheckBox2.Size = New System.Drawing.Size(111, 20) Me.CheckBox2.TabIndex = 1093 Me.CheckBox2.Text = "隱藏尺寸、材質" Me.CheckBox2.UseVisualStyleBackColor = True ' '一般月 ' Me.一般月.AutoSize = True Me.一般月.Location = New System.Drawing.Point(140, 31) Me.一般月.Name = "一般月" Me.一般月.Size = New System.Drawing.Size(63, 20) Me.一般月.TabIndex = 1100 Me.一般月.Text = "一般月" Me.一般月.UseVisualStyleBackColor = True ' '會計月 ' Me.會計月.AutoSize = True Me.會計月.Checked = True Me.會計月.CheckState = System.Windows.Forms.CheckState.Checked Me.會計月.Location = New System.Drawing.Point(29, 30) Me.會計月.Name = "會計月" Me.會計月.Size = New System.Drawing.Size(63, 20) Me.會計月.TabIndex = 1099 Me.會計月.Text = "會計月" Me.會計月.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(1914, 981) Me.Controls.Add(Me.一般月) Me.Controls.Add(Me.會計月) Me.Controls.Add(Me.CheckBox3) Me.Controls.Add(Me.CheckBox2) Me.Controls.Add(Me.Label7) Me.Controls.Add(Me.CheckBox1) Me.Controls.Add(Me.DataGridView2) Me.Controls.Add(Me.TextBox4) Me.Controls.Add(Me.TextBox1) Me.Controls.Add(Me.TextBox6) Me.Controls.Add(Me.TextBox10) Me.Controls.Add(Me.Label15) Me.Controls.Add(Me.TextBox13) Me.Controls.Add(Me.Label10) Me.Controls.Add(Me.DataGridView1) Me.Controls.Add(Me.Button2) Me.Controls.Add(Me.Button1) Me.Controls.Add(Me.Label20) Me.Controls.Add(Me.Label4) Me.Controls.Add(Me.DateTimePicker2) Me.Controls.Add(Me.DateTimePicker1) Me.Controls.Add(Me.Label22) 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.DataGridView1, System.ComponentModel.ISupportInitialize).EndInit() Me.ContextMenuStrip1.ResumeLayout(False) CType(Me.DataGridView2, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents TextBox4 As TextBox Friend WithEvents TextBox1 As TextBox Friend WithEvents TextBox6 As TextBox Friend WithEvents Label22 As Label Friend WithEvents TextBox10 As TextBox Friend WithEvents Label15 As Label Friend WithEvents TextBox13 As TextBox Friend WithEvents Label10 As Label Friend WithEvents Label7 As Label Friend WithEvents DataGridView1 As DataGridView Friend WithEvents Button2 As Button Friend WithEvents Button1 As Button Friend WithEvents Label20 As Label Friend WithEvents Label4 As Label Friend WithEvents DateTimePicker2 As DateTimePicker Friend WithEvents DateTimePicker1 As DateTimePicker Friend WithEvents ContextMenuStrip1 As ContextMenuStrip Friend WithEvents 重新整理ToolStripMenuItem As ToolStripMenuItem Friend WithEvents DataGridView2 As DataGridView Friend WithEvents CheckBox1 As CheckBox Friend WithEvents CheckBox3 As CheckBox Friend WithEvents CheckBox2 As CheckBox Friend WithEvents 一般月 As CheckBox Friend WithEvents 會計月 As CheckBox End Class