B70340 1 gadu atpakaļ
vecāks
revīzija
45e2b009a4

Binārs
.vs/GA-ERP-SYS/FileContentIndex/380043d8-06fb-4eba-946c-488b68f0b7c0.vsidx Parādīt failu


Binārs
.vs/GA-ERP-SYS/FileContentIndex/71c626ea-9056-4cbb-9b85-a9fd83189b70.vsidx Parādīt failu


Binārs
.vs/GA-ERP-SYS/v17/.suo Parādīt failu


Binārs
GA-ERP-SYS/bin/Debug/Auto.exe Parādīt failu


+ 0
- 0
GA-ERP-SYS/bin/Debug/B.txt Parādīt failu


Binārs
GA-ERP-SYS/bin/Debug/DawnCache/data_1 Parādīt failu


Binārs
GA-ERP-SYS/bin/Debug/GA-ERP-SYS.exe Parādīt failu


Binārs
GA-ERP-SYS/bin/Debug/GA-ERP-SYS.pdb Parādīt failu


Binārs
GA-ERP-SYS/bin/Debug/GPUCache/data_0 Parādīt failu


Binārs
GA-ERP-SYS/bin/Debug/GPUCache/data_1 Parādīt failu


Binārs
GA-ERP-SYS/bin/Debug/GPUCache/data_3 Parādīt failu


Binārs
GA-ERP-SYS/bin/Debug/Verify.exe Parādīt failu


+ 70
- 0
GA-ERP-SYS/bin/Debug/debug.log Parādīt failu

@@ -822,3 +822,73 @@ ERROR: Failed parsing Certificate
822 822
 
