_ 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.請款已結束_ch = New System.Windows.Forms.CheckBox() Me.請款未結束_ch = New System.Windows.Forms.CheckBox() Me.全部資料_ch = New System.Windows.Forms.CheckBox() Me.驗收單_dgv = New System.Windows.Forms.DataGridView() Me.Label10 = New System.Windows.Forms.Label() Me.工程期1_ch = New System.Windows.Forms.ComboBox() Me.Label11 = New System.Windows.Forms.Label() Me.合約編號1_cb = New System.Windows.Forms.ComboBox() Me.查詢_bt = New System.Windows.Forms.Button() Me.關鍵字搜尋_tb = New System.Windows.Forms.TextBox() Me.Label7 = New System.Windows.Forms.Label() Me.合約工期_nud = New System.Windows.Forms.NumericUpDown() Me.Label4 = New System.Windows.Forms.Label() Me.工程天數_nud = New System.Windows.Forms.NumericUpDown() Me.Label3 = New System.Windows.Forms.Label() Me.日期差異_nud = New System.Windows.Forms.NumericUpDown() Me.Label1 = New System.Windows.Forms.Label() Me.立約日期_dtp = New System.Windows.Forms.DateTimePicker() Me.Label414 = New System.Windows.Forms.Label() Me.驗收日期_dtp = New System.Windows.Forms.DateTimePicker() Me.Label6 = New System.Windows.Forms.Label() Me.Label2 = New System.Windows.Forms.Label() Me.驗收完成_dtp = New System.Windows.Forms.DateTimePicker() Me.備註_tb = New System.Windows.Forms.TextBox() Me.Label5 = New System.Windows.Forms.Label() Me.驗收完成_bt = New System.Windows.Forms.Button() Me.Label8 = New System.Windows.Forms.Label() Me.合約編號_tb = New System.Windows.Forms.TextBox() Me.Label9 = New System.Windows.Forms.Label() Me.保固_cb = New System.Windows.Forms.ComboBox() Me.Label12 = New System.Windows.Forms.Label() Me.指定存檔_bt = New System.Windows.Forms.Button() Me.Panel1 = New System.Windows.Forms.Panel() Me.查閱文件_bt = New System.Windows.Forms.Button() CType(Me.驗收單_dgv, 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.Panel1.SuspendLayout() Me.SuspendLayout() ' '請款已結束_ch ' Me.請款已結束_ch.AutoSize = True Me.請款已結束_ch.ForeColor = System.Drawing.Color.Green Me.請款已結束_ch.Location = New System.Drawing.Point(8, 53) Me.請款已結束_ch.Name = "請款已結束_ch" Me.請款已結束_ch.Size = New System.Drawing.Size(86, 20) Me.請款已結束_ch.TabIndex = 1441 Me.請款已結束_ch.Text = "驗收已結束" Me.請款已結束_ch.UseVisualStyleBackColor = True ' '請款未結束_ch ' Me.請款未結束_ch.AutoSize = True Me.請款未結束_ch.ForeColor = System.Drawing.Color.Green Me.請款未結束_ch.Location = New System.Drawing.Point(8, 27) Me.請款未結束_ch.Name = "請款未結束_ch" Me.請款未結束_ch.Size = New System.Drawing.Size(86, 20) Me.請款未結束_ch.TabIndex = 1440 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.ForeColor = System.Drawing.Color.Green Me.全部資料_ch.Location = New System.Drawing.Point(8, 1) Me.全部資料_ch.Name = "全部資料_ch" Me.全部資料_ch.Size = New System.Drawing.Size(74, 20) Me.全部資料_ch.TabIndex = 1442 Me.全部資料_ch.Text = "全部資料" Me.全部資料_ch.UseVisualStyleBackColor = True ' '驗收單_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(2, 73) Me.驗收單_dgv.Name = "驗收單_dgv" Me.驗收單_dgv.RowHeadersWidth = 5 Me.驗收單_dgv.RowTemplate.Height = 24 Me.驗收單_dgv.Size = New System.Drawing.Size(1345, 606) Me.驗收單_dgv.TabIndex = 1443 ' 'Label10 ' Me.Label10.AutoSize = True Me.Label10.BackColor = System.Drawing.SystemColors.Control Me.Label10.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label10.Location = New System.Drawing.Point(3, 7) Me.Label10.Name = "Label10" Me.Label10.Size = New System.Drawing.Size(55, 16) Me.Label10.TabIndex = 1450 Me.Label10.Text = "工程期數" Me.Label10.TextAlign = System.Drawing.ContentAlignment.MiddleCenter ' '工程期1_ch ' Me.工程期1_ch.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.工程期1_ch.ForeColor = System.Drawing.Color.Blue Me.工程期1_ch.FormattingEnabled = True Me.工程期1_ch.Items.AddRange(New Object() {"", "第一期", "第二期", "第三期", "第四期", "第五期", "第六期", "第七期", "第八期", "第九期", "第十期"}) Me.工程期1_ch.Location = New System.Drawing.Point(60, 3) Me.工程期1_ch.Name = "工程期1_ch" Me.工程期1_ch.Size = New System.Drawing.Size(74, 24) Me.工程期1_ch.TabIndex = 1449 ' '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(102, 30) Me.Label11.Name = "Label11" Me.Label11.Size = New System.Drawing.Size(31, 16) Me.Label11.TabIndex = 1448 Me.Label11.Text = "甲方" Me.Label11.TextAlign = System.Drawing.ContentAlignment.MiddleCenter ' '合約編號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(134, 26) Me.合約編號1_cb.Name = "合約編號1_cb" Me.合約編號1_cb.Size = New System.Drawing.Size(125, 24) Me.合約編號1_cb.TabIndex = 1447 ' '查詢_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(233, 1) Me.查詢_bt.Name = "查詢_bt" Me.查詢_bt.Size = New System.Drawing.Size(26, 25) Me.查詢_bt.TabIndex = 1446 Me.查詢_bt.UseVisualStyleBackColor = True ' '關鍵字搜尋_tb ' Me.關鍵字搜尋_tb.Location = New System.Drawing.Point(134, 2) Me.關鍵字搜尋_tb.Name = "關鍵字搜尋_tb" Me.關鍵字搜尋_tb.Size = New System.Drawing.Size(99, 23) Me.關鍵字搜尋_tb.TabIndex = 1444 ' '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(103, 5) Me.Label7.Name = "Label7" Me.Label7.Size = New System.Drawing.Size(31, 16) Me.Label7.TabIndex = 1445 Me.Label7.Text = "搜尋" Me.Label7.TextAlign = System.Drawing.ContentAlignment.MiddleCenter ' '合約工期_nud ' Me.合約工期_nud.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.合約工期_nud.Location = New System.Drawing.Point(637, 0) Me.合約工期_nud.Maximum = New Decimal(New Integer() {1000000, 0, 0, 0}) Me.合約工期_nud.Minimum = New Decimal(New Integer() {1000000, 0, 0, -2147483648}) Me.合約工期_nud.Name = "合約工期_nud" Me.合約工期_nud.Size = New System.Drawing.Size(65, 23) Me.合約工期_nud.TabIndex = 1664 Me.合約工期_nud.TextAlign = System.Windows.Forms.HorizontalAlignment.Right Me.合約工期_nud.ThousandsSeparator = True ' 'Label4 ' Me.Label4.AutoSize = True Me.Label4.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label4.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.Label4.ImeMode = System.Windows.Forms.ImeMode.NoControl Me.Label4.Location = New System.Drawing.Point(575, 3) Me.Label4.Name = "Label4" Me.Label4.Size = New System.Drawing.Size(55, 16) Me.Label4.TabIndex = 1665 Me.Label4.Text = "合約工期" ' '工程天數_nud ' Me.工程天數_nud.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.工程天數_nud.Location = New System.Drawing.Point(487, 25) Me.工程天數_nud.Maximum = New Decimal(New Integer() {1000000, 0, 0, 0}) Me.工程天數_nud.Minimum = New Decimal(New Integer() {1000000, 0, 0, -2147483648}) Me.工程天數_nud.Name = "工程天數_nud" Me.工程天數_nud.Size = New System.Drawing.Size(87, 23) Me.工程天數_nud.TabIndex = 1662 Me.工程天數_nud.TextAlign = System.Windows.Forms.HorizontalAlignment.Right Me.工程天數_nud.ThousandsSeparator = True ' 'Label3 ' Me.Label3.AutoSize = True Me.Label3.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.Label3.ImeMode = System.Windows.Forms.ImeMode.NoControl Me.Label3.Location = New System.Drawing.Point(426, 28) Me.Label3.Name = "Label3" Me.Label3.Size = New System.Drawing.Size(55, 16) Me.Label3.TabIndex = 1663 Me.Label3.Text = "工程天數" ' '日期差異_nud ' Me.日期差異_nud.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.日期差異_nud.Location = New System.Drawing.Point(637, 49) Me.日期差異_nud.Maximum = New Decimal(New Integer() {1000000, 0, 0, 0}) Me.日期差異_nud.Minimum = New Decimal(New Integer() {1000000, 0, 0, -2147483648}) Me.日期差異_nud.Name = "日期差異_nud" Me.日期差異_nud.Size = New System.Drawing.Size(65, 23) Me.日期差異_nud.TabIndex = 1660 Me.日期差異_nud.TextAlign = System.Windows.Forms.HorizontalAlignment.Right Me.日期差異_nud.ThousandsSeparator = True ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label1.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.Label1.Location = New System.Drawing.Point(278, 29) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(55, 16) Me.Label1.TabIndex = 1659 Me.Label1.Text = "立約日期" ' '立約日期_dtp ' Me.立約日期_dtp.CustomFormat = "yyyy/MM/dd" Me.立約日期_dtp.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.立約日期_dtp.Format = System.Windows.Forms.DateTimePickerFormat.Custom Me.立約日期_dtp.Location = New System.Drawing.Point(335, 25) Me.立約日期_dtp.Name = "立約日期_dtp" Me.立約日期_dtp.Size = New System.Drawing.Size(87, 23) Me.立約日期_dtp.TabIndex = 1658 ' 'Label414 ' Me.Label414.AutoSize = True Me.Label414.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label414.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.Label414.Location = New System.Drawing.Point(278, 53) Me.Label414.Name = "Label414" Me.Label414.Size = New System.Drawing.Size(55, 16) Me.Label414.TabIndex = 1657 Me.Label414.Text = "驗收開始" ' '驗收日期_dtp ' Me.驗收日期_dtp.CustomFormat = "yyyy/MM/dd" Me.驗收日期_dtp.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.驗收日期_dtp.Format = System.Windows.Forms.DateTimePickerFormat.Custom Me.驗收日期_dtp.Location = New System.Drawing.Point(335, 49) Me.驗收日期_dtp.Name = "驗收日期_dtp" Me.驗收日期_dtp.Size = New System.Drawing.Size(87, 23) Me.驗收日期_dtp.TabIndex = 1656 ' 'Label6 ' Me.Label6.AutoSize = True Me.Label6.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label6.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.Label6.ImeMode = System.Windows.Forms.ImeMode.NoControl Me.Label6.Location = New System.Drawing.Point(575, 52) Me.Label6.Name = "Label6" Me.Label6.Size = New System.Drawing.Size(55, 16) Me.Label6.TabIndex = 1661 Me.Label6.Text = "日期差異" ' 'Label2 ' Me.Label2.AutoSize = True Me.Label2.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label2.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.Label2.Location = New System.Drawing.Point(427, 53) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(55, 16) Me.Label2.TabIndex = 1667 Me.Label2.Text = "驗收完成" ' '驗收完成_dtp ' Me.驗收完成_dtp.CustomFormat = "yyyy/MM/dd" Me.驗收完成_dtp.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.驗收完成_dtp.Format = System.Windows.Forms.DateTimePickerFormat.Custom Me.驗收完成_dtp.Location = New System.Drawing.Point(487, 49) Me.驗收完成_dtp.Name = "驗收完成_dtp" Me.驗收完成_dtp.Size = New System.Drawing.Size(87, 23) Me.驗收完成_dtp.TabIndex = 1666 ' '備註_tb ' Me.備註_tb.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.備註_tb.Location = New System.Drawing.Point(711, 17) Me.備註_tb.Multiline = True Me.備註_tb.Name = "備註_tb" Me.備註_tb.Size = New System.Drawing.Size(233, 54) Me.備註_tb.TabIndex = 1668 ' 'Label5 ' Me.Label5.AutoSize = True Me.Label5.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label5.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.Label5.Location = New System.Drawing.Point(708, 2) Me.Label5.Name = "Label5" Me.Label5.Size = New System.Drawing.Size(31, 16) Me.Label5.TabIndex = 1669 Me.Label5.Text = "備註" Me.Label5.TextAlign = System.Drawing.ContentAlignment.MiddleCenter ' '驗收完成_bt ' Me.驗收完成_bt.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) 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(946, 16) Me.驗收完成_bt.Name = "驗收完成_bt" Me.驗收完成_bt.Size = New System.Drawing.Size(75, 55) Me.驗收完成_bt.TabIndex = 1670 Me.驗收完成_bt.Text = "驗收完成" Me.驗收完成_bt.UseVisualStyleBackColor = True ' 'Label8 ' Me.Label8.AutoSize = True Me.Label8.BackColor = System.Drawing.SystemColors.Control Me.Label8.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label8.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.Label8.Location = New System.Drawing.Point(278, 5) Me.Label8.Name = "Label8" Me.Label8.Size = New System.Drawing.Size(55, 16) Me.Label8.TabIndex = 1672 Me.Label8.Text = "合約編號" Me.Label8.TextAlign = System.Drawing.ContentAlignment.MiddleCenter ' '合約編號_tb ' Me.合約編號_tb.Enabled = False Me.合約編號_tb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.合約編號_tb.Location = New System.Drawing.Point(335, 1) Me.合約編號_tb.Name = "合約編號_tb" Me.合約編號_tb.Size = New System.Drawing.Size(239, 23) Me.合約編號_tb.TabIndex = 1671 ' 'Label9 ' Me.Label9.AutoSize = True Me.Label9.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label9.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.Label9.Location = New System.Drawing.Point(576, 28) Me.Label9.Name = "Label9" Me.Label9.Size = New System.Drawing.Size(55, 16) Me.Label9.TabIndex = 1673 Me.Label9.Text = "保固期限" ' '保固_cb ' Me.保固_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.保固_cb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.保固_cb.ForeColor = System.Drawing.Color.Blue Me.保固_cb.FormattingEnabled = True Me.保固_cb.Items.AddRange(New Object() {"", "0", "1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12", "13", "14", "15", "16", "17", "18", "19", "20", "21", "22", "23", "24"}) Me.保固_cb.Location = New System.Drawing.Point(636, 24) Me.保固_cb.Name = "保固_cb" Me.保固_cb.Size = New System.Drawing.Size(45, 24) Me.保固_cb.TabIndex = 1674 ' 'Label12 ' Me.Label12.AutoSize = True Me.Label12.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label12.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.Label12.Location = New System.Drawing.Point(681, 29) Me.Label12.Name = "Label12" Me.Label12.Size = New System.Drawing.Size(19, 16) Me.Label12.TabIndex = 1675 Me.Label12.Text = "月" Me.Label12.TextAlign = System.Drawing.ContentAlignment.MiddleCenter ' '指定存檔_bt ' Me.指定存檔_bt.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) 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(1021, 16) Me.指定存檔_bt.Name = "指定存檔_bt" Me.指定存檔_bt.Size = New System.Drawing.Size(75, 55) Me.指定存檔_bt.TabIndex = 1676 Me.指定存檔_bt.Text = "工程主管指定存檔" Me.指定存檔_bt.UseVisualStyleBackColor = True ' 'Panel1 ' Me.Panel1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.Panel1.Controls.Add(Me.工程期1_ch) Me.Panel1.Controls.Add(Me.Label10) Me.Panel1.Location = New System.Drawing.Point(627, 246) Me.Panel1.Name = "Panel1" Me.Panel1.Size = New System.Drawing.Size(200, 100) Me.Panel1.TabIndex = 1677 Me.Panel1.Visible = False ' '查閱文件_bt ' Me.查閱文件_bt.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.查閱文件_bt.BackgroundImage = Global.HX_PGS_ERP_SYS.My.Resources.Resources.reports Me.查閱文件_bt.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom Me.查閱文件_bt.Font = New System.Drawing.Font("微軟正黑體", 9.0!, 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(1097, 16) Me.查閱文件_bt.Name = "查閱文件_bt" Me.查閱文件_bt.Size = New System.Drawing.Size(55, 55) Me.查閱文件_bt.TabIndex = 1748 Me.查閱文件_bt.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.查閱文件_bt) Me.Controls.Add(Me.Panel1) Me.Controls.Add(Me.指定存檔_bt) Me.Controls.Add(Me.保固_cb) Me.Controls.Add(Me.Label9) Me.Controls.Add(Me.Label8) Me.Controls.Add(Me.合約編號_tb) Me.Controls.Add(Me.驗收完成_bt) Me.Controls.Add(Me.備註_tb) Me.Controls.Add(Me.Label5) Me.Controls.Add(Me.Label2) Me.Controls.Add(Me.驗收完成_dtp) Me.Controls.Add(Me.合約工期_nud) Me.Controls.Add(Me.Label4) Me.Controls.Add(Me.Label3) Me.Controls.Add(Me.日期差異_nud) Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.立約日期_dtp) Me.Controls.Add(Me.Label414) Me.Controls.Add(Me.驗收日期_dtp) Me.Controls.Add(Me.Label6) Me.Controls.Add(Me.Label11) Me.Controls.Add(Me.合約編號1_cb) Me.Controls.Add(Me.查詢_bt) Me.Controls.Add(Me.關鍵字搜尋_tb) Me.Controls.Add(Me.Label7) Me.Controls.Add(Me.驗收單_dgv) Me.Controls.Add(Me.請款已結束_ch) Me.Controls.Add(Me.請款未結束_ch) Me.Controls.Add(Me.全部資料_ch) Me.Controls.Add(Me.Label12) Me.Controls.Add(Me.工程天數_nud) 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.合約工期_nud, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.工程天數_nud, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.日期差異_nud, System.ComponentModel.ISupportInitialize).EndInit() Me.Panel1.ResumeLayout(False) Me.Panel1.PerformLayout() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents 請款已結束_ch As CheckBox Friend WithEvents 請款未結束_ch As CheckBox Friend WithEvents 全部資料_ch As CheckBox Friend WithEvents 驗收單_dgv As DataGridView Friend WithEvents Label10 As Label Friend WithEvents 工程期1_ch As ComboBox Friend WithEvents Label11 As Label Friend WithEvents 合約編號1_cb As ComboBox Friend WithEvents 查詢_bt As Button Friend WithEvents 關鍵字搜尋_tb As TextBox Friend WithEvents Label7 As Label Friend WithEvents 合約工期_nud As NumericUpDown Friend WithEvents Label4 As Label Friend WithEvents 工程天數_nud As NumericUpDown Friend WithEvents Label3 As Label Friend WithEvents 日期差異_nud As NumericUpDown Friend WithEvents Label1 As Label Friend WithEvents 立約日期_dtp As DateTimePicker Friend WithEvents Label414 As Label Friend WithEvents 驗收日期_dtp As DateTimePicker Friend WithEvents Label6 As Label Friend WithEvents Label2 As Label Friend WithEvents 驗收完成_dtp As DateTimePicker Friend WithEvents 備註_tb As TextBox Friend WithEvents Label5 As Label Friend WithEvents 驗收完成_bt As Button Friend WithEvents Label8 As Label Friend WithEvents 合約編號_tb As TextBox Friend WithEvents Label9 As Label Friend WithEvents 保固_cb As ComboBox Friend WithEvents Label12 As Label Friend WithEvents 指定存檔_bt As Button Friend WithEvents Panel1 As Panel Friend WithEvents 查閱文件_bt As Button End Class