_ 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 DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Me.Timer1 = New System.Windows.Forms.Timer(Me.components) Me.總金額_tb = New System.Windows.Forms.TextBox() Me.總金額_lb = New System.Windows.Forms.Label() Me.刪除1_bt = New System.Windows.Forms.Button() Me.修改存檔_bt = New System.Windows.Forms.Button() Me.修改_bt = New System.Windows.Forms.Button() Me.作廢的一般物料請購單_lb = New System.Windows.Forms.Label() Me.未核准_dgv = New System.Windows.Forms.DataGridView() Me.未審核的一般物料請購單_lb = New System.Windows.Forms.Label() Me.未審核_dgv = New System.Windows.Forms.DataGridView() Me.資料尚未存檔_lb = New System.Windows.Forms.Label() Me.項次_tb = New System.Windows.Forms.TextBox() Me.項次_lb = New System.Windows.Forms.Label() Me.選擇_lb = New System.Windows.Forms.Label() 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.明細_dgv = New System.Windows.Forms.DataGridView() Me.申請人_lb = New System.Windows.Forms.Label() Me.申請人_tb = New System.Windows.Forms.TextBox() Me.申請日期_lb = New System.Windows.Forms.Label() Me.一般物料請購單號_lb = New System.Windows.Forms.Label() Me.一般物料請購單號_tb = New System.Windows.Forms.TextBox() Me.申請日期_dtp = New System.Windows.Forms.DateTimePicker() CType(Me.未核准_dgv, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.未審核_dgv, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.明細_dgv, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'Timer1 ' Me.Timer1.Interval = 500 ' '總金額_tb ' Me.總金額_tb.Location = New System.Drawing.Point(667, 52) Me.總金額_tb.Name = "總金額_tb" Me.總金額_tb.Size = New System.Drawing.Size(111, 23) Me.總金額_tb.TabIndex = 801 ' '總金額_lb ' Me.總金額_lb.AutoSize = True Me.總金額_lb.Location = New System.Drawing.Point(617, 55) Me.總金額_lb.Name = "總金額_lb" Me.總金額_lb.Size = New System.Drawing.Size(44, 16) Me.總金額_lb.TabIndex = 800 Me.總金額_lb.Text = "總金額" ' '刪除1_bt ' Me.刪除1_bt.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.刪除1_bt.ForeColor = System.Drawing.Color.Red Me.刪除1_bt.Location = New System.Drawing.Point(1115, 2) Me.刪除1_bt.Name = "刪除1_bt" Me.刪除1_bt.Size = New System.Drawing.Size(85, 73) Me.刪除1_bt.TabIndex = 799 Me.刪除1_bt.Text = "刪除" Me.刪除1_bt.UseVisualStyleBackColor = True ' '修改存檔_bt ' Me.修改存檔_bt.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.修改存檔_bt.ForeColor = System.Drawing.Color.Green Me.修改存檔_bt.Location = New System.Drawing.Point(1031, 2) Me.修改存檔_bt.Name = "修改存檔_bt" Me.修改存檔_bt.Size = New System.Drawing.Size(85, 73) Me.修改存檔_bt.TabIndex = 798 Me.修改存檔_bt.Text = "修改存檔" Me.修改存檔_bt.UseVisualStyleBackColor = True ' '修改_bt ' Me.修改_bt.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.修改_bt.ForeColor = System.Drawing.Color.Green Me.修改_bt.Location = New System.Drawing.Point(947, 2) Me.修改_bt.Name = "修改_bt" Me.修改_bt.Size = New System.Drawing.Size(85, 73) Me.修改_bt.TabIndex = 797 Me.修改_bt.Text = "修改" Me.修改_bt.UseVisualStyleBackColor = True ' '作廢的一般物料請購單_lb ' Me.作廢的一般物料請購單_lb.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) Me.作廢的一般物料請購單_lb.AutoSize = True Me.作廢的一般物料請購單_lb.Location = New System.Drawing.Point(1, 402) Me.作廢的一般物料請購單_lb.Name = "作廢的一般物料請購單_lb" Me.作廢的一般物料請購單_lb.Size = New System.Drawing.Size(128, 16) Me.作廢的一般物料請購單_lb.TabIndex = 796 Me.作廢的一般物料請購單_lb.Text = "作廢的一般物料請購單" ' '未核准_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.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.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.未核准_dgv.Location = New System.Drawing.Point(4, 421) Me.未核准_dgv.Name = "未核准_dgv" Me.未核准_dgv.RowHeadersWidth = 5 Me.未核准_dgv.RowTemplate.Height = 24 Me.未核准_dgv.Size = New System.Drawing.Size(335, 257) Me.未核准_dgv.TabIndex = 795 ' '未審核的一般物料請購單_lb ' Me.未審核的一般物料請購單_lb.AutoSize = True Me.未審核的一般物料請購單_lb.Location = New System.Drawing.Point(4, 3) Me.未審核的一般物料請購單_lb.Name = "未審核的一般物料請購單_lb" Me.未審核的一般物料請購單_lb.Size = New System.Drawing.Size(140, 16) Me.未審核的一般物料請購單_lb.TabIndex = 794 Me.未審核的一般物料請購單_lb.Text = "未審核的一般物料請購單" ' '未審核_dgv ' DataGridViewCellStyle2.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer)) Me.未審核_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle2 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.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.未審核_dgv.Location = New System.Drawing.Point(4, 22) Me.未審核_dgv.Name = "未審核_dgv" Me.未審核_dgv.RowHeadersWidth = 5 Me.未審核_dgv.RowTemplate.Height = 24 Me.未審核_dgv.Size = New System.Drawing.Size(335, 377) Me.未審核_dgv.TabIndex = 793 ' '資料尚未存檔_lb ' Me.資料尚未存檔_lb.AutoSize = True Me.資料尚未存檔_lb.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.資料尚未存檔_lb.ForeColor = System.Drawing.Color.Red Me.資料尚未存檔_lb.Location = New System.Drawing.Point(1206, 5) Me.資料尚未存檔_lb.Name = "資料尚未存檔_lb" Me.資料尚未存檔_lb.Size = New System.Drawing.Size(34, 51) Me.資料尚未存檔_lb.TabIndex = 792 Me.資料尚未存檔_lb.Text = "資料" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "尚未" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "存檔" Me.資料尚未存檔_lb.Visible = False ' '項次_tb ' Me.項次_tb.Location = New System.Drawing.Point(527, 51) Me.項次_tb.Name = "項次_tb" Me.項次_tb.Size = New System.Drawing.Size(50, 23) Me.項次_tb.TabIndex = 791 ' '項次_lb ' Me.項次_lb.AutoSize = True Me.項次_lb.Location = New System.Drawing.Point(579, 55) Me.項次_lb.Name = "項次_lb" Me.項次_lb.Size = New System.Drawing.Size(32, 16) Me.項次_lb.TabIndex = 790 Me.項次_lb.Text = "項次" ' '選擇_lb ' Me.選擇_lb.AutoSize = True Me.選擇_lb.Location = New System.Drawing.Point(494, 55) Me.選擇_lb.Name = "選擇_lb" Me.選擇_lb.Size = New System.Drawing.Size(32, 16) Me.選擇_lb.TabIndex = 789 Me.選擇_lb.Text = "選擇" ' '刪除_bt ' Me.刪除_bt.ForeColor = System.Drawing.Color.Red Me.刪除_bt.Location = New System.Drawing.Point(418, 51) Me.刪除_bt.Name = "刪除_bt" Me.刪除_bt.Size = New System.Drawing.Size(75, 23) Me.刪除_bt.TabIndex = 788 Me.刪除_bt.Text = "刪除" Me.刪除_bt.UseVisualStyleBackColor = True ' '新增_bt ' Me.新增_bt.Location = New System.Drawing.Point(342, 51) Me.新增_bt.Name = "新增_bt" Me.新增_bt.Size = New System.Drawing.Size(75, 23) Me.新增_bt.TabIndex = 787 Me.新增_bt.Text = "新增" Me.新增_bt.UseVisualStyleBackColor = True ' '申請完成_bt ' Me.申請完成_bt.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.申請完成_bt.Location = New System.Drawing.Point(863, 2) Me.申請完成_bt.Name = "申請完成_bt" Me.申請完成_bt.Size = New System.Drawing.Size(85, 73) Me.申請完成_bt.TabIndex = 786 Me.申請完成_bt.Text = "申請完成" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) Me.申請完成_bt.UseVisualStyleBackColor = True ' '開立一般物料請購單_bt ' Me.開立一般物料請購單_bt.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.開立一般物料請購單_bt.Location = New System.Drawing.Point(779, 2) Me.開立一般物料請購單_bt.Name = "開立一般物料請購單_bt" Me.開立一般物料請購單_bt.Size = New System.Drawing.Size(85, 73) Me.開立一般物料請購單_bt.TabIndex = 785 Me.開立一般物料請購單_bt.Text = "開立一般物料請購單" Me.開立一般物料請購單_bt.UseVisualStyleBackColor = True ' '明細_dgv ' DataGridViewCellStyle3.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer)) Me.明細_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle3 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(342, 77) Me.明細_dgv.Name = "明細_dgv" Me.明細_dgv.RowHeadersWidth = 5 DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.明細_dgv.RowsDefaultCellStyle = DataGridViewCellStyle4 Me.明細_dgv.RowTemplate.Height = 24 Me.明細_dgv.Size = New System.Drawing.Size(1002, 601) Me.明細_dgv.TabIndex = 784 ' '申請人_lb ' Me.申請人_lb.AutoSize = True Me.申請人_lb.Location = New System.Drawing.Point(399, 29) Me.申請人_lb.Name = "申請人_lb" Me.申請人_lb.Size = New System.Drawing.Size(44, 16) Me.申請人_lb.TabIndex = 783 Me.申請人_lb.Text = "申請人" ' '申請人_tb ' Me.申請人_tb.Location = New System.Drawing.Point(449, 26) Me.申請人_tb.Name = "申請人_tb" Me.申請人_tb.Size = New System.Drawing.Size(165, 23) Me.申請人_tb.TabIndex = 782 ' '申請日期_lb ' Me.申請日期_lb.AutoSize = True Me.申請日期_lb.Location = New System.Drawing.Point(620, 29) Me.申請日期_lb.Name = "申請日期_lb" Me.申請日期_lb.Size = New System.Drawing.Size(56, 16) Me.申請日期_lb.TabIndex = 781 Me.申請日期_lb.Text = "申請日期" ' '一般物料請購單號_lb ' Me.一般物料請購單號_lb.AutoSize = True Me.一般物料請購單號_lb.Location = New System.Drawing.Point(339, 5) Me.一般物料請購單號_lb.Name = "一般物料請購單號_lb" Me.一般物料請購單號_lb.Size = New System.Drawing.Size(104, 16) Me.一般物料請購單號_lb.TabIndex = 779 Me.一般物料請購單號_lb.Text = "一般物料請購單號" ' '一般物料請購單號_tb ' Me.一般物料請購單號_tb.Location = New System.Drawing.Point(449, 2) Me.一般物料請購單號_tb.Name = "一般物料請購單號_tb" Me.一般物料請購單號_tb.Size = New System.Drawing.Size(329, 23) Me.一般物料請購單號_tb.TabIndex = 778 ' '申請日期_dtp ' Me.申請日期_dtp.Format = System.Windows.Forms.DateTimePickerFormat.[Short] Me.申請日期_dtp.Location = New System.Drawing.Point(682, 26) Me.申請日期_dtp.Name = "申請日期_dtp" Me.申請日期_dtp.Size = New System.Drawing.Size(96, 23) Me.申請日期_dtp.TabIndex = 802 ' '一般物料請購單申請 ' 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.申請日期_dtp) Me.Controls.Add(Me.總金額_tb) Me.Controls.Add(Me.總金額_lb) Me.Controls.Add(Me.刪除1_bt) Me.Controls.Add(Me.修改存檔_bt) Me.Controls.Add(Me.修改_bt) Me.Controls.Add(Me.作廢的一般物料請購單_lb) Me.Controls.Add(Me.未核准_dgv) Me.Controls.Add(Me.未審核的一般物料請購單_lb) Me.Controls.Add(Me.未審核_dgv) Me.Controls.Add(Me.資料尚未存檔_lb) Me.Controls.Add(Me.項次_tb) Me.Controls.Add(Me.項次_lb) Me.Controls.Add(Me.選擇_lb) Me.Controls.Add(Me.刪除_bt) Me.Controls.Add(Me.新增_bt) Me.Controls.Add(Me.申請完成_bt) Me.Controls.Add(Me.開立一般物料請購單_bt) Me.Controls.Add(Me.明細_dgv) Me.Controls.Add(Me.申請人_lb) Me.Controls.Add(Me.申請人_tb) Me.Controls.Add(Me.申請日期_lb) Me.Controls.Add(Me.一般物料請購單號_lb) Me.Controls.Add(Me.一般物料請購單號_tb) 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.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents Timer1 As Timer Friend WithEvents 總金額_tb As TextBox Friend WithEvents 總金額_lb As Label Friend WithEvents 刪除1_bt As Button Friend WithEvents 修改存檔_bt As Button Friend WithEvents 修改_bt As Button Friend WithEvents 作廢的一般物料請購單_lb As Label Friend WithEvents 未核准_dgv As DataGridView Friend WithEvents 未審核的一般物料請購單_lb As Label Friend WithEvents 未審核_dgv As DataGridView Friend WithEvents 資料尚未存檔_lb As Label Friend WithEvents 項次_tb As TextBox Friend WithEvents 項次_lb As Label Friend WithEvents 選擇_lb As Label Friend WithEvents 刪除_bt As Button Friend WithEvents 新增_bt As Button Friend WithEvents 申請完成_bt As Button Friend WithEvents 開立一般物料請購單_bt As Button Friend WithEvents 明細_dgv As DataGridView Friend WithEvents 申請人_lb As Label Friend WithEvents 申請人_tb As TextBox Friend WithEvents 申請日期_lb As Label Friend WithEvents 一般物料請購單號_lb As Label Friend WithEvents 一般物料請購單號_tb As TextBox Friend WithEvents 申請日期_dtp As DateTimePicker End Class