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() Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim ChartArea1 As System.Windows.Forms.DataVisualization.Charting.ChartArea = New System.Windows.Forms.DataVisualization.Charting.ChartArea() Dim Legend1 As System.Windows.Forms.DataVisualization.Charting.Legend = New System.Windows.Forms.DataVisualization.Charting.Legend() Dim Series1 As System.Windows.Forms.DataVisualization.Charting.Series = New System.Windows.Forms.DataVisualization.Charting.Series() Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle7 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle8 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Me.清單_dgv = New System.Windows.Forms.DataGridView() Me.工程執行主管_cb = New System.Windows.Forms.ComboBox() Me.工程執行主管_lb = New System.Windows.Forms.Label() Me.報工日期_dtp = New System.Windows.Forms.DateTimePicker() 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.TabControl1 = New System.Windows.Forms.TabControl() Me.控制表_tp = New System.Windows.Forms.TabPage() Me.已完工顯示_ch = New System.Windows.Forms.CheckBox() Me.合約編號2_tb = New System.Windows.Forms.TextBox() Me.合約編號清單2_bt = New System.Windows.Forms.Button() Me.合約編號2_cb = New System.Windows.Forms.ComboBox() Me.甲方_lb = New System.Windows.Forms.Label() Me.彙總表_tp = New System.Windows.Forms.TabPage() Me.合約編號_tb = New System.Windows.Forms.TextBox() Me.合約編號清單_bt = New System.Windows.Forms.Button() Me.合約編號1_cb = New System.Windows.Forms.ComboBox() Me.工程執行主管1_cb = New System.Windows.Forms.ComboBox() Me.Chart3 = New System.Windows.Forms.DataVisualization.Charting.Chart() Me.查詢日期1_cb = New System.Windows.Forms.ComboBox() Me.查詢日期_cb = New System.Windows.Forms.ComboBox() Me.彙總_dgv = New System.Windows.Forms.DataGridView() Me.派工月份_lb = New System.Windows.Forms.Label() Me.工程執行主管1_lb = New System.Windows.Forms.Label() Me.甲方1_lb = New System.Windows.Forms.Label() Me.語轉扭_bt = New System.Windows.Forms.Button() Me.Panel1 = New System.Windows.Forms.Panel() Me.語言_dgv = New System.Windows.Forms.DataGridView() Me.進度表清單_dgv = New System.Windows.Forms.DataGridView() Me.日期_dgv = New System.Windows.Forms.DataGridView() Me.主管_cb = New System.Windows.Forms.ComboBox() CType(Me.清單_dgv, System.ComponentModel.ISupportInitialize).BeginInit() Me.TabControl1.SuspendLayout() Me.控制表_tp.SuspendLayout() Me.彙總表_tp.SuspendLayout() CType(Me.Chart3, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.彙總_dgv, System.ComponentModel.ISupportInitialize).BeginInit() Me.Panel1.SuspendLayout() CType(Me.語言_dgv, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.進度表清單_dgv, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.日期_dgv, 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 DataGridViewCellStyle1.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft DataGridViewCellStyle1.BackColor = System.Drawing.SystemColors.Control DataGridViewCellStyle1.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) DataGridViewCellStyle1.ForeColor = System.Drawing.SystemColors.WindowText DataGridViewCellStyle1.SelectionBackColor = System.Drawing.SystemColors.Highlight DataGridViewCellStyle1.SelectionForeColor = System.Drawing.SystemColors.HighlightText Me.清單_dgv.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle1 Me.清單_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.清單_dgv.Location = New System.Drawing.Point(3, 30) Me.清單_dgv.Name = "清單_dgv" Me.清單_dgv.RowHeadersWidth = 5 DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.清單_dgv.RowsDefaultCellStyle = DataGridViewCellStyle2 Me.清單_dgv.RowTemplate.Height = 24 Me.清單_dgv.Size = New System.Drawing.Size(1332, 613) Me.清單_dgv.TabIndex = 229 ' '工程執行主管_cb ' Me.工程執行主管_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.Simple Me.工程執行主管_cb.ForeColor = System.Drawing.Color.Blue Me.工程執行主管_cb.FormattingEnabled = True Me.工程執行主管_cb.Items.AddRange(New Object() {"HX", "PGS"}) Me.工程執行主管_cb.Location = New System.Drawing.Point(88, 3) Me.工程執行主管_cb.Name = "工程執行主管_cb" Me.工程執行主管_cb.Size = New System.Drawing.Size(212, 24) Me.工程執行主管_cb.TabIndex = 1445 ' '工程執行主管_lb ' Me.工程執行主管_lb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Bold) Me.工程執行主管_lb.ForeColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer)) Me.工程執行主管_lb.Location = New System.Drawing.Point(1, 7) Me.工程執行主管_lb.Name = "工程執行主管_lb" Me.工程執行主管_lb.Size = New System.Drawing.Size(89, 16) Me.工程執行主管_lb.TabIndex = 1444 Me.工程執行主管_lb.Text = "Manajer Situs" Me.工程執行主管_lb.TextAlign = System.Drawing.ContentAlignment.MiddleRight ' '報工日期_dtp ' Me.報工日期_dtp.CustomFormat = "yyyy/MM/dd" Me.報工日期_dtp.Format = System.Windows.Forms.DateTimePickerFormat.Custom Me.報工日期_dtp.Location = New System.Drawing.Point(795, 3) Me.報工日期_dtp.Name = "報工日期_dtp" Me.報工日期_dtp.Size = New System.Drawing.Size(88, 23) Me.報工日期_dtp.TabIndex = 1448 ' '報工日期_lb ' Me.報工日期_lb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.報工日期_lb.ForeColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.報工日期_lb.Location = New System.Drawing.Point(690, 6) Me.報工日期_lb.Name = "報工日期_lb" Me.報工日期_lb.Size = New System.Drawing.Size(107, 16) Me.報工日期_lb.TabIndex = 1447 Me.報工日期_lb.Text = "報工日期" Me.報工日期_lb.TextAlign = System.Drawing.ContentAlignment.MiddleRight ' '今天_bt ' 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.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.今天_bt.Location = New System.Drawing.Point(960, 2) Me.今天_bt.Name = "今天_bt" Me.今天_bt.Size = New System.Drawing.Size(75, 25) Me.今天_bt.TabIndex = 1545 Me.今天_bt.Text = "今天" Me.今天_bt.UseVisualStyleBackColor = True ' '下一天_bt ' 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.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.下一天_bt.Location = New System.Drawing.Point(1035, 2) Me.下一天_bt.Name = "下一天_bt" Me.下一天_bt.Size = New System.Drawing.Size(75, 25) Me.下一天_bt.TabIndex = 1544 Me.下一天_bt.Text = "下一天" Me.下一天_bt.UseVisualStyleBackColor = True ' '上一天_bt ' 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.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.上一天_bt.Location = New System.Drawing.Point(885, 2) Me.上一天_bt.Name = "上一天_bt" Me.上一天_bt.Size = New System.Drawing.Size(75, 25) Me.上一天_bt.TabIndex = 1543 Me.上一天_bt.Text = "上一天" Me.上一天_bt.UseVisualStyleBackColor = True ' '指定存檔_bt ' 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(1112, 2) Me.指定存檔_bt.Name = "指定存檔_bt" Me.指定存檔_bt.Size = New System.Drawing.Size(75, 25) Me.指定存檔_bt.TabIndex = 1677 Me.指定存檔_bt.Text = "存檔" Me.指定存檔_bt.UseVisualStyleBackColor = True ' 'TabControl1 ' Me.TabControl1.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.TabControl1.Appearance = System.Windows.Forms.TabAppearance.Buttons Me.TabControl1.Controls.Add(Me.控制表_tp) Me.TabControl1.Controls.Add(Me.彙總表_tp) Me.TabControl1.Location = New System.Drawing.Point(-1, 1) Me.TabControl1.Name = "TabControl1" Me.TabControl1.SelectedIndex = 0 Me.TabControl1.Size = New System.Drawing.Size(1349, 680) Me.TabControl1.TabIndex = 1678 ' '控制表_tp ' Me.控制表_tp.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D Me.控制表_tp.Controls.Add(Me.已完工顯示_ch) Me.控制表_tp.Controls.Add(Me.指定存檔_bt) Me.控制表_tp.Controls.Add(Me.今天_bt) Me.控制表_tp.Controls.Add(Me.工程執行主管_cb) Me.控制表_tp.Controls.Add(Me.下一天_bt) Me.控制表_tp.Controls.Add(Me.上一天_bt) Me.控制表_tp.Controls.Add(Me.報工日期_dtp) Me.控制表_tp.Controls.Add(Me.合約編號2_tb) Me.控制表_tp.Controls.Add(Me.合約編號清單2_bt) Me.控制表_tp.Controls.Add(Me.合約編號2_cb) Me.控制表_tp.Controls.Add(Me.報工日期_lb) Me.控制表_tp.Controls.Add(Me.甲方_lb) Me.控制表_tp.Controls.Add(Me.工程執行主管_lb) Me.控制表_tp.Controls.Add(Me.清單_dgv) Me.控制表_tp.Location = New System.Drawing.Point(4, 28) Me.控制表_tp.Name = "控制表_tp" Me.控制表_tp.Padding = New System.Windows.Forms.Padding(3) Me.控制表_tp.Size = New System.Drawing.Size(1341, 648) Me.控制表_tp.TabIndex = 0 Me.控制表_tp.Text = "派工人數控制表" Me.控制表_tp.UseVisualStyleBackColor = True ' '已完工顯示_ch ' Me.已完工顯示_ch.AutoSize = True Me.已完工顯示_ch.Location = New System.Drawing.Point(1190, 4) Me.已完工顯示_ch.Name = "已完工顯示_ch" Me.已完工顯示_ch.Size = New System.Drawing.Size(98, 20) Me.已完工顯示_ch.TabIndex = 1682 Me.已完工顯示_ch.Text = "顯示關閉資料" Me.已完工顯示_ch.UseVisualStyleBackColor = True ' '合約編號2_tb ' Me.合約編號2_tb.Location = New System.Drawing.Point(441, 4) Me.合約編號2_tb.Name = "合約編號2_tb" Me.合約編號2_tb.Size = New System.Drawing.Size(125, 23) Me.合約編號2_tb.TabIndex = 1681 ' '合約編號清單2_bt ' Me.合約編號清單2_bt.BackColor = System.Drawing.SystemColors.Control Me.合約編號清單2_bt.Location = New System.Drawing.Point(567, 2) Me.合約編號清單2_bt.Name = "合約編號清單2_bt" Me.合約編號清單2_bt.Size = New System.Drawing.Size(121, 26) Me.合約編號清單2_bt.TabIndex = 1678 Me.合約編號清單2_bt.Text = "合約編號清單" Me.合約編號清單2_bt.UseVisualStyleBackColor = False ' '合約編號2_cb ' Me.合約編號2_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.Simple Me.合約編號2_cb.ForeColor = System.Drawing.Color.Blue Me.合約編號2_cb.FormattingEnabled = True Me.合約編號2_cb.Items.AddRange(New Object() {"", "第一期", "第二期", "第三期", "第四期", "第五期", "第六期", "第七期", "第八期", "第九期", "第十期"}) Me.合約編號2_cb.Location = New System.Drawing.Point(366, 3) Me.合約編號2_cb.Name = "合約編號2_cb" Me.合約編號2_cb.Size = New System.Drawing.Size(74, 24) Me.合約編號2_cb.TabIndex = 1679 ' '甲方_lb ' Me.甲方_lb.BackColor = System.Drawing.SystemColors.Control Me.甲方_lb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.甲方_lb.Location = New System.Drawing.Point(305, 7) Me.甲方_lb.Name = "甲方_lb" Me.甲方_lb.Size = New System.Drawing.Size(62, 16) Me.甲方_lb.TabIndex = 1680 Me.甲方_lb.Text = "Partai A :" Me.甲方_lb.TextAlign = System.Drawing.ContentAlignment.MiddleRight ' '彙總表_tp ' Me.彙總表_tp.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D Me.彙總表_tp.Controls.Add(Me.合約編號_tb) Me.彙總表_tp.Controls.Add(Me.合約編號清單_bt) Me.彙總表_tp.Controls.Add(Me.合約編號1_cb) Me.彙總表_tp.Controls.Add(Me.工程執行主管1_cb) Me.彙總表_tp.Controls.Add(Me.Chart3) Me.彙總表_tp.Controls.Add(Me.查詢日期1_cb) Me.彙總表_tp.Controls.Add(Me.查詢日期_cb) Me.彙總表_tp.Controls.Add(Me.彙總_dgv) Me.彙總表_tp.Controls.Add(Me.派工月份_lb) Me.彙總表_tp.Controls.Add(Me.工程執行主管1_lb) Me.彙總表_tp.Controls.Add(Me.甲方1_lb) Me.彙總表_tp.Location = New System.Drawing.Point(4, 28) Me.彙總表_tp.Name = "彙總表_tp" Me.彙總表_tp.Padding = New System.Windows.Forms.Padding(3) Me.彙總表_tp.Size = New System.Drawing.Size(1341, 648) Me.彙總表_tp.TabIndex = 1 Me.彙總表_tp.Text = "派工人數彙總表" Me.彙總表_tp.UseVisualStyleBackColor = True ' '合約編號_tb ' Me.合約編號_tb.Location = New System.Drawing.Point(745, 3) Me.合約編號_tb.Name = "合約編號_tb" Me.合約編號_tb.Size = New System.Drawing.Size(125, 23) Me.合約編號_tb.TabIndex = 1451 ' '合約編號清單_bt ' Me.合約編號清單_bt.BackColor = System.Drawing.SystemColors.Control Me.合約編號清單_bt.Location = New System.Drawing.Point(873, 1) Me.合約編號清單_bt.Name = "合約編號清單_bt" Me.合約編號清單_bt.Size = New System.Drawing.Size(121, 26) Me.合約編號清單_bt.TabIndex = 1448 Me.合約編號清單_bt.Text = "合約編號清單" Me.合約編號清單_bt.UseVisualStyleBackColor = False ' '合約編號1_cb ' Me.合約編號1_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.Simple 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(668, 2) Me.合約編號1_cb.Name = "合約編號1_cb" Me.合約編號1_cb.Size = New System.Drawing.Size(74, 24) Me.合約編號1_cb.TabIndex = 1449 ' '工程執行主管1_cb ' Me.工程執行主管1_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.Simple Me.工程執行主管1_cb.ForeColor = System.Drawing.Color.Blue Me.工程執行主管1_cb.FormattingEnabled = True Me.工程執行主管1_cb.Items.AddRange(New Object() {"HX", "PGS"}) Me.工程執行主管1_cb.Location = New System.Drawing.Point(300, 2) Me.工程執行主管1_cb.Name = "工程執行主管1_cb" Me.工程執行主管1_cb.Size = New System.Drawing.Size(295, 24) Me.工程執行主管1_cb.TabIndex = 1447 ' 'Chart3 ' Me.Chart3.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Chart3.BackColor = System.Drawing.Color.Transparent ChartArea1.Name = "ChartArea1" Me.Chart3.ChartAreas.Add(ChartArea1) Legend1.Name = "Legend1" Me.Chart3.Legends.Add(Legend1) Me.Chart3.Location = New System.Drawing.Point(1, 450) Me.Chart3.Name = "Chart3" Series1.ChartArea = "ChartArea1" Series1.Legend = "Legend1" Series1.Name = "Series1" Series1.YValuesPerPoint = 6 Me.Chart3.Series.Add(Series1) Me.Chart3.Size = New System.Drawing.Size(1333, 196) Me.Chart3.TabIndex = 1443 Me.Chart3.Text = "Chart3" ' '查詢日期1_cb ' Me.查詢日期1_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.Simple Me.查詢日期1_cb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.查詢日期1_cb.FormattingEnabled = True Me.查詢日期1_cb.Items.AddRange(New Object() {"01", "02", "03", "04", "05", "06", "07", "08", "09", "10", "11", "12"}) Me.查詢日期1_cb.Location = New System.Drawing.Point(158, 2) Me.查詢日期1_cb.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.查詢日期1_cb.Name = "查詢日期1_cb" Me.查詢日期1_cb.Size = New System.Drawing.Size(40, 24) Me.查詢日期1_cb.TabIndex = 1441 ' '查詢日期_cb ' Me.查詢日期_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.Simple Me.查詢日期_cb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.查詢日期_cb.FormattingEnabled = True Me.查詢日期_cb.Items.AddRange(New Object() {"2019"}) Me.查詢日期_cb.Location = New System.Drawing.Point(101, 2) Me.查詢日期_cb.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.查詢日期_cb.Name = "查詢日期_cb" Me.查詢日期_cb.Size = New System.Drawing.Size(56, 24) Me.查詢日期_cb.TabIndex = 1440 ' '彙總_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 DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft DataGridViewCellStyle3.BackColor = System.Drawing.SystemColors.Control DataGridViewCellStyle3.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) DataGridViewCellStyle3.ForeColor = System.Drawing.SystemColors.WindowText DataGridViewCellStyle3.SelectionBackColor = System.Drawing.SystemColors.Highlight DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText Me.彙總_dgv.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle3 Me.彙總_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.彙總_dgv.Location = New System.Drawing.Point(2, 30) 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(1332, 414) Me.彙總_dgv.TabIndex = 230 ' '派工月份_lb ' Me.派工月份_lb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.派工月份_lb.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.派工月份_lb.Location = New System.Drawing.Point(7, 6) Me.派工月份_lb.Name = "派工月份_lb" Me.派工月份_lb.Size = New System.Drawing.Size(96, 16) Me.派工月份_lb.TabIndex = 1439 Me.派工月份_lb.Text = "派工月份" Me.派工月份_lb.TextAlign = System.Drawing.ContentAlignment.MiddleRight ' '工程執行主管1_lb ' Me.工程執行主管1_lb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Bold) Me.工程執行主管1_lb.ForeColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer)) Me.工程執行主管1_lb.Location = New System.Drawing.Point(197, 6) Me.工程執行主管1_lb.Name = "工程執行主管1_lb" Me.工程執行主管1_lb.Size = New System.Drawing.Size(103, 16) Me.工程執行主管1_lb.TabIndex = 1446 Me.工程執行主管1_lb.Text = "工程執行主管" Me.工程執行主管1_lb.TextAlign = System.Drawing.ContentAlignment.MiddleRight ' '甲方1_lb ' Me.甲方1_lb.BackColor = System.Drawing.SystemColors.Control Me.甲方1_lb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.甲方1_lb.Location = New System.Drawing.Point(602, 6) Me.甲方1_lb.Name = "甲方1_lb" Me.甲方1_lb.Size = New System.Drawing.Size(62, 16) Me.甲方1_lb.TabIndex = 1450 Me.甲方1_lb.Text = "甲方簡稱 :" Me.甲方1_lb.TextAlign = System.Drawing.ContentAlignment.MiddleRight ' '語轉扭_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.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.語轉扭_bt.ForeColor = System.Drawing.Color.Black Me.語轉扭_bt.Location = New System.Drawing.Point(309, 3) Me.語轉扭_bt.Name = "語轉扭_bt" Me.語轉扭_bt.Size = New System.Drawing.Size(23, 23) Me.語轉扭_bt.TabIndex = 1715 Me.語轉扭_bt.Text = "L" Me.語轉扭_bt.UseVisualStyleBackColor = True ' 'Panel1 ' Me.Panel1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.Panel1.Controls.Add(Me.主管_cb) Me.Panel1.Controls.Add(Me.語言_dgv) Me.Panel1.Controls.Add(Me.語轉扭_bt) Me.Panel1.Controls.Add(Me.進度表清單_dgv) Me.Panel1.Controls.Add(Me.日期_dgv) Me.Panel1.Location = New System.Drawing.Point(507, 309) Me.Panel1.Name = "Panel1" Me.Panel1.Size = New System.Drawing.Size(337, 63) Me.Panel1.TabIndex = 1716 Me.Panel1.Visible = False ' '語言_dgv ' Me.語言_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.語言_dgv.Location = New System.Drawing.Point(143, 3) Me.語言_dgv.Name = "語言_dgv" Me.語言_dgv.RowHeadersWidth = 5 Me.語言_dgv.RowTemplate.Height = 24 Me.語言_dgv.Size = New System.Drawing.Size(81, 54) Me.語言_dgv.TabIndex = 1671 ' '進度表清單_dgv ' DataGridViewCellStyle5.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer)) Me.進度表清單_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle5 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 DataGridViewCellStyle6.Font = New System.Drawing.Font("微軟正黑體", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.進度表清單_dgv.RowsDefaultCellStyle = DataGridViewCellStyle6 Me.進度表清單_dgv.RowTemplate.Height = 24 Me.進度表清單_dgv.Size = New System.Drawing.Size(64, 54) Me.進度表清單_dgv.TabIndex = 680 ' '日期_dgv ' DataGridViewCellStyle7.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer)) Me.日期_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle7 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 DataGridViewCellStyle8.Font = New System.Drawing.Font("微軟正黑體", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) DataGridViewCellStyle8.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.日期_dgv.RowsDefaultCellStyle = DataGridViewCellStyle8 Me.日期_dgv.RowTemplate.Height = 24 Me.日期_dgv.Size = New System.Drawing.Size(64, 54) Me.日期_dgv.TabIndex = 679 ' '主管_cb ' Me.主管_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.Simple Me.主管_cb.ForeColor = System.Drawing.Color.Blue Me.主管_cb.FormattingEnabled = True Me.主管_cb.Items.AddRange(New Object() {"HX", "PGS"}) Me.主管_cb.Location = New System.Drawing.Point(230, 32) Me.主管_cb.Name = "主管_cb" Me.主管_cb.Size = New System.Drawing.Size(102, 24) Me.主管_cb.TabIndex = 1716 ' '派工人數紀錄表 ' 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.Panel1) Me.Controls.Add(Me.TabControl1) 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() Me.TabControl1.ResumeLayout(False) Me.控制表_tp.ResumeLayout(False) Me.控制表_tp.PerformLayout() Me.彙總表_tp.ResumeLayout(False) Me.彙總表_tp.PerformLayout() CType(Me.Chart3, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.彙總_dgv, System.ComponentModel.ISupportInitialize).EndInit() Me.Panel1.ResumeLayout(False) CType(Me.語言_dgv, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.進度表清單_dgv, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.日期_dgv, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) End Sub Friend WithEvents 清單_dgv As DataGridView Friend WithEvents 工程執行主管_cb As ComboBox Friend WithEvents 工程執行主管_lb As Label Friend WithEvents 報工日期_dtp As DateTimePicker 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 TabControl1 As TabControl Friend WithEvents 控制表_tp As TabPage Friend WithEvents 彙總表_tp As TabPage Friend WithEvents 彙總_dgv As DataGridView Friend WithEvents 查詢日期1_cb As ComboBox Friend WithEvents 查詢日期_cb As ComboBox Friend WithEvents 派工月份_lb As Label Friend WithEvents Chart3 As DataVisualization.Charting.Chart Friend WithEvents 工程執行主管1_lb As Label Friend WithEvents 工程執行主管1_cb As ComboBox Friend WithEvents 合約編號清單_bt As Button Friend WithEvents 甲方1_lb As Label Friend WithEvents 合約編號1_cb As ComboBox Friend WithEvents 合約編號2_tb As TextBox Friend WithEvents 合約編號清單2_bt As Button Friend WithEvents 甲方_lb As Label Friend WithEvents 合約編號2_cb As ComboBox Friend WithEvents 合約編號_tb As TextBox Friend WithEvents 已完工顯示_ch As CheckBox Friend WithEvents 語轉扭_bt As Button Friend WithEvents Panel1 As Panel Friend WithEvents 主管_cb As ComboBox Friend WithEvents 語言_dgv As DataGridView Friend WithEvents 進度表清單_dgv As DataGridView Friend WithEvents 日期_dgv As DataGridView End Class