_ 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.Label7 = New System.Windows.Forms.Label() Me.關鍵字搜尋_tb = New System.Windows.Forms.TextBox() Me.合約編號1_cb = New System.Windows.Forms.ComboBox() Me.Label11 = New System.Windows.Forms.Label() Me.合約_dgv = New System.Windows.Forms.DataGridView() Me.查詢_bt = New System.Windows.Forms.Button() Me.全部資料_ch = New System.Windows.Forms.CheckBox() Me.報價放行_ch = New System.Windows.Forms.CheckBox() Me.報價簽回_ch = New System.Windows.Forms.CheckBox() Me.請款簽回_ch = New System.Windows.Forms.CheckBox() Me.驗收簽回_ch = New System.Windows.Forms.CheckBox() Me.合約簽回_ch = New System.Windows.Forms.CheckBox() Me.保固簽回_ch = New System.Windows.Forms.CheckBox() Me.報價未放行_ch = New System.Windows.Forms.CheckBox() Me.報價未簽回_ch = New System.Windows.Forms.CheckBox() Me.合約未簽回_ch = New System.Windows.Forms.CheckBox() Me.驗收未簽回_ch = New System.Windows.Forms.CheckBox() Me.保固未簽回_ch = New System.Windows.Forms.CheckBox() Me.請款未簽回_ch = New System.Windows.Forms.CheckBox() Me.報價未完成_ch = New System.Windows.Forms.CheckBox() Me.報價完成_ch = New System.Windows.Forms.CheckBox() Me.資料數_tb = New System.Windows.Forms.TextBox() Me.Label1 = New System.Windows.Forms.Label() Me.Label2 = New System.Windows.Forms.Label() CType(Me.合約_dgv, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'Label7 ' Me.Label7.AutoSize = True Me.Label7.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label7.Location = New System.Drawing.Point(3, 5) Me.Label7.Name = "Label7" Me.Label7.Size = New System.Drawing.Size(31, 16) Me.Label7.TabIndex = 1789 Me.Label7.Text = "搜尋" Me.Label7.TextAlign = System.Drawing.ContentAlignment.MiddleCenter ' '關鍵字搜尋_tb ' Me.關鍵字搜尋_tb.Location = New System.Drawing.Point(37, 2) Me.關鍵字搜尋_tb.Name = "關鍵字搜尋_tb" Me.關鍵字搜尋_tb.Size = New System.Drawing.Size(119, 23) Me.關鍵字搜尋_tb.TabIndex = 1788 ' '合約編號1_cb ' Me.合約編號1_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.合約編號1_cb.ForeColor = System.Drawing.Color.Blue Me.合約編號1_cb.FormattingEnabled = True Me.合約編號1_cb.Items.AddRange(New Object() {"", "第一期", "第二期", "第三期", "第四期", "第五期", "第六期", "第七期", "第八期", "第九期", "第十期"}) Me.合約編號1_cb.Location = New System.Drawing.Point(37, 27) Me.合約編號1_cb.Name = "合約編號1_cb" Me.合約編號1_cb.Size = New System.Drawing.Size(145, 24) Me.合約編號1_cb.TabIndex = 1791 ' 'Label11 ' Me.Label11.AutoSize = True Me.Label11.BackColor = System.Drawing.SystemColors.Control Me.Label11.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label11.Location = New System.Drawing.Point(4, 31) Me.Label11.Name = "Label11" Me.Label11.Size = New System.Drawing.Size(31, 16) Me.Label11.TabIndex = 1792 Me.Label11.Text = "甲方" Me.Label11.TextAlign = System.Drawing.ContentAlignment.MiddleCenter ' '合約_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(3, 80) Me.合約_dgv.Name = "合約_dgv" Me.合約_dgv.RowHeadersWidth = 5 Me.合約_dgv.RowTemplate.Height = 24 Me.合約_dgv.Size = New System.Drawing.Size(1344, 600) Me.合約_dgv.TabIndex = 1787 ' '查詢_bt ' Me.查詢_bt.BackgroundImage = Global.HX_PGS_ERP_SYS.My.Resources.Resources.下載 Me.查詢_bt.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom Me.查詢_bt.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.查詢_bt.Location = New System.Drawing.Point(156, 0) Me.查詢_bt.Name = "查詢_bt" Me.查詢_bt.Size = New System.Drawing.Size(26, 26) Me.查詢_bt.TabIndex = 1790 Me.查詢_bt.UseVisualStyleBackColor = True ' '全部資料_ch ' Me.全部資料_ch.AutoSize = True Me.全部資料_ch.Location = New System.Drawing.Point(37, 56) Me.全部資料_ch.Name = "全部資料_ch" Me.全部資料_ch.Size = New System.Drawing.Size(124, 20) Me.全部資料_ch.TabIndex = 1793 Me.全部資料_ch.Text = "全部資料 / Semua" Me.全部資料_ch.UseVisualStyleBackColor = True ' '報價放行_ch ' Me.報價放行_ch.AutoSize = True Me.報價放行_ch.ForeColor = System.Drawing.Color.Red Me.報價放行_ch.Location = New System.Drawing.Point(495, 2) Me.報價放行_ch.Name = "報價放行_ch" Me.報價放行_ch.Size = New System.Drawing.Size(163, 20) Me.報價放行_ch.TabIndex = 1794 Me.報價放行_ch.Text = "報價核准 / Ulasan lulus" Me.報價放行_ch.UseVisualStyleBackColor = True ' '報價簽回_ch ' Me.報價簽回_ch.AutoSize = True Me.報價簽回_ch.ForeColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(0, Byte), Integer)) Me.報價簽回_ch.Location = New System.Drawing.Point(774, 2) Me.報價簽回_ch.Name = "報價簽回_ch" Me.報價簽回_ch.Size = New System.Drawing.Size(239, 20) Me.報價簽回_ch.TabIndex = 1795 Me.報價簽回_ch.Text = "報價簽回 / Kutipan - Ditandatangani" Me.報價簽回_ch.UseVisualStyleBackColor = True ' '請款簽回_ch ' Me.請款簽回_ch.AutoSize = True Me.請款簽回_ch.ForeColor = System.Drawing.Color.Blue Me.請款簽回_ch.Location = New System.Drawing.Point(188, 41) Me.請款簽回_ch.Name = "請款簽回_ch" Me.請款簽回_ch.Size = New System.Drawing.Size(247, 20) Me.請款簽回_ch.TabIndex = 1796 Me.請款簽回_ch.Text = "請款簽回 / Pembayaran Ditandatangani" Me.請款簽回_ch.UseVisualStyleBackColor = True ' '驗收簽回_ch ' Me.驗收簽回_ch.AutoSize = True Me.驗收簽回_ch.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(0, Byte), Integer)) Me.驗收簽回_ch.Location = New System.Drawing.Point(495, 41) Me.驗收簽回_ch.Name = "驗收簽回_ch" Me.驗收簽回_ch.Size = New System.Drawing.Size(228, 20) Me.驗收簽回_ch.TabIndex = 1798 Me.驗收簽回_ch.Text = "驗收簽回 / Inspeksi - Ditandatangani" Me.驗收簽回_ch.UseVisualStyleBackColor = True ' '合約簽回_ch ' Me.合約簽回_ch.AutoSize = True Me.合約簽回_ch.ForeColor = System.Drawing.Color.Olive Me.合約簽回_ch.Location = New System.Drawing.Point(1053, 2) Me.合約簽回_ch.Name = "合約簽回_ch" Me.合約簽回_ch.Size = New System.Drawing.Size(227, 20) Me.合約簽回_ch.TabIndex = 1799 Me.合約簽回_ch.Text = "合約簽回 / Kontrak - Ditandatangani" Me.合約簽回_ch.UseVisualStyleBackColor = True ' '保固簽回_ch ' Me.保固簽回_ch.AutoSize = True Me.保固簽回_ch.ForeColor = System.Drawing.Color.Purple Me.保固簽回_ch.Location = New System.Drawing.Point(775, 41) Me.保固簽回_ch.Name = "保固簽回_ch" Me.保固簽回_ch.Size = New System.Drawing.Size(226, 20) Me.保固簽回_ch.TabIndex = 1801 Me.保固簽回_ch.Text = "保固簽回 / Garansi - Ditandatangani" Me.保固簽回_ch.UseVisualStyleBackColor = True ' '報價未放行_ch ' Me.報價未放行_ch.AutoSize = True Me.報價未放行_ch.ForeColor = System.Drawing.Color.Red Me.報價未放行_ch.Location = New System.Drawing.Point(495, 21) Me.報價未放行_ch.Name = "報價未放行_ch" Me.報價未放行_ch.Size = New System.Drawing.Size(178, 20) Me.報價未放行_ch.TabIndex = 1802 Me.報價未放行_ch.Text = "報價未核准 / Belum Ditinjau" Me.報價未放行_ch.UseVisualStyleBackColor = True ' '報價未簽回_ch ' Me.報價未簽回_ch.AutoSize = True Me.報價未簽回_ch.ForeColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(0, Byte), Integer)) Me.報價未簽回_ch.Location = New System.Drawing.Point(774, 21) Me.報價未簽回_ch.Name = "報價未簽回_ch" Me.報價未簽回_ch.Size = New System.Drawing.Size(273, 20) Me.報價未簽回_ch.TabIndex = 1803 Me.報價未簽回_ch.Text = "報價未簽回 / Kutipan - Tidak Ditandatangani" Me.報價未簽回_ch.UseVisualStyleBackColor = True ' '合約未簽回_ch ' Me.合約未簽回_ch.AutoSize = True Me.合約未簽回_ch.ForeColor = System.Drawing.Color.Olive Me.合約未簽回_ch.Location = New System.Drawing.Point(1053, 21) Me.合約未簽回_ch.Name = "合約未簽回_ch" Me.合約未簽回_ch.Size = New System.Drawing.Size(273, 20) Me.合約未簽回_ch.TabIndex = 1804 Me.合約未簽回_ch.Text = "合約未簽回 / Kontrak - Tidak Ditandatangani" Me.合約未簽回_ch.UseVisualStyleBackColor = True ' '驗收未簽回_ch ' Me.驗收未簽回_ch.AutoSize = True Me.驗收未簽回_ch.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(0, Byte), Integer)) Me.驗收未簽回_ch.Location = New System.Drawing.Point(495, 60) Me.驗收未簽回_ch.Name = "驗收未簽回_ch" Me.驗收未簽回_ch.Size = New System.Drawing.Size(240, 20) Me.驗收未簽回_ch.TabIndex = 1805 Me.驗收未簽回_ch.Text = "驗收未簽回 / Inspeksi - Ditandatangani" Me.驗收未簽回_ch.UseVisualStyleBackColor = True ' '保固未簽回_ch ' Me.保固未簽回_ch.AutoSize = True Me.保固未簽回_ch.ForeColor = System.Drawing.Color.Purple Me.保固未簽回_ch.Location = New System.Drawing.Point(775, 60) Me.保固未簽回_ch.Name = "保固未簽回_ch" Me.保固未簽回_ch.Size = New System.Drawing.Size(272, 20) Me.保固未簽回_ch.TabIndex = 1807 Me.保固未簽回_ch.Text = "保固未簽回 / Garansi - Tidak Ditandatangani" Me.保固未簽回_ch.UseVisualStyleBackColor = True ' '請款未簽回_ch ' Me.請款未簽回_ch.AutoSize = True Me.請款未簽回_ch.ForeColor = System.Drawing.Color.Blue Me.請款未簽回_ch.Location = New System.Drawing.Point(188, 60) Me.請款未簽回_ch.Name = "請款未簽回_ch" Me.請款未簽回_ch.Size = New System.Drawing.Size(301, 20) Me.請款未簽回_ch.TabIndex = 1806 Me.請款未簽回_ch.Text = "請款未簽回 / Pembayaran - Tidak Ditandatangani" Me.請款未簽回_ch.UseVisualStyleBackColor = True ' '報價未完成_ch ' Me.報價未完成_ch.AutoSize = True Me.報價未完成_ch.ForeColor = System.Drawing.Color.Black Me.報價未完成_ch.Location = New System.Drawing.Point(188, 21) Me.報價未完成_ch.Name = "報價未完成_ch" Me.報價未完成_ch.Size = New System.Drawing.Size(228, 20) Me.報價未完成_ch.TabIndex = 1809 Me.報價未完成_ch.Text = "報價未完成 / File Yang Belum Selesai" Me.報價未完成_ch.UseVisualStyleBackColor = True ' '報價完成_ch ' Me.報價完成_ch.AutoSize = True Me.報價完成_ch.Checked = True Me.報價完成_ch.CheckState = System.Windows.Forms.CheckState.Checked Me.報價完成_ch.ForeColor = System.Drawing.Color.Black Me.報價完成_ch.Location = New System.Drawing.Point(188, 2) Me.報價完成_ch.Name = "報價完成_ch" Me.報價完成_ch.Size = New System.Drawing.Size(175, 20) Me.報價完成_ch.TabIndex = 1808 Me.報價完成_ch.Text = "報價完成 / Berkas Selesai" Me.報價完成_ch.UseVisualStyleBackColor = True ' '資料數_tb ' Me.資料數_tb.BorderStyle = System.Windows.Forms.BorderStyle.None Me.資料數_tb.Location = New System.Drawing.Point(1210, 59) Me.資料數_tb.Name = "資料數_tb" Me.資料數_tb.Size = New System.Drawing.Size(70, 16) Me.資料數_tb.TabIndex = 1810 Me.資料數_tb.TextAlign = System.Windows.Forms.HorizontalAlignment.Center ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.BackColor = System.Drawing.SystemColors.Control Me.Label1.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label1.Location = New System.Drawing.Point(1189, 59) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(19, 16) Me.Label1.TabIndex = 1811 Me.Label1.Text = "共" Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter ' 'Label2 ' Me.Label2.AutoSize = True Me.Label2.BackColor = System.Drawing.SystemColors.Control Me.Label2.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label2.Location = New System.Drawing.Point(1283, 60) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(43, 16) Me.Label2.TabIndex = 1812 Me.Label2.Text = "筆資料" Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleCenter ' '合約文件簽核控制表 ' Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(1350, 681) Me.Controls.Add(Me.Label2) Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.資料數_tb) Me.Controls.Add(Me.報價未完成_ch) Me.Controls.Add(Me.報價完成_ch) Me.Controls.Add(Me.保固未簽回_ch) Me.Controls.Add(Me.請款未簽回_ch) Me.Controls.Add(Me.驗收未簽回_ch) Me.Controls.Add(Me.合約未簽回_ch) Me.Controls.Add(Me.報價未簽回_ch) Me.Controls.Add(Me.報價未放行_ch) Me.Controls.Add(Me.保固簽回_ch) Me.Controls.Add(Me.合約簽回_ch) Me.Controls.Add(Me.驗收簽回_ch) Me.Controls.Add(Me.請款簽回_ch) Me.Controls.Add(Me.報價簽回_ch) Me.Controls.Add(Me.報價放行_ch) Me.Controls.Add(Me.全部資料_ch) Me.Controls.Add(Me.Label7) Me.Controls.Add(Me.關鍵字搜尋_tb) Me.Controls.Add(Me.查詢_bt) Me.Controls.Add(Me.合約編號1_cb) Me.Controls.Add(Me.Label11) 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) Me.Name = "合約文件簽核控制表" Me.Text = "合約文件簽核控制表" CType(Me.合約_dgv, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents Label7 As Label Friend WithEvents 關鍵字搜尋_tb As TextBox Friend WithEvents 查詢_bt As Button Friend WithEvents 合約編號1_cb As ComboBox Friend WithEvents Label11 As Label Friend WithEvents 合約_dgv As DataGridView Friend WithEvents 全部資料_ch As CheckBox Friend WithEvents 報價放行_ch As CheckBox Friend WithEvents 報價簽回_ch As CheckBox Friend WithEvents 請款簽回_ch As CheckBox Friend WithEvents 驗收簽回_ch As CheckBox Friend WithEvents 合約簽回_ch As CheckBox Friend WithEvents 保固簽回_ch As CheckBox Friend WithEvents 報價未放行_ch As CheckBox Friend WithEvents 報價未簽回_ch As CheckBox Friend WithEvents 合約未簽回_ch As CheckBox Friend WithEvents 驗收未簽回_ch As CheckBox Friend WithEvents 保固未簽回_ch As CheckBox Friend WithEvents 請款未簽回_ch As CheckBox Friend WithEvents 報價未完成_ch As CheckBox Friend WithEvents 報價完成_ch As CheckBox Friend WithEvents 資料數_tb As TextBox Friend WithEvents Label1 As Label Friend WithEvents Label2 As Label End Class