Нема описа
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

派工人數紀錄表.Designer.vb 33KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570
  1. <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
  2. Partial Class 派工人數紀錄表
  3. Inherits System.Windows.Forms.Form
  4. 'Form 覆寫 Dispose 以清除元件清單。
  5. <System.Diagnostics.DebuggerNonUserCode()>
  6. Protected Overrides Sub Dispose(ByVal disposing As Boolean)
  7. Try
  8. If disposing AndAlso components IsNot Nothing Then
  9. components.Dispose()
  10. End If
  11. Finally
  12. MyBase.Dispose(disposing)
  13. End Try
  14. End Sub
  15. '為 Windows Form 設計工具的必要項
  16. Private components As System.ComponentModel.IContainer
  17. '注意: 以下為 Windows Form 設計工具所需的程序
  18. '可以使用 Windows Form 設計工具進行修改。
  19. '請勿使用程式碼編輯器進行修改。
  20. <System.Diagnostics.DebuggerStepThrough()>
  21. Private Sub InitializeComponent()
  22. Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
  23. Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
  24. Dim ChartArea1 As System.Windows.Forms.DataVisualization.Charting.ChartArea = New System.Windows.Forms.DataVisualization.Charting.ChartArea()
  25. Dim Legend1 As System.Windows.Forms.DataVisualization.Charting.Legend = New System.Windows.Forms.DataVisualization.Charting.Legend()
  26. Dim Series1 As System.Windows.Forms.DataVisualization.Charting.Series = New System.Windows.Forms.DataVisualization.Charting.Series()
  27. Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
  28. Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
  29. Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
  30. Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
  31. Dim DataGridViewCellStyle7 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
  32. Dim DataGridViewCellStyle8 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
  33. Me.清單_dgv = New System.Windows.Forms.DataGridView()
  34. Me.工程執行主管_cb = New System.Windows.Forms.ComboBox()
  35. Me.工程執行主管_lb = New System.Windows.Forms.Label()
  36. Me.報工日期_dtp = New System.Windows.Forms.DateTimePicker()
  37. Me.報工日期_lb = New System.Windows.Forms.Label()
  38. Me.今天_bt = New System.Windows.Forms.Button()
  39. Me.下一天_bt = New System.Windows.Forms.Button()
  40. Me.上一天_bt = New System.Windows.Forms.Button()
  41. Me.指定存檔_bt = New System.Windows.Forms.Button()
  42. Me.TabControl1 = New System.Windows.Forms.TabControl()
  43. Me.控制表_tp = New System.Windows.Forms.TabPage()
  44. Me.已完工顯示_ch = New System.Windows.Forms.CheckBox()
  45. Me.合約編號2_tb = New System.Windows.Forms.TextBox()
  46. Me.合約編號清單2_bt = New System.Windows.Forms.Button()
  47. Me.甲方_lb = New System.Windows.Forms.Label()
  48. Me.合約編號2_cb = New System.Windows.Forms.ComboBox()
  49. Me.彙總表_tp = New System.Windows.Forms.TabPage()
  50. Me.合約編號_tb = New System.Windows.Forms.TextBox()
  51. Me.合約編號清單_bt = New System.Windows.Forms.Button()
  52. Me.甲方1_lb = New System.Windows.Forms.Label()
  53. Me.合約編號1_cb = New System.Windows.Forms.ComboBox()
  54. Me.工程執行主管1_lb = New System.Windows.Forms.Label()
  55. Me.工程執行主管1_cb = New System.Windows.Forms.ComboBox()
  56. Me.Chart3 = New System.Windows.Forms.DataVisualization.Charting.Chart()
  57. Me.Panel1 = New System.Windows.Forms.Panel()
  58. Me.語言_dgv = New System.Windows.Forms.DataGridView()
  59. Me.進度表清單_dgv = New System.Windows.Forms.DataGridView()
  60. Me.日期_dgv = New System.Windows.Forms.DataGridView()
  61. Me.查詢日期1_cb = New System.Windows.Forms.ComboBox()
  62. Me.查詢日期_cb = New System.Windows.Forms.ComboBox()
  63. Me.派工月份_lb = New System.Windows.Forms.Label()
  64. Me.彙總_dgv = New System.Windows.Forms.DataGridView()
  65. Me.語轉扭_bt = New System.Windows.Forms.Button()
  66. CType(Me.清單_dgv, System.ComponentModel.ISupportInitialize).BeginInit()
  67. Me.TabControl1.SuspendLayout()
  68. Me.控制表_tp.SuspendLayout()
  69. Me.彙總表_tp.SuspendLayout()
  70. CType(Me.Chart3, System.ComponentModel.ISupportInitialize).BeginInit()
  71. Me.Panel1.SuspendLayout()
  72. CType(Me.語言_dgv, System.ComponentModel.ISupportInitialize).BeginInit()
  73. CType(Me.進度表清單_dgv, System.ComponentModel.ISupportInitialize).BeginInit()
  74. CType(Me.日期_dgv, System.ComponentModel.ISupportInitialize).BeginInit()
  75. CType(Me.彙總_dgv, System.ComponentModel.ISupportInitialize).BeginInit()
  76. Me.SuspendLayout()
  77. '
  78. '清單_dgv
  79. '
  80. Me.清單_dgv.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
  81. Or System.Windows.Forms.AnchorStyles.Left) _
  82. Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
  83. Me.清單_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
  84. Me.清單_dgv.BackgroundColor = System.Drawing.Color.White
  85. DataGridViewCellStyle1.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
  86. DataGridViewCellStyle1.BackColor = System.Drawing.SystemColors.Control
  87. DataGridViewCellStyle1.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
  88. DataGridViewCellStyle1.ForeColor = System.Drawing.SystemColors.WindowText
  89. DataGridViewCellStyle1.SelectionBackColor = System.Drawing.SystemColors.Highlight
  90. DataGridViewCellStyle1.SelectionForeColor = System.Drawing.SystemColors.HighlightText
  91. Me.清單_dgv.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle1
  92. Me.清單_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
  93. Me.清單_dgv.Location = New System.Drawing.Point(3, 30)
  94. Me.清單_dgv.Name = "清單_dgv"
  95. Me.清單_dgv.RowHeadersWidth = 5
  96. DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
  97. Me.清單_dgv.RowsDefaultCellStyle = DataGridViewCellStyle2
  98. Me.清單_dgv.RowTemplate.Height = 24
  99. Me.清單_dgv.Size = New System.Drawing.Size(1332, 613)
  100. Me.清單_dgv.TabIndex = 229
  101. '
  102. '工程執行主管_cb
  103. '
  104. Me.工程執行主管_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
  105. Me.工程執行主管_cb.ForeColor = System.Drawing.Color.Blue
  106. Me.工程執行主管_cb.FormattingEnabled = True
  107. Me.工程執行主管_cb.Items.AddRange(New Object() {"HX", "PGS"})
  108. Me.工程執行主管_cb.Location = New System.Drawing.Point(79, 3)
  109. Me.工程執行主管_cb.Name = "工程執行主管_cb"
  110. Me.工程執行主管_cb.Size = New System.Drawing.Size(221, 24)
  111. Me.工程執行主管_cb.TabIndex = 1445
  112. '
  113. '工程執行主管_lb
  114. '
  115. Me.工程執行主管_lb.AutoSize = True
  116. Me.工程執行主管_lb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Bold)
  117. Me.工程執行主管_lb.ForeColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer))
  118. Me.工程執行主管_lb.Location = New System.Drawing.Point(1, 7)
  119. Me.工程執行主管_lb.Name = "工程執行主管_lb"
  120. Me.工程執行主管_lb.Size = New System.Drawing.Size(79, 16)
  121. Me.工程執行主管_lb.TabIndex = 1444
  122. Me.工程執行主管_lb.Text = "工程執行主管"
  123. '
  124. '報工日期_dtp
  125. '
  126. Me.報工日期_dtp.CustomFormat = "yyyy/MM/dd"
  127. Me.報工日期_dtp.Format = System.Windows.Forms.DateTimePickerFormat.Custom
  128. Me.報工日期_dtp.Location = New System.Drawing.Point(795, 3)
  129. Me.報工日期_dtp.Name = "報工日期_dtp"
  130. Me.報工日期_dtp.Size = New System.Drawing.Size(88, 23)
  131. Me.報工日期_dtp.TabIndex = 1448
  132. '
  133. '報工日期_lb
  134. '
  135. Me.報工日期_lb.AutoSize = True
  136. Me.報工日期_lb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
  137. Me.報工日期_lb.ForeColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer))
  138. Me.報工日期_lb.Location = New System.Drawing.Point(690, 6)
  139. Me.報工日期_lb.Name = "報工日期_lb"
  140. Me.報工日期_lb.Size = New System.Drawing.Size(55, 16)
  141. Me.報工日期_lb.TabIndex = 1447
  142. Me.報工日期_lb.Text = "報工日期"
  143. '
  144. '今天_bt
  145. '
  146. Me.今天_bt.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
  147. Me.今天_bt.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer))
  148. Me.今天_bt.Location = New System.Drawing.Point(960, 2)
  149. Me.今天_bt.Name = "今天_bt"
  150. Me.今天_bt.Size = New System.Drawing.Size(75, 25)
  151. Me.今天_bt.TabIndex = 1545
  152. Me.今天_bt.Text = "今天"
  153. Me.今天_bt.UseVisualStyleBackColor = True
  154. '
  155. '下一天_bt
  156. '
  157. Me.下一天_bt.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
  158. Me.下一天_bt.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer))
  159. Me.下一天_bt.Location = New System.Drawing.Point(1035, 2)
  160. Me.下一天_bt.Name = "下一天_bt"
  161. Me.下一天_bt.Size = New System.Drawing.Size(75, 25)
  162. Me.下一天_bt.TabIndex = 1544
  163. Me.下一天_bt.Text = "下一天"
  164. Me.下一天_bt.UseVisualStyleBackColor = True
  165. '
  166. '上一天_bt
  167. '
  168. Me.上一天_bt.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
  169. Me.上一天_bt.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer))
  170. Me.上一天_bt.Location = New System.Drawing.Point(885, 2)
  171. Me.上一天_bt.Name = "上一天_bt"
  172. Me.上一天_bt.Size = New System.Drawing.Size(75, 25)
  173. Me.上一天_bt.TabIndex = 1543
  174. Me.上一天_bt.Text = "上一天"
  175. Me.上一天_bt.UseVisualStyleBackColor = True
  176. '
  177. '指定存檔_bt
  178. '
  179. Me.指定存檔_bt.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
  180. Me.指定存檔_bt.Location = New System.Drawing.Point(1112, 2)
  181. Me.指定存檔_bt.Name = "指定存檔_bt"
  182. Me.指定存檔_bt.Size = New System.Drawing.Size(75, 25)
  183. Me.指定存檔_bt.TabIndex = 1677
  184. Me.指定存檔_bt.Text = "存檔"
  185. Me.指定存檔_bt.UseVisualStyleBackColor = True
  186. '
  187. 'TabControl1
  188. '
  189. Me.TabControl1.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
  190. Or System.Windows.Forms.AnchorStyles.Left) _
  191. Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
  192. Me.TabControl1.Appearance = System.Windows.Forms.TabAppearance.Buttons
  193. Me.TabControl1.Controls.Add(Me.控制表_tp)
  194. Me.TabControl1.Controls.Add(Me.彙總表_tp)
  195. Me.TabControl1.Location = New System.Drawing.Point(-1, 1)
  196. Me.TabControl1.Name = "TabControl1"
  197. Me.TabControl1.SelectedIndex = 0
  198. Me.TabControl1.Size = New System.Drawing.Size(1349, 680)
  199. Me.TabControl1.TabIndex = 1678
  200. '
  201. '控制表_tp
  202. '
  203. Me.控制表_tp.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D
  204. Me.控制表_tp.Controls.Add(Me.已完工顯示_ch)
  205. Me.控制表_tp.Controls.Add(Me.指定存檔_bt)
  206. Me.控制表_tp.Controls.Add(Me.清單_dgv)
  207. Me.控制表_tp.Controls.Add(Me.今天_bt)
  208. Me.控制表_tp.Controls.Add(Me.工程執行主管_cb)
  209. Me.控制表_tp.Controls.Add(Me.下一天_bt)
  210. Me.控制表_tp.Controls.Add(Me.報工日期_lb)
  211. Me.控制表_tp.Controls.Add(Me.上一天_bt)
  212. Me.控制表_tp.Controls.Add(Me.報工日期_dtp)
  213. Me.控制表_tp.Controls.Add(Me.合約編號2_tb)
  214. Me.控制表_tp.Controls.Add(Me.合約編號清單2_bt)
  215. Me.控制表_tp.Controls.Add(Me.甲方_lb)
  216. Me.控制表_tp.Controls.Add(Me.合約編號2_cb)
  217. Me.控制表_tp.Controls.Add(Me.工程執行主管_lb)
  218. Me.控制表_tp.Location = New System.Drawing.Point(4, 28)
  219. Me.控制表_tp.Name = "控制表_tp"
  220. Me.控制表_tp.Padding = New System.Windows.Forms.Padding(3)
  221. Me.控制表_tp.Size = New System.Drawing.Size(1341, 648)
  222. Me.控制表_tp.TabIndex = 0
  223. Me.控制表_tp.Text = "派工人數控制表"
  224. Me.控制表_tp.UseVisualStyleBackColor = True
  225. '
  226. '已完工顯示_ch
  227. '
  228. Me.已完工顯示_ch.AutoSize = True
  229. Me.已完工顯示_ch.Location = New System.Drawing.Point(1190, 4)
  230. Me.已完工顯示_ch.Name = "已完工顯示_ch"
  231. Me.已完工顯示_ch.Size = New System.Drawing.Size(98, 20)
  232. Me.已完工顯示_ch.TabIndex = 1682
  233. Me.已完工顯示_ch.Text = "顯示關閉資料"
  234. Me.已完工顯示_ch.UseVisualStyleBackColor = True
  235. '
  236. '合約編號2_tb
  237. '
  238. Me.合約編號2_tb.Enabled = False
  239. Me.合約編號2_tb.Location = New System.Drawing.Point(441, 4)
  240. Me.合約編號2_tb.Name = "合約編號2_tb"
  241. Me.合約編號2_tb.Size = New System.Drawing.Size(125, 23)
  242. Me.合約編號2_tb.TabIndex = 1681
  243. '
  244. '合約編號清單2_bt
  245. '
  246. Me.合約編號清單2_bt.BackColor = System.Drawing.SystemColors.Control
  247. Me.合約編號清單2_bt.Location = New System.Drawing.Point(567, 2)
  248. Me.合約編號清單2_bt.Name = "合約編號清單2_bt"
  249. Me.合約編號清單2_bt.Size = New System.Drawing.Size(121, 26)
  250. Me.合約編號清單2_bt.TabIndex = 1678
  251. Me.合約編號清單2_bt.Text = "合約編號清單"
  252. Me.合約編號清單2_bt.UseVisualStyleBackColor = False
  253. '
  254. '甲方_lb
  255. '
  256. Me.甲方_lb.AutoSize = True
  257. Me.甲方_lb.BackColor = System.Drawing.SystemColors.Control
  258. Me.甲方_lb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
  259. Me.甲方_lb.Location = New System.Drawing.Point(305, 7)
  260. Me.甲方_lb.Name = "甲方_lb"
  261. Me.甲方_lb.Size = New System.Drawing.Size(61, 16)
  262. Me.甲方_lb.TabIndex = 1680
  263. Me.甲方_lb.Text = "甲方簡稱 :"
  264. Me.甲方_lb.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
  265. '
  266. '合約編號2_cb
  267. '
  268. Me.合約編號2_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
  269. Me.合約編號2_cb.ForeColor = System.Drawing.Color.Blue
  270. Me.合約編號2_cb.FormattingEnabled = True
  271. Me.合約編號2_cb.Items.AddRange(New Object() {"", "第一期", "第二期", "第三期", "第四期", "第五期", "第六期", "第七期", "第八期", "第九期", "第十期"})
  272. Me.合約編號2_cb.Location = New System.Drawing.Point(366, 3)
  273. Me.合約編號2_cb.Name = "合約編號2_cb"
  274. Me.合約編號2_cb.Size = New System.Drawing.Size(74, 24)
  275. Me.合約編號2_cb.TabIndex = 1679
  276. '
  277. '彙總表_tp
  278. '
  279. Me.彙總表_tp.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D
  280. Me.彙總表_tp.Controls.Add(Me.合約編號_tb)
  281. Me.彙總表_tp.Controls.Add(Me.合約編號清單_bt)
  282. Me.彙總表_tp.Controls.Add(Me.甲方1_lb)
  283. Me.彙總表_tp.Controls.Add(Me.合約編號1_cb)
  284. Me.彙總表_tp.Controls.Add(Me.工程執行主管1_lb)
  285. Me.彙總表_tp.Controls.Add(Me.工程執行主管1_cb)
  286. Me.彙總表_tp.Controls.Add(Me.Chart3)
  287. Me.彙總表_tp.Controls.Add(Me.Panel1)
  288. Me.彙總表_tp.Controls.Add(Me.查詢日期1_cb)
  289. Me.彙總表_tp.Controls.Add(Me.查詢日期_cb)
  290. Me.彙總表_tp.Controls.Add(Me.派工月份_lb)
  291. Me.彙總表_tp.Controls.Add(Me.彙總_dgv)
  292. Me.彙總表_tp.Location = New System.Drawing.Point(4, 28)
  293. Me.彙總表_tp.Name = "彙總表_tp"
  294. Me.彙總表_tp.Padding = New System.Windows.Forms.Padding(3)
  295. Me.彙總表_tp.Size = New System.Drawing.Size(1341, 648)
  296. Me.彙總表_tp.TabIndex = 1
  297. Me.彙總表_tp.Text = "派工人數彙總表"
  298. Me.彙總表_tp.UseVisualStyleBackColor = True
  299. '
  300. '合約編號_tb
  301. '
  302. Me.合約編號_tb.Enabled = False
  303. Me.合約編號_tb.Location = New System.Drawing.Point(745, 3)
  304. Me.合約編號_tb.Name = "合約編號_tb"
  305. Me.合約編號_tb.Size = New System.Drawing.Size(125, 23)
  306. Me.合約編號_tb.TabIndex = 1451
  307. '
  308. '合約編號清單_bt
  309. '
  310. Me.合約編號清單_bt.BackColor = System.Drawing.SystemColors.Control
  311. Me.合約編號清單_bt.Location = New System.Drawing.Point(873, 1)
  312. Me.合約編號清單_bt.Name = "合約編號清單_bt"
  313. Me.合約編號清單_bt.Size = New System.Drawing.Size(121, 26)
  314. Me.合約編號清單_bt.TabIndex = 1448
  315. Me.合約編號清單_bt.Text = "合約編號清單"
  316. Me.合約編號清單_bt.UseVisualStyleBackColor = False
  317. '
  318. '甲方1_lb
  319. '
  320. Me.甲方1_lb.AutoSize = True
  321. Me.甲方1_lb.BackColor = System.Drawing.SystemColors.Control
  322. Me.甲方1_lb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
  323. Me.甲方1_lb.Location = New System.Drawing.Point(602, 6)
  324. Me.甲方1_lb.Name = "甲方1_lb"
  325. Me.甲方1_lb.Size = New System.Drawing.Size(61, 16)
  326. Me.甲方1_lb.TabIndex = 1450
  327. Me.甲方1_lb.Text = "甲方簡稱 :"
  328. Me.甲方1_lb.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
  329. '
  330. '合約編號1_cb
  331. '
  332. Me.合約編號1_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
  333. Me.合約編號1_cb.ForeColor = System.Drawing.Color.Blue
  334. Me.合約編號1_cb.FormattingEnabled = True
  335. Me.合約編號1_cb.Items.AddRange(New Object() {"", "第一期", "第二期", "第三期", "第四期", "第五期", "第六期", "第七期", "第八期", "第九期", "第十期"})
  336. Me.合約編號1_cb.Location = New System.Drawing.Point(668, 2)
  337. Me.合約編號1_cb.Name = "合約編號1_cb"
  338. Me.合約編號1_cb.Size = New System.Drawing.Size(74, 24)
  339. Me.合約編號1_cb.TabIndex = 1449
  340. '
  341. '工程執行主管1_lb
  342. '
  343. Me.工程執行主管1_lb.AutoSize = True
  344. Me.工程執行主管1_lb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Bold)
  345. Me.工程執行主管1_lb.ForeColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer))
  346. Me.工程執行主管1_lb.Location = New System.Drawing.Point(220, 6)
  347. Me.工程執行主管1_lb.Name = "工程執行主管1_lb"
  348. Me.工程執行主管1_lb.Size = New System.Drawing.Size(79, 16)
  349. Me.工程執行主管1_lb.TabIndex = 1446
  350. Me.工程執行主管1_lb.Text = "工程執行主管"
  351. '
  352. '工程執行主管1_cb
  353. '
  354. Me.工程執行主管1_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
  355. Me.工程執行主管1_cb.ForeColor = System.Drawing.Color.Blue
  356. Me.工程執行主管1_cb.FormattingEnabled = True
  357. Me.工程執行主管1_cb.Items.AddRange(New Object() {"HX", "PGS"})
  358. Me.工程執行主管1_cb.Location = New System.Drawing.Point(300, 2)
  359. Me.工程執行主管1_cb.Name = "工程執行主管1_cb"
  360. Me.工程執行主管1_cb.Size = New System.Drawing.Size(295, 24)
  361. Me.工程執行主管1_cb.TabIndex = 1447
  362. '
  363. 'Chart3
  364. '
  365. Me.Chart3.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
  366. Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
  367. ChartArea1.Name = "ChartArea1"
  368. Me.Chart3.ChartAreas.Add(ChartArea1)
  369. Legend1.Name = "Legend1"
  370. Me.Chart3.Legends.Add(Legend1)
  371. Me.Chart3.Location = New System.Drawing.Point(1, 450)
  372. Me.Chart3.Name = "Chart3"
  373. Series1.ChartArea = "ChartArea1"
  374. Series1.Legend = "Legend1"
  375. Series1.Name = "Series1"
  376. Series1.YValuesPerPoint = 6
  377. Me.Chart3.Series.Add(Series1)
  378. Me.Chart3.Size = New System.Drawing.Size(1333, 196)
  379. Me.Chart3.TabIndex = 1443
  380. Me.Chart3.Text = "Chart3"
  381. '
  382. 'Panel1
  383. '
  384. Me.Panel1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
  385. Me.Panel1.Controls.Add(Me.語言_dgv)
  386. Me.Panel1.Controls.Add(Me.進度表清單_dgv)
  387. Me.Panel1.Controls.Add(Me.日期_dgv)
  388. Me.Panel1.Location = New System.Drawing.Point(666, 62)
  389. Me.Panel1.Name = "Panel1"
  390. Me.Panel1.Size = New System.Drawing.Size(263, 63)
  391. Me.Panel1.TabIndex = 1442
  392. Me.Panel1.Visible = False
  393. '
  394. '語言_dgv
  395. '
  396. Me.語言_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
  397. Me.語言_dgv.Location = New System.Drawing.Point(143, 3)
  398. Me.語言_dgv.Name = "語言_dgv"
  399. Me.語言_dgv.RowHeadersWidth = 5
  400. Me.語言_dgv.RowTemplate.Height = 24
  401. Me.語言_dgv.Size = New System.Drawing.Size(81, 54)
  402. Me.語言_dgv.TabIndex = 1671
  403. '
  404. '進度表清單_dgv
  405. '
  406. DataGridViewCellStyle3.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer))
  407. Me.進度表清單_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle3
  408. Me.進度表清單_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
  409. Me.進度表清單_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
  410. Me.進度表清單_dgv.Location = New System.Drawing.Point(73, 3)
  411. Me.進度表清單_dgv.Name = "進度表清單_dgv"
  412. Me.進度表清單_dgv.RowHeadersWidth = 5
  413. DataGridViewCellStyle4.Font = New System.Drawing.Font("微軟正黑體", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
  414. DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
  415. Me.進度表清單_dgv.RowsDefaultCellStyle = DataGridViewCellStyle4
  416. Me.進度表清單_dgv.RowTemplate.Height = 24
  417. Me.進度表清單_dgv.Size = New System.Drawing.Size(64, 54)
  418. Me.進度表清單_dgv.TabIndex = 680
  419. '
  420. '日期_dgv
  421. '
  422. DataGridViewCellStyle5.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer))
  423. Me.日期_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle5
  424. Me.日期_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
  425. Me.日期_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
  426. Me.日期_dgv.Location = New System.Drawing.Point(3, 3)
  427. Me.日期_dgv.Name = "日期_dgv"
  428. Me.日期_dgv.RowHeadersWidth = 5
  429. DataGridViewCellStyle6.Font = New System.Drawing.Font("微軟正黑體", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
  430. DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
  431. Me.日期_dgv.RowsDefaultCellStyle = DataGridViewCellStyle6
  432. Me.日期_dgv.RowTemplate.Height = 24
  433. Me.日期_dgv.Size = New System.Drawing.Size(64, 54)
  434. Me.日期_dgv.TabIndex = 679
  435. '
  436. '查詢日期1_cb
  437. '
  438. Me.查詢日期1_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
  439. Me.查詢日期1_cb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
  440. Me.查詢日期1_cb.FormattingEnabled = True
  441. Me.查詢日期1_cb.Items.AddRange(New Object() {"01", "02", "03", "04", "05", "06", "07", "08", "09", "10", "11", "12"})
  442. Me.查詢日期1_cb.Location = New System.Drawing.Point(158, 2)
  443. Me.查詢日期1_cb.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
  444. Me.查詢日期1_cb.Name = "查詢日期1_cb"
  445. Me.查詢日期1_cb.Size = New System.Drawing.Size(40, 24)
  446. Me.查詢日期1_cb.TabIndex = 1441
  447. '
  448. '查詢日期_cb
  449. '
  450. Me.查詢日期_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
  451. Me.查詢日期_cb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
  452. Me.查詢日期_cb.FormattingEnabled = True
  453. Me.查詢日期_cb.Items.AddRange(New Object() {"2019"})
  454. Me.查詢日期_cb.Location = New System.Drawing.Point(101, 2)
  455. Me.查詢日期_cb.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
  456. Me.查詢日期_cb.Name = "查詢日期_cb"
  457. Me.查詢日期_cb.Size = New System.Drawing.Size(56, 24)
  458. Me.查詢日期_cb.TabIndex = 1440
  459. '
  460. '派工月份_lb
  461. '
  462. Me.派工月份_lb.AutoSize = True
  463. Me.派工月份_lb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
  464. Me.派工月份_lb.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer))
  465. Me.派工月份_lb.Location = New System.Drawing.Point(7, 6)
  466. Me.派工月份_lb.Name = "派工月份_lb"
  467. Me.派工月份_lb.Size = New System.Drawing.Size(55, 16)
  468. Me.派工月份_lb.TabIndex = 1439
  469. Me.派工月份_lb.Text = "派工月份"
  470. '
  471. '彙總_dgv
  472. '
  473. Me.彙總_dgv.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
  474. Or System.Windows.Forms.AnchorStyles.Left) _
  475. Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
  476. Me.彙總_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
  477. Me.彙總_dgv.BackgroundColor = System.Drawing.Color.White
  478. DataGridViewCellStyle7.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
  479. DataGridViewCellStyle7.BackColor = System.Drawing.SystemColors.Control
  480. DataGridViewCellStyle7.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
  481. DataGridViewCellStyle7.ForeColor = System.Drawing.SystemColors.WindowText
  482. DataGridViewCellStyle7.SelectionBackColor = System.Drawing.SystemColors.Highlight
  483. DataGridViewCellStyle7.SelectionForeColor = System.Drawing.SystemColors.HighlightText
  484. Me.彙總_dgv.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle7
  485. Me.彙總_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
  486. Me.彙總_dgv.Location = New System.Drawing.Point(2, 30)
  487. Me.彙總_dgv.Name = "彙總_dgv"
  488. Me.彙總_dgv.RowHeadersWidth = 5
  489. DataGridViewCellStyle8.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
  490. Me.彙總_dgv.RowsDefaultCellStyle = DataGridViewCellStyle8
  491. Me.彙總_dgv.RowTemplate.Height = 24
  492. Me.彙總_dgv.Size = New System.Drawing.Size(1332, 414)
  493. Me.彙總_dgv.TabIndex = 230
  494. '
  495. '語轉扭_bt
  496. '
  497. Me.語轉扭_bt.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
  498. Me.語轉扭_bt.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
  499. Me.語轉扭_bt.ForeColor = System.Drawing.Color.Black
  500. Me.語轉扭_bt.Location = New System.Drawing.Point(1322, 1)
  501. Me.語轉扭_bt.Name = "語轉扭_bt"
  502. Me.語轉扭_bt.Size = New System.Drawing.Size(23, 23)
  503. Me.語轉扭_bt.TabIndex = 1715
  504. Me.語轉扭_bt.Text = "L"
  505. Me.語轉扭_bt.UseVisualStyleBackColor = True
  506. '
  507. '派工人數紀錄表
  508. '
  509. Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!)
  510. Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
  511. Me.ClientSize = New System.Drawing.Size(1350, 681)
  512. Me.Controls.Add(Me.語轉扭_bt)
  513. Me.Controls.Add(Me.TabControl1)
  514. Me.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
  515. Me.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
  516. Me.Name = "派工人數紀錄表"
  517. Me.Text = "派工人數紀錄表"
  518. CType(Me.清單_dgv, System.ComponentModel.ISupportInitialize).EndInit()
  519. Me.TabControl1.ResumeLayout(False)
  520. Me.控制表_tp.ResumeLayout(False)
  521. Me.控制表_tp.PerformLayout()
  522. Me.彙總表_tp.ResumeLayout(False)
  523. Me.彙總表_tp.PerformLayout()
  524. CType(Me.Chart3, System.ComponentModel.ISupportInitialize).EndInit()
  525. Me.Panel1.ResumeLayout(False)
  526. CType(Me.語言_dgv, System.ComponentModel.ISupportInitialize).EndInit()
  527. CType(Me.進度表清單_dgv, System.ComponentModel.ISupportInitialize).EndInit()
  528. CType(Me.日期_dgv, System.ComponentModel.ISupportInitialize).EndInit()
  529. CType(Me.彙總_dgv, System.ComponentModel.ISupportInitialize).EndInit()
  530. Me.ResumeLayout(False)
  531. End Sub
  532. Friend WithEvents 清單_dgv As DataGridView
  533. Friend WithEvents 工程執行主管_cb As ComboBox
  534. Friend WithEvents 工程執行主管_lb As Label
  535. Friend WithEvents 報工日期_dtp As DateTimePicker
  536. Friend WithEvents 報工日期_lb As Label
  537. Friend WithEvents 今天_bt As Button
  538. Friend WithEvents 下一天_bt As Button
  539. Friend WithEvents 上一天_bt As Button
  540. Friend WithEvents 指定存檔_bt As Button
  541. Friend WithEvents TabControl1 As TabControl
  542. Friend WithEvents 控制表_tp As TabPage
  543. Friend WithEvents 彙總表_tp As TabPage
  544. Friend WithEvents 彙總_dgv As DataGridView
  545. Friend WithEvents 查詢日期1_cb As ComboBox
  546. Friend WithEvents 查詢日期_cb As ComboBox
  547. Friend WithEvents 派工月份_lb As Label
  548. Friend WithEvents Panel1 As Panel
  549. Friend WithEvents 日期_dgv As DataGridView
  550. Friend WithEvents Chart3 As DataVisualization.Charting.Chart
  551. Friend WithEvents 工程執行主管1_lb As Label
  552. Friend WithEvents 工程執行主管1_cb As ComboBox
  553. Friend WithEvents 合約編號清單_bt As Button
  554. Friend WithEvents 甲方1_lb As Label
  555. Friend WithEvents 合約編號1_cb As ComboBox
  556. Friend WithEvents 合約編號2_tb As TextBox
  557. Friend WithEvents 合約編號清單2_bt As Button
  558. Friend WithEvents 甲方_lb As Label
  559. Friend WithEvents 合約編號2_cb As ComboBox
  560. Friend WithEvents 合約編號_tb As TextBox
  561. Friend WithEvents 進度表清單_dgv As DataGridView
  562. Friend WithEvents 已完工顯示_ch As CheckBox
  563. Friend WithEvents 語轉扭_bt As Button
  564. Friend WithEvents 語言_dgv As DataGridView
  565. End Class