823 823
 [0721/195212.519:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.0", source: https://gcm-smart.com/_jb_static/??-eJydjMEKgzAQRP+mp8YoqNSD9FtiXJqVbEx3V6V/3xyU3gsDb+Yw78gGk4/bDGKXkvcG/DlhCF/sFCrCVC1yP7Lxa1JIajUAlQfsZRhRx9aJgIqNOLErhqAUOwm4/9o/GgbJa5ovnoonjU3/aNuh7rv65qex+QLYKUoG (2)
824 824
 [0721/195223.479:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.0", source: https://gcm-smart.com/_jb_static/??-eJydjMEKgzAQRP+mp8YoqNSD9FtiXJqVbEx3V6V/3xyU3gsDb+Yw78gGk4/bDGKXkvcG/DlhCF/sFCrCVC1yP7Lxa1JIajUAlQfsZRhRx9aJgIqNOLErhqAUOwm4/9o/GgbJa5ovnoonjU3/aNuh7rv65qex+QLYKUoG (2)
825
+[0723/163009.774:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
826
+[0723/163015.773:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
827
+ERROR: Couldn't read tbsCertificate as SEQUENCE
828
+ERROR: Failed parsing Certificate
829
+
830
+[0723/163018.709:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.0", source: https://gcm-smart.com/_jb_static/??-eJydjMEKgzAQRP+mp8YoqNSD9FtiXJqVbEx3V6V/3xyU3gsDb+Yw78gGk4/bDGKXkvcG/DlhCF/sFCrCVC1yP7Lxa1JIajUAlQfsZRhRx9aJgIqNOLErhqAUOwm4/9o/GgbJa5ovnoonjU3/aNuh7rv65qex+QLYKUoG (2)
831
+[0723/163026.900:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.0", source: https://gcm-smart.com/_jb_static/??-eJydjMEKgzAQRP+mp8YoqNSD9FtiXJqVbEx3V6V/3xyU3gsDb+Yw78gGk4/bDGKXkvcG/DlhCF/sFCrCVC1yP7Lxa1JIajUAlQfsZRhRx9aJgIqNOLErhqAUOwm4/9o/GgbJa5ovnoonjU3/aNuh7rv65qex+QLYKUoG (2)
832
+[0723/163749.256:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
833
+[0723/163750.856:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
834
+ERROR: Couldn't read tbsCertificate as SEQUENCE
835
+ERROR: Failed parsing Certificate
836
+
837
+[0723/163752.307:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.0", source: https://gcm-smart.com/_jb_static/??-eJydjMEKgzAQRP+mp8YoqNSD9FtiXJqVbEx3V6V/3xyU3gsDb+Yw78gGk4/bDGKXkvcG/DlhCF/sFCrCVC1yP7Lxa1JIajUAlQfsZRhRx9aJgIqNOLErhqAUOwm4/9o/GgbJa5ovnoonjU3/aNuh7rv65qex+QLYKUoG (2)
838
+[0723/164005.021:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
839
+[0723/164011.966:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
840
+ERROR: Couldn't read tbsCertificate as SEQUENCE
841
+ERROR: Failed parsing Certificate
842
+
843
+[0723/164015.858:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.0", source: https://gcm-smart.com/_jb_static/??-eJydjMEKgzAQRP+mp8YoqNSD9FtiXJqVbEx3V6V/3xyU3gsDb+Yw78gGk4/bDGKXkvcG/DlhCF/sFCrCVC1yP7Lxa1JIajUAlQfsZRhRx9aJgIqNOLErhqAUOwm4/9o/GgbJa5ovnoonjU3/aNuh7rv65qex+QLYKUoG (2)
844
+[0723/164402.185:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
845
+[0723/164403.800:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
846
+ERROR: Couldn't read tbsCertificate as SEQUENCE
847
+ERROR: Failed parsing Certificate
848
+
849
+[0723/164404.718:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.0", source: https://gcm-smart.com/_jb_static/??-eJydjMEKgzAQRP+mp8YoqNSD9FtiXJqVbEx3V6V/3xyU3gsDb+Yw78gGk4/bDGKXkvcG/DlhCF/sFCrCVC1yP7Lxa1JIajUAlQfsZRhRx9aJgIqNOLErhqAUOwm4/9o/GgbJa5ovnoonjU3/aNuh7rv65qex+QLYKUoG (2)
850
+[0723/165536.395:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
851
+[0723/165537.848:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
852
+ERROR: Couldn't read tbsCertificate as SEQUENCE
853
+ERROR: Failed parsing Certificate
854
+
855
+[0723/165539.447:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.0", source: https://gcm-smart.com/_jb_static/??-eJydjMEKgzAQRP+mp8YoqNSD9FtiXJqVbEx3V6V/3xyU3gsDb+Yw78gGk4/bDGKXkvcG/DlhCF/sFCrCVC1yP7Lxa1JIajUAlQfsZRhRx9aJgIqNOLErhqAUOwm4/9o/GgbJa5ovnoonjU3/aNuh7rv65qex+QLYKUoG (2)
856
+[0723/165724.118:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
857
+[0723/165725.786:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
858
+ERROR: Couldn't read tbsCertificate as SEQUENCE
859
+ERROR: Failed parsing Certificate
860
+
861
+[0723/165727.052:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.0", source: https://gcm-smart.com/_jb_static/??-eJydjMEKgzAQRP+mp8YoqNSD9FtiXJqVbEx3V6V/3xyU3gsDb+Yw78gGk4/bDGKXkvcG/DlhCF/sFCrCVC1yP7Lxa1JIajUAlQfsZRhRx9aJgIqNOLErhqAUOwm4/9o/GgbJa5ovnoonjU3/aNuh7rv65qex+QLYKUoG (2)
862
+[0723/170140.772:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
863
+[0723/170143.667:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
864
+ERROR: Couldn't read tbsCertificate as SEQUENCE
865
+ERROR: Failed parsing Certificate
866
+
867
+[0723/170145.177:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.0", source: https://gcm-smart.com/_jb_static/??-eJydjMEKgzAQRP+mp8YoqNSD9FtiXJqVbEx3V6V/3xyU3gsDb+Yw78gGk4/bDGKXkvcG/DlhCF/sFCrCVC1yP7Lxa1JIajUAlQfsZRhRx9aJgIqNOLErhqAUOwm4/9o/GgbJa5ovnoonjU3/aNuh7rv65qex+QLYKUoG (2)
868
+[0723/171115.674:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
869
+[0723/171118.032:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
870
+ERROR: Couldn't read tbsCertificate as SEQUENCE
871
+ERROR: Failed parsing Certificate
872
+
873
+[0723/171120.485:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.0", source: https://gcm-smart.com/_jb_static/??-eJydjMEKgzAQRP+mp8YoqNSD9FtiXJqVbEx3V6V/3xyU3gsDb+Yw78gGk4/bDGKXkvcG/DlhCF/sFCrCVC1yP7Lxa1JIajUAlQfsZRhRx9aJgIqNOLErhqAUOwm4/9o/GgbJa5ovnoonjU3/aNuh7rv65qex+QLYKUoG (2)
874
+[0723/172205.362:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
875
+[0723/172207.550:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
876
+ERROR: Couldn't read tbsCertificate as SEQUENCE
877
+ERROR: Failed parsing Certificate
878
+
879
+[0723/172209.183:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.0", source: https://gcm-smart.com/_jb_static/??-eJydjMEKgzAQRP+mp8YoqNSD9FtiXJqVbEx3V6V/3xyU3gsDb+Yw78gGk4/bDGKXkvcG/DlhCF/sFCrCVC1yP7Lxa1JIajUAlQfsZRhRx9aJgIqNOLErhqAUOwm4/9o/GgbJa5ovnoonjU3/aNuh7rv65qex+QLYKUoG (2)
880
+[0723/172220.115:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.0", source: https://gcm-smart.com/_jb_static/??-eJydjMEKgzAQRP+mp8YoqNSD9FtiXJqVbEx3V6V/3xyU3gsDb+Yw78gGk4/bDGKXkvcG/DlhCF/sFCrCVC1yP7Lxa1JIajUAlQfsZRhRx9aJgIqNOLErhqAUOwm4/9o/GgbJa5ovnoonjU3/aNuh7rv65qex+QLYKUoG (2)
881
+[0728/195653.799:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
882
+[0728/195711.911:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
883
+ERROR: Couldn't read tbsCertificate as SEQUENCE
884
+ERROR: Failed parsing Certificate
885
+
886
+[0728/195714.940:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.0", source: https://gcm-smart.com/_jb_static/??-eJydjMEKgzAQRP+mp8YoqNSD9FtiXJqVbEx3V6V/3xyU3gsDb+Yw78gGk4/bDGKXkvcG/DlhCF/sFCrCVC1yP7Lxa1JIajUAlQfsZRhRx9aJgIqNOLErhqAUOwm4/9o/GgbJa5ovnoonjU3/aNuh7rv65qex+QLYKUoG (2)
887
+[0728/195722.627:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.0", source: https://gcm-smart.com/_jb_static/??-eJydjMEKgzAQRP+mp8YoqNSD9FtiXJqVbEx3V6V/3xyU3gsDb+Yw78gGk4/bDGKXkvcG/DlhCF/sFCrCVC1yP7Lxa1JIajUAlQfsZRhRx9aJgIqNOLErhqAUOwm4/9o/GgbJa5ovnoonjU3/aNuh7rv65qex+QLYKUoG (2)
888
+[0728/200458.548:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
889
+[0728/200505.572:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
890
+ERROR: Couldn't read tbsCertificate as SEQUENCE
891
+ERROR: Failed parsing Certificate
892
+
893
+[0728/200506.665:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.0", source: https://gcm-smart.com/_jb_static/??-eJydjMEKgzAQRP+mp8YoqNSD9FtiXJqVbEx3V6V/3xyU3gsDb+Yw78gGk4/bDGKXkvcG/DlhCF/sFCrCVC1yP7Lxa1JIajUAlQfsZRhRx9aJgIqNOLErhqAUOwm4/9o/GgbJa5ovnoonjU3/aNuh7rv65qex+QLYKUoG (2)
894
+[0728/200520.609:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.0", source: https://gcm-smart.com/_jb_static/??-eJydjMEKgzAQRP+mp8YoqNSD9FtiXJqVbEx3V6V/3xyU3gsDb+Yw78gGk4/bDGKXkvcG/DlhCF/sFCrCVC1yP7Lxa1JIajUAlQfsZRhRx9aJgIqNOLErhqAUOwm4/9o/GgbJa5ovnoonjU3/aNuh7rv65qex+QLYKUoG (2)

Binārs
GA-ERP-SYS/obj/Debug/GA-ERP-SYS.exe Parādīt failu


Binārs
GA-ERP-SYS/obj/Debug/GA-ERP-SYS.pdb Parādīt failu


Binārs
GA-ERP-SYS/obj/Debug/GA-ERP-SYS.vbproj.GenerateResource.cache Parādīt failu


+ 37
- 37
GA-ERP-SYS/報表系統管理/後台/後台帳務彙總結算表.Designer.vb Parādīt failu

@@ -145,9 +145,9 @@ Partial Class 後台帳務彙總結算表
145 145
         '結束日期_dtp
146 146
         '
147 147
         Me.結束日期_dtp.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
148
-        Me.結束日期_dtp.Location = New System.Drawing.Point(49, 2)
148
+        Me.結束日期_dtp.Location = New System.Drawing.Point(47, 2)
149 149
         Me.結束日期_dtp.Name = "結束日期_dtp"
150
-        Me.結束日期_dtp.Size = New System.Drawing.Size(100, 23)
150
+        Me.結束日期_dtp.Size = New System.Drawing.Size(85, 23)
151 151
         Me.結束日期_dtp.TabIndex = 1771
152 152
         '
153 153
         '開始日期_dtp
@@ -209,9 +209,9 @@ Partial Class 後台帳務彙總結算表
209 209
         '結果_tb
210 210
         '
211 211
         Me.結果_tb.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer))
212
-        Me.結果_tb.Location = New System.Drawing.Point(49, 25)
212
+        Me.結果_tb.Location = New System.Drawing.Point(47, 25)
213 213
         Me.結果_tb.Name = "結果_tb"
214
-        Me.結果_tb.Size = New System.Drawing.Size(100, 23)
214
+        Me.結果_tb.Size = New System.Drawing.Size(85, 23)
215 215
         Me.結果_tb.TabIndex = 1782
216 216
         Me.結果_tb.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
217 217
         '
@@ -239,14 +239,14 @@ Partial Class 後台帳務彙總結算表
239 239
         Me.Panel1.Controls.Add(Me.彙總5_dgv)
240 240
         Me.Panel1.Location = New System.Drawing.Point(198, 0)
241 241
         Me.Panel1.Name = "Panel1"
242
-        Me.Panel1.Size = New System.Drawing.Size(918, 651)
242
+        Me.Panel1.Size = New System.Drawing.Size(858, 651)
243 243
         Me.Panel1.TabIndex = 1783
244 244
         '
245 245
         'PictureBox1
246 246
         '
247 247
         Me.PictureBox1.BackgroundImage = Global.GA_ERP_SYS.My.Resources.Resources.S__20029698
248 248
         Me.PictureBox1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
249
-        Me.PictureBox1.Location = New System.Drawing.Point(146, 1)
249
+        Me.PictureBox1.Location = New System.Drawing.Point(135, 1)
250 250
         Me.PictureBox1.Name = "PictureBox1"
251 251
         Me.PictureBox1.Size = New System.Drawing.Size(50, 50)
252 252
         Me.PictureBox1.TabIndex = 1825
@@ -263,20 +263,20 @@ Partial Class 後台帳務彙總結算表
263 263
         Me.廣告_tb.Location = New System.Drawing.Point(3, 611)
264 264
         Me.廣告_tb.Multiline = True
265 265
         Me.廣告_tb.Name = "廣告_tb"
266
-        Me.廣告_tb.Size = New System.Drawing.Size(912, 38)
266
+        Me.廣告_tb.Size = New System.Drawing.Size(852, 38)
267 267
         Me.廣告_tb.TabIndex = 1824
268 268
         Me.廣告_tb.Text = "歡迎專業水站、100%版主、多版經營者、致富網為您提供快速準確自動抓版合帳的系統 [前一個月免費試用喔,請洽 Line ID 3078888] "
269 269
         Me.廣告_tb.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
270 270
         '
271 271
         'A4_P
272 272
         '
273
-        Me.A4_P.Controls.Add(Me.Label18)
274 273
         Me.A4_P.Controls.Add(Me.結果2_tb)
275 274
         Me.A4_P.Controls.Add(Me.年初_dtp)
275
+        Me.A4_P.Controls.Add(Me.Label18)
276 276
         Me.A4_P.Controls.Add(Me.Label15)
277
-        Me.A4_P.Location = New System.Drawing.Point(761, 2)
277
+        Me.A4_P.Location = New System.Drawing.Point(683, 2)
278 278
         Me.A4_P.Name = "A4_P"
279
-        Me.A4_P.Size = New System.Drawing.Size(153, 50)
279
+        Me.A4_P.Size = New System.Drawing.Size(132, 50)
280 280
         Me.A4_P.TabIndex = 1822
281 281
         '
282 282
         'Label18
@@ -291,18 +291,18 @@ Partial Class 後台帳務彙總結算表
291 291
         '結果2_tb
292 292
         '
293 293
         Me.結果2_tb.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer))
294
-        Me.結果2_tb.Location = New System.Drawing.Point(48, 25)
294
+        Me.結果2_tb.Location = New System.Drawing.Point(46, 25)
295 295
         Me.結果2_tb.Name = "結果2_tb"
296
-        Me.結果2_tb.Size = New System.Drawing.Size(100, 23)
296
+        Me.結果2_tb.Size = New System.Drawing.Size(85, 23)
297 297
         Me.結果2_tb.TabIndex = 1816
298 298
         Me.結果2_tb.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
299 299
         '
300 300
         '年初_dtp
301 301
         '
302 302
         Me.年初_dtp.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
303
-        Me.年初_dtp.Location = New System.Drawing.Point(48, 2)
303
+        Me.年初_dtp.Location = New System.Drawing.Point(46, 2)
304 304
         Me.年初_dtp.Name = "年初_dtp"
305
-        Me.年初_dtp.Size = New System.Drawing.Size(100, 23)
305
+        Me.年初_dtp.Size = New System.Drawing.Size(85, 23)
306 306
         Me.年初_dtp.TabIndex = 1817
307 307
         '
308 308
         'Label15
@@ -316,13 +316,13 @@ Partial Class 後台帳務彙總結算表
316 316
         '
317 317
         'A3_P
318 318
         '
319
-        Me.A3_P.Controls.Add(Me.Label3)
320
-        Me.A3_P.Controls.Add(Me.Label5)
321 319
         Me.A3_P.Controls.Add(Me.月初_dtp)
322 320
         Me.A3_P.Controls.Add(Me.結果3_tb)
323
-        Me.A3_P.Location = New System.Drawing.Point(579, 2)
321
+        Me.A3_P.Controls.Add(Me.Label3)
322
+        Me.A3_P.Controls.Add(Me.Label5)
323
+        Me.A3_P.Location = New System.Drawing.Point(522, 2)
324 324
         Me.A3_P.Name = "A3_P"
325
-        Me.A3_P.Size = New System.Drawing.Size(153, 50)
325
+        Me.A3_P.Size = New System.Drawing.Size(132, 50)
326 326
         Me.A3_P.TabIndex = 1821
327 327
         '
328 328
         'Label3
@@ -346,29 +346,29 @@ Partial Class 後台帳務彙總結算表
346 346
         '月初_dtp
347 347
         '
348 348
         Me.月初_dtp.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
349
-        Me.月初_dtp.Location = New System.Drawing.Point(47, 2)
349
+        Me.月初_dtp.Location = New System.Drawing.Point(45, 2)
350 350
         Me.月初_dtp.Name = "月初_dtp"
351
-        Me.月初_dtp.Size = New System.Drawing.Size(100, 23)
351
+        Me.月初_dtp.Size = New System.Drawing.Size(85, 23)
352 352
         Me.月初_dtp.TabIndex = 1786
353 353
         '
354 354
         '結果3_tb
355 355
         '
356 356
         Me.結果3_tb.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer))
357
-        Me.結果3_tb.Location = New System.Drawing.Point(47, 25)
357
+        Me.結果3_tb.Location = New System.Drawing.Point(45, 25)
358 358
         Me.結果3_tb.Name = "結果3_tb"
359
-        Me.結果3_tb.Size = New System.Drawing.Size(100, 23)
359
+        Me.結果3_tb.Size = New System.Drawing.Size(85, 23)
360 360
         Me.結果3_tb.TabIndex = 1784
361 361
         Me.結果3_tb.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
362 362
         '
363 363
         'A2_P
364 364
         '
365
-        Me.A2_P.Controls.Add(Me.Label4)
366
-        Me.A2_P.Controls.Add(Me.Label14)
367 365
         Me.A2_P.Controls.Add(Me.本周周一_dtp)
368 366
         Me.A2_P.Controls.Add(Me.結果1_tb)
369
-        Me.A2_P.Location = New System.Drawing.Point(397, 2)
367
+        Me.A2_P.Controls.Add(Me.Label4)
368
+        Me.A2_P.Controls.Add(Me.Label14)
369
+        Me.A2_P.Location = New System.Drawing.Point(361, 2)
370 370
         Me.A2_P.Name = "A2_P"
371
-        Me.A2_P.Size = New System.Drawing.Size(153, 50)
371
+        Me.A2_P.Size = New System.Drawing.Size(132, 50)
372 372
         Me.A2_P.TabIndex = 1820
373 373
         '
374 374
         'Label4
@@ -392,36 +392,36 @@ Partial Class 後台帳務彙總結算表
392 392
         '本周周一_dtp
393 393
         '
394 394
         Me.本周周一_dtp.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
395
-        Me.本周周一_dtp.Location = New System.Drawing.Point(47, 2)
395
+        Me.本周周一_dtp.Location = New System.Drawing.Point(45, 2)
396 396
         Me.本周周一_dtp.Name = "本周周一_dtp"
397
-        Me.本周周一_dtp.Size = New System.Drawing.Size(100, 23)
397
+        Me.本周周一_dtp.Size = New System.Drawing.Size(85, 23)
398 398
         Me.本周周一_dtp.TabIndex = 1783
399 399
         '
400 400
         '結果1_tb
401 401
         '
402 402
         Me.結果1_tb.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer))
403
-        Me.結果1_tb.Location = New System.Drawing.Point(48, 25)
403
+        Me.結果1_tb.Location = New System.Drawing.Point(46, 25)
404 404
         Me.結果1_tb.Name = "結果1_tb"
405
-        Me.結果1_tb.Size = New System.Drawing.Size(100, 23)
405
+        Me.結果1_tb.Size = New System.Drawing.Size(84, 23)
406 406
         Me.結果1_tb.TabIndex = 1812
407 407
         Me.結果1_tb.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
408 408
         '
409 409
         'A1_P
410 410
         '
411
-        Me.A1_P.Controls.Add(Me.Label1)
412
-        Me.A1_P.Controls.Add(Me.Label26)
413 411
         Me.A1_P.Controls.Add(Me.結束日期_dtp)
414 412
         Me.A1_P.Controls.Add(Me.結果_tb)
415
-        Me.A1_P.Location = New System.Drawing.Point(215, 2)
413
+        Me.A1_P.Controls.Add(Me.Label1)
414
+        Me.A1_P.Controls.Add(Me.Label26)
415
+        Me.A1_P.Location = New System.Drawing.Point(200, 2)
416 416
         Me.A1_P.Name = "A1_P"
417
-        Me.A1_P.Size = New System.Drawing.Size(153, 50)
417
+        Me.A1_P.Size = New System.Drawing.Size(132, 50)
418 418
         Me.A1_P.TabIndex = 1819
419 419
         '
420 420
         'PictureBox2
421 421
         '
422 422
         Me.PictureBox2.BackgroundImage = Global.GA_ERP_SYS.My.Resources.Resources._9f4d0b564d950c8de255241c1b6c560
423 423
         Me.PictureBox2.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
424
-        Me.PictureBox2.Location = New System.Drawing.Point(3, 2)
424
+        Me.PictureBox2.Location = New System.Drawing.Point(1, 2)
425 425
         Me.PictureBox2.Name = "PictureBox2"
426 426
         Me.PictureBox2.Size = New System.Drawing.Size(139, 50)
427 427
         Me.PictureBox2.TabIndex = 1769
@@ -442,7 +442,7 @@ Partial Class 後台帳務彙總結算表
442 442
         DataGridViewCellStyle2.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
443 443
         Me.彙總5_dgv.RowsDefaultCellStyle = DataGridViewCellStyle2
444 444
         Me.彙總5_dgv.RowTemplate.Height = 24
445
-        Me.彙總5_dgv.Size = New System.Drawing.Size(911, 559)
445
+        Me.彙總5_dgv.Size = New System.Drawing.Size(851, 559)
446 446
         Me.彙總5_dgv.TabIndex = 1813
447 447
         '
448 448
         '彙總3_dgv
@@ -834,7 +834,7 @@ Partial Class 後台帳務彙總結算表
834 834
         '
835 835
         Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!)
836 836
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
837
-        Me.ClientSize = New System.Drawing.Size(1117, 651)
837
+        Me.ClientSize = New System.Drawing.Size(1057, 651)
838 838
         Me.Controls.Add(Me.顯年_ch)
839 839
         Me.Controls.Add(Me.顯日_ch)
840 840
         Me.Controls.Add(Me.顯周_ch)

+ 43
- 34
GA-ERP-SYS/報表系統管理/後台/後台帳務彙總結算表.vb Parādīt failu

@@ -349,9 +349,9 @@ Public Class 後台帳務彙總結算表
349 349
         Else : 彙總5_dgv.RowTemplate.Height = 25 : End If
350 350
 
351 351
         彙總5_dgv.Columns("項次").FillWeight = 40 : 彙總5_dgv.Columns("商品 (元)").FillWeight = 80 : 彙總5_dgv.Columns("系統").FillWeight = 40
352
-        彙總5_dgv.Columns("貢獻度-日").FillWeight = 80 : 彙總5_dgv.Columns("結果-日").FillWeight = 80 : 彙總5_dgv.Columns("貢獻度-周").FillWeight = 80
353
-        彙總5_dgv.Columns("結果-周").FillWeight = 80 : 彙總5_dgv.Columns("貢獻度-月").FillWeight = 80 : 彙總5_dgv.Columns("結果-月").FillWeight = 80
354
-        彙總5_dgv.Columns("結果-年").FillWeight = 80 : 彙總5_dgv.Columns("貢獻度-年").FillWeight = 80
352
+        彙總5_dgv.Columns("貢獻度-日").FillWeight = 65 : 彙總5_dgv.Columns("結果-日").FillWeight = 60 : 彙總5_dgv.Columns("貢獻度-周").FillWeight = 65
353
+        彙總5_dgv.Columns("結果-周").FillWeight = 60 : 彙總5_dgv.Columns("貢獻度-月").FillWeight = 65 : 彙總5_dgv.Columns("結果-月").FillWeight = 60
354
+        彙總5_dgv.Columns("結果-年").FillWeight = 60 : 彙總5_dgv.Columns("貢獻度-年").FillWeight = 65
355 355
         彙總5_dgv.Columns("貢獻度-日1").Visible = False : 彙總5_dgv.Columns("貢獻度-周1").Visible = False : 彙總5_dgv.Columns("結果-日1").Visible = False
356 356
         彙總5_dgv.Columns("結果-周1").Visible = False : 彙總5_dgv.Columns("貢獻度-月1").Visible = False : 彙總5_dgv.Columns("結果-月1").Visible = False
357 357
         彙總5_dgv.Columns("結果-年1").Visible = False : 彙總5_dgv.Columns("貢獻度-年1").Visible = False
@@ -522,109 +522,118 @@ Public Class 後台帳務彙總結算表
522 522
         End If : 本周周一_dtp.Value = 結束日期1_dtp.Value.AddDays(-6) : 結束日期1_dtp.Value = Today()
523 523
     End Sub
524 524
     Private Sub 顯示()
525
+        Dim ASD(7) As Integer
526
+        ASD(0) = 527 + 8
527
+        ASD(1) = 215 - 33
528
+        ASD(2) = 733 - 66
529
+        ASD(3) = 376 - 60
530
+        ASD(4) = 894 - 94
531
+        ASD(5) = 537 - 90
532
+        ASD(6) = 1055 - 130
533
+        ASD(7) = 698 - 125
525 534
         If 彙總5_dgv.Rows.Count > 0 Then
526 535
             If 顯日_ch.Checked = True And 顯周_ch.Checked = False And 顯月_ch.Checked = False And 顯年_ch.Checked = False Then
527
-                Me.Size = New Size(587, Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = True : A2_P.Visible = False : A3_P.Visible = False : A4_P.Visible = False
528
-                A1_P.Location = New System.Drawing.Point(215, 2)
536
+                Me.Size = New Size(ASD(0), Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = True : A2_P.Visible = False : A3_P.Visible = False : A4_P.Visible = False
537
+                A1_P.Location = New System.Drawing.Point(ASD(1), 2)
529 538
                 彙總5_dgv.Columns("貢獻度-日").Visible = True : 彙總5_dgv.Columns("結果-日").Visible = True : 彙總5_dgv.Columns("貢獻度-周").Visible = False
530 539
                 彙總5_dgv.Columns("結果-周").Visible = False : 彙總5_dgv.Columns("貢獻度-月").Visible = False : 彙總5_dgv.Columns("結果-月").Visible = False
531 540
                 彙總5_dgv.Columns("結果-年").Visible = False : 彙總5_dgv.Columns("貢獻度-年").Visible = False
532 541
                 廣告_tb.Font = New System.Drawing.Font("標楷體", 8.75, FontStyle.Bold)
533 542
             ElseIf 顯日_ch.Checked = False And 顯周_ch.Checked = True And 顯月_ch.Checked = False And 顯年_ch.Checked = False Then
534
-                Me.Size = New Size(587, Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = False : A2_P.Visible = True : A3_P.Visible = False : A4_P.Visible = False
535
-                A2_P.Location = New System.Drawing.Point(215, 2)
543
+                Me.Size = New Size(ASD(0), Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = False : A2_P.Visible = True : A3_P.Visible = False : A4_P.Visible = False
544
+                A2_P.Location = New System.Drawing.Point(ASD(1), 2)
536 545
                 彙總5_dgv.Columns("貢獻度-日").Visible = False : 彙總5_dgv.Columns("結果-日").Visible = False : 彙總5_dgv.Columns("貢獻度-周").Visible = True
537 546
                 彙總5_dgv.Columns("結果-周").Visible = True : 彙總5_dgv.Columns("貢獻度-月").Visible = False : 彙總5_dgv.Columns("結果-月").Visible = False
538 547
                 彙總5_dgv.Columns("結果-年").Visible = False : 彙總5_dgv.Columns("貢獻度-年").Visible = False
539 548
                 廣告_tb.Font = New System.Drawing.Font("標楷體", 8.75, FontStyle.Bold)
540 549
             ElseIf 顯日_ch.Checked = False And 顯周_ch.Checked = False And 顯月_ch.Checked = True And 顯年_ch.Checked = False Then
541
-                Me.Size = New Size(587, Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = False : A2_P.Visible = False : A3_P.Visible = True : A4_P.Visible = False
542
-                A3_P.Location = New System.Drawing.Point(215, 2)
550
+                Me.Size = New Size(ASD(0), Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = False : A2_P.Visible = False : A3_P.Visible = True : A4_P.Visible = False
551
+                A3_P.Location = New System.Drawing.Point(ASD(1), 2)
543 552
                 彙總5_dgv.Columns("貢獻度-日").Visible = False : 彙總5_dgv.Columns("結果-日").Visible = False : 彙總5_dgv.Columns("貢獻度-周").Visible = False
544 553
                 彙總5_dgv.Columns("結果-周").Visible = False : 彙總5_dgv.Columns("貢獻度-月").Visible = True : 彙總5_dgv.Columns("結果-月").Visible = True
545 554
                 彙總5_dgv.Columns("結果-年").Visible = False : 彙總5_dgv.Columns("貢獻度-年").Visible = False
546 555
                 廣告_tb.Font = New System.Drawing.Font("標楷體", 8.75, FontStyle.Bold)
547 556
             ElseIf 顯日_ch.Checked = False And 顯周_ch.Checked = False And 顯月_ch.Checked = False And 顯年_ch.Checked = True Then
548
-                Me.Size = New Size(587, Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = False : A2_P.Visible = False : A3_P.Visible = False : A4_P.Visible = True
549
-                A4_P.Location = New System.Drawing.Point(215, 2)
557
+                Me.Size = New Size(ASD(0), Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = False : A2_P.Visible = False : A3_P.Visible = False : A4_P.Visible = True
558
+                A4_P.Location = New System.Drawing.Point(ASD(1), 2)
550 559
                 彙總5_dgv.Columns("貢獻度-日").Visible = False : 彙總5_dgv.Columns("結果-日").Visible = False : 彙總5_dgv.Columns("貢獻度-周").Visible = False
551 560
                 彙總5_dgv.Columns("結果-周").Visible = False : 彙總5_dgv.Columns("貢獻度-月").Visible = False : 彙總5_dgv.Columns("結果-月").Visible = False
552 561
                 彙總5_dgv.Columns("結果-年").Visible = True : 彙總5_dgv.Columns("貢獻度-年").Visible = True
553 562
                 廣告_tb.Font = New System.Drawing.Font("標楷體", 8.75, FontStyle.Bold)
554 563
             ElseIf 顯日_ch.Checked = True And 顯周_ch.Checked = True And 顯月_ch.Checked = False And 顯年_ch.Checked = False Then
555
-                Me.Size = New Size(769, Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = True : A2_P.Visible = True : A3_P.Visible = False : A4_P.Visible = False
556
-                A1_P.Location = New System.Drawing.Point(215, 2) : A2_P.Location = New System.Drawing.Point(397, 2)
564
+                Me.Size = New Size(ASD(2), Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = True : A2_P.Visible = True : A3_P.Visible = False : A4_P.Visible = False
565
+                A1_P.Location = New System.Drawing.Point(ASD(1), 2) : A2_P.Location = New System.Drawing.Point(ASD(3), 2)
557 566
                 彙總5_dgv.Columns("貢獻度-日").Visible = True : 彙總5_dgv.Columns("結果-日").Visible = True : 彙總5_dgv.Columns("貢獻度-周").Visible = True
558 567
                 彙總5_dgv.Columns("結果-周").Visible = True : 彙總5_dgv.Columns("貢獻度-月").Visible = False : 彙總5_dgv.Columns("結果-月").Visible = False
559 568
                 彙總5_dgv.Columns("結果-年").Visible = False : 彙總5_dgv.Columns("貢獻度-年").Visible = False
560 569
                 廣告_tb.Font = New System.Drawing.Font("標楷體", 9.75, FontStyle.Bold)
561 570
             ElseIf 顯日_ch.Checked = True And 顯周_ch.Checked = False And 顯月_ch.Checked = True And 顯年_ch.Checked = False Then
562
-                Me.Size = New Size(769, Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = True : A2_P.Visible = False : A3_P.Visible = True : A4_P.Visible = False
563
-                A1_P.Location = New System.Drawing.Point(215, 2) : A3_P.Location = New System.Drawing.Point(397, 2)
571
+                Me.Size = New Size(ASD(2), Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = True : A2_P.Visible = False : A3_P.Visible = True : A4_P.Visible = False
572
+                A1_P.Location = New System.Drawing.Point(ASD(1), 2) : A3_P.Location = New System.Drawing.Point(ASD(3), 2)
564 573
                 彙總5_dgv.Columns("貢獻度-日").Visible = True : 彙總5_dgv.Columns("結果-日").Visible = True : 彙總5_dgv.Columns("貢獻度-周").Visible = False
565 574
                 彙總5_dgv.Columns("結果-周").Visible = False : 彙總5_dgv.Columns("貢獻度-月").Visible = True : 彙總5_dgv.Columns("結果-月").Visible = True
566 575
                 彙總5_dgv.Columns("結果-年").Visible = False : 彙總5_dgv.Columns("貢獻度-年").Visible = False
567 576
                 廣告_tb.Font = New System.Drawing.Font("標楷體", 9.75, FontStyle.Bold)
568 577
             ElseIf 顯日_ch.Checked = True And 顯周_ch.Checked = False And 顯月_ch.Checked = False And 顯年_ch.Checked = True Then
569
-                Me.Size = New Size(769, Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = True : A2_P.Visible = False : A3_P.Visible = False : A4_P.Visible = True
570
-                A1_P.Location = New System.Drawing.Point(215, 2) : A4_P.Location = New System.Drawing.Point(397, 2)
578
+                Me.Size = New Size(ASD(2), Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = True : A2_P.Visible = False : A3_P.Visible = False : A4_P.Visible = True
579
+                A1_P.Location = New System.Drawing.Point(ASD(1), 2) : A4_P.Location = New System.Drawing.Point(ASD(3), 2)
571 580
                 彙總5_dgv.Columns("貢獻度-日").Visible = True : 彙總5_dgv.Columns("結果-日").Visible = True : 彙總5_dgv.Columns("貢獻度-周").Visible = False
572 581
                 彙總5_dgv.Columns("結果-周").Visible = False : 彙總5_dgv.Columns("貢獻度-月").Visible = False : 彙總5_dgv.Columns("結果-月").Visible = False
573 582
                 彙總5_dgv.Columns("結果-年").Visible = True : 彙總5_dgv.Columns("貢獻度-年").Visible = True
574 583
                 廣告_tb.Font = New System.Drawing.Font("標楷體", 9.75, FontStyle.Bold)
575 584
             ElseIf 顯日_ch.Checked = False And 顯周_ch.Checked = True And 顯月_ch.Checked = True And 顯年_ch.Checked = False Then
576
-                Me.Size = New Size(769, Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = False : A2_P.Visible = True : A3_P.Visible = True : A4_P.Visible = False
577
-                A2_P.Location = New System.Drawing.Point(215, 2) : A3_P.Location = New System.Drawing.Point(397, 2)
585
+                Me.Size = New Size(ASD(2), Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = False : A2_P.Visible = True : A3_P.Visible = True : A4_P.Visible = False
586
+                A2_P.Location = New System.Drawing.Point(ASD(1), 2) : A3_P.Location = New System.Drawing.Point(ASD(3), 2)
578 587
                 彙總5_dgv.Columns("貢獻度-日").Visible = False : 彙總5_dgv.Columns("結果-日").Visible = False : 彙總5_dgv.Columns("貢獻度-周").Visible = True
579 588
                 彙總5_dgv.Columns("結果-周").Visible = True : 彙總5_dgv.Columns("貢獻度-月").Visible = True : 彙總5_dgv.Columns("結果-月").Visible = True
580 589
                 彙總5_dgv.Columns("結果-年").Visible = False : 彙總5_dgv.Columns("貢獻度-年").Visible = False
581 590
                 廣告_tb.Font = New System.Drawing.Font("標楷體", 9.75, FontStyle.Bold)
582 591
             ElseIf 顯日_ch.Checked = False And 顯周_ch.Checked = True And 顯月_ch.Checked = False And 顯年_ch.Checked = True Then
583
-                Me.Size = New Size(769, Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = False : A2_P.Visible = True : A3_P.Visible = False : A4_P.Visible = True
584
-                A2_P.Location = New System.Drawing.Point(215, 2) : A4_P.Location = New System.Drawing.Point(397, 2)
592
+                Me.Size = New Size(ASD(2), Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = False : A2_P.Visible = True : A3_P.Visible = False : A4_P.Visible = True
593
+                A2_P.Location = New System.Drawing.Point(ASD(1), 2) : A4_P.Location = New System.Drawing.Point(ASD(3), 2)
585 594
                 彙總5_dgv.Columns("貢獻度-日").Visible = False : 彙總5_dgv.Columns("結果-日").Visible = False : 彙總5_dgv.Columns("貢獻度-周").Visible = True
586 595
                 彙總5_dgv.Columns("結果-周").Visible = True : 彙總5_dgv.Columns("貢獻度-月").Visible = False : 彙總5_dgv.Columns("結果-月").Visible = False
587 596
                 彙總5_dgv.Columns("結果-年").Visible = True : 彙總5_dgv.Columns("貢獻度-年").Visible = True
588 597
                 廣告_tb.Font = New System.Drawing.Font("標楷體", 9.75, FontStyle.Bold)
589 598
             ElseIf 顯日_ch.Checked = False And 顯周_ch.Checked = False And 顯月_ch.Checked = True And 顯年_ch.Checked = True Then
590
-                Me.Size = New Size(769, Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = False : A2_P.Visible = False : A3_P.Visible = True : A4_P.Visible = True
591
-                A3_P.Location = New System.Drawing.Point(215, 2) : A4_P.Location = New System.Drawing.Point(397, 2)
599
+                Me.Size = New Size(ASD(2), Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = False : A2_P.Visible = False : A3_P.Visible = True : A4_P.Visible = True
600
+                A3_P.Location = New System.Drawing.Point(ASD(1), 2) : A4_P.Location = New System.Drawing.Point(ASD(3), 2)
592 601
                 彙總5_dgv.Columns("貢獻度-日").Visible = False : 彙總5_dgv.Columns("結果-日").Visible = False : 彙總5_dgv.Columns("貢獻度-周").Visible = False
593 602
                 彙總5_dgv.Columns("結果-周").Visible = False : 彙總5_dgv.Columns("貢獻度-月").Visible = True : 彙總5_dgv.Columns("結果-月").Visible = True
594 603
                 彙總5_dgv.Columns("結果-年").Visible = True : 彙總5_dgv.Columns("貢獻度-年").Visible = True
595 604
                 廣告_tb.Font = New System.Drawing.Font("標楷體", 9.75, FontStyle.Bold)
596 605
             ElseIf 顯日_ch.Checked = True And 顯周_ch.Checked = True And 顯月_ch.Checked = True And 顯年_ch.Checked = False Then
597
-                Me.Size = New Size(951, Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = True : A2_P.Visible = True : A3_P.Visible = True : A4_P.Visible = False
598
-                A1_P.Location = New System.Drawing.Point(215, 2) : A2_P.Location = New System.Drawing.Point(397, 2) : A3_P.Location = New System.Drawing.Point(579, 2)
606
+                Me.Size = New Size(ASD(4), Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = True : A2_P.Visible = True : A3_P.Visible = True : A4_P.Visible = False
607
+                A1_P.Location = New System.Drawing.Point(ASD(1), 2) : A2_P.Location = New System.Drawing.Point(ASD(3), 2) : A3_P.Location = New System.Drawing.Point(ASD(5), 2)
599 608
                 彙總5_dgv.Columns("貢獻度-日").Visible = True : 彙總5_dgv.Columns("結果-日").Visible = True : 彙總5_dgv.Columns("貢獻度-周").Visible = True
600 609
                 彙總5_dgv.Columns("結果-周").Visible = True : 彙總5_dgv.Columns("貢獻度-月").Visible = True : 彙總5_dgv.Columns("結果-月").Visible = True
601 610
                 彙總5_dgv.Columns("結果-年").Visible = False : 彙總5_dgv.Columns("貢獻度-年").Visible = False
602 611
                 廣告_tb.Font = New System.Drawing.Font("標楷體", 12.75, FontStyle.Bold)
603 612
             ElseIf 顯日_ch.Checked = True And 顯周_ch.Checked = True And 顯月_ch.Checked = False And 顯年_ch.Checked = True Then
604
-                Me.Size = New Size(951, Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = True : A2_P.Visible = True : A3_P.Visible = False : A4_P.Visible = True
605
-                A1_P.Location = New System.Drawing.Point(215, 2) : A2_P.Location = New System.Drawing.Point(397, 2) : A4_P.Location = New System.Drawing.Point(579, 2)
613
+                Me.Size = New Size(ASD(4), Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = True : A2_P.Visible = True : A3_P.Visible = False : A4_P.Visible = True
614
+                A1_P.Location = New System.Drawing.Point(ASD(1), 2) : A2_P.Location = New System.Drawing.Point(ASD(3), 2) : A4_P.Location = New System.Drawing.Point(ASD(5), 2)
606 615
                 彙總5_dgv.Columns("貢獻度-日").Visible = True : 彙總5_dgv.Columns("結果-日").Visible = True : 彙總5_dgv.Columns("貢獻度-周").Visible = True
607 616
                 彙總5_dgv.Columns("結果-周").Visible = True : 彙總5_dgv.Columns("貢獻度-月").Visible = False : 彙總5_dgv.Columns("結果-月").Visible = False
608 617
                 彙總5_dgv.Columns("結果-年").Visible = True : 彙總5_dgv.Columns("貢獻度-年").Visible = True
609 618
                 廣告_tb.Font = New System.Drawing.Font("標楷體", 12.75, FontStyle.Bold)
610 619
             ElseIf 顯日_ch.Checked = True And 顯周_ch.Checked = False And 顯月_ch.Checked = True And 顯年_ch.Checked = True Then
611
-                Me.Size = New Size(951, Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = True : A2_P.Visible = False : A3_P.Visible = True : A4_P.Visible = True
612
-                A1_P.Location = New System.Drawing.Point(215, 2) : A3_P.Location = New System.Drawing.Point(397, 2) : A4_P.Location = New System.Drawing.Point(579, 2)
620
+                Me.Size = New Size(ASD(4), Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = True : A2_P.Visible = False : A3_P.Visible = True : A4_P.Visible = True
621
+                A1_P.Location = New System.Drawing.Point(ASD(1), 2) : A3_P.Location = New System.Drawing.Point(ASD(3), 2) : A4_P.Location = New System.Drawing.Point(ASD(5), 2)
613 622
                 彙總5_dgv.Columns("貢獻度-日").Visible = True : 彙總5_dgv.Columns("結果-日").Visible = True : 彙總5_dgv.Columns("貢獻度-周").Visible = False
614 623
                 彙總5_dgv.Columns("結果-周").Visible = False : 彙總5_dgv.Columns("貢獻度-月").Visible = True : 彙總5_dgv.Columns("結果-月").Visible = True
615 624
                 彙總5_dgv.Columns("結果-年").Visible = True : 彙總5_dgv.Columns("貢獻度-年").Visible = True
616 625
                 廣告_tb.Font = New System.Drawing.Font("標楷體", 12.75, FontStyle.Bold)
617 626
             ElseIf 顯日_ch.Checked = False And 顯周_ch.Checked = True And 顯月_ch.Checked = True And 顯年_ch.Checked = True Then
618
-                Me.Size = New Size(951, Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = False : A2_P.Visible = True : A3_P.Visible = True : A4_P.Visible = True
619
-                A2_P.Location = New System.Drawing.Point(215, 2) : A3_P.Location = New System.Drawing.Point(397, 2) : A4_P.Location = New System.Drawing.Point(579, 2)
627
+                Me.Size = New Size(ASD(4), Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = False : A2_P.Visible = True : A3_P.Visible = True : A4_P.Visible = True
628
+                A2_P.Location = New System.Drawing.Point(ASD(1), 2) : A3_P.Location = New System.Drawing.Point(ASD(3), 2) : A4_P.Location = New System.Drawing.Point(ASD(5), 2)
620 629
                 彙總5_dgv.Columns("貢獻度-日").Visible = False : 彙總5_dgv.Columns("結果-日").Visible = False : 彙總5_dgv.Columns("貢獻度-周").Visible = True
621 630
                 彙總5_dgv.Columns("結果-周").Visible = True : 彙總5_dgv.Columns("貢獻度-月").Visible = True : 彙總5_dgv.Columns("結果-月").Visible = True
622 631
                 彙總5_dgv.Columns("結果-年").Visible = True : 彙總5_dgv.Columns("貢獻度-年").Visible = True
623 632
                 廣告_tb.Font = New System.Drawing.Font("標楷體", 12.75, FontStyle.Bold)
624 633
             ElseIf 顯日_ch.Checked = True And 顯周_ch.Checked = True And 顯月_ch.Checked = True And 顯年_ch.Checked = True Then
625
-                Me.Size = New Size(1133, Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = True : A2_P.Visible = True : A3_P.Visible = True : A4_P.Visible = True
626
-                A1_P.Location = New System.Drawing.Point(215, 2) : A2_P.Location = New System.Drawing.Point(397, 2)
627
-                A3_P.Location = New System.Drawing.Point(579, 2) : A4_P.Location = New System.Drawing.Point(761, 2)
634
+                Me.Size = New Size(ASD(6), Screen.PrimaryScreen.Bounds.Height - 視窗減項) : A1_P.Visible = True : A2_P.Visible = True : A3_P.Visible = True : A4_P.Visible = True
635
+                A1_P.Location = New System.Drawing.Point(ASD(1), 2) : A2_P.Location = New System.Drawing.Point(ASD(3), 2)
636
+                A3_P.Location = New System.Drawing.Point(ASD(5), 2) : A4_P.Location = New System.Drawing.Point(ASD(7), 2)
628 637
                 彙總5_dgv.Columns("貢獻度-日").Visible = True : 彙總5_dgv.Columns("結果-日").Visible = True : 彙總5_dgv.Columns("貢獻度-周").Visible = True
629 638
                 彙總5_dgv.Columns("結果-周").Visible = True : 彙總5_dgv.Columns("貢獻度-月").Visible = True : 彙總5_dgv.Columns("結果-月").Visible = True
630 639
                 彙總5_dgv.Columns("結果-年").Visible = True : 彙總5_dgv.Columns("貢獻度-年").Visible = True

Notiek ielāde…
Atcelt
Saglabāt