B70340 пре 1 година
родитељ
комит
3770a1232e
18 измењених фајлова са 951 додато и 428 уклоњено
  1. BIN
      工巧明智能管理系統/.vs/我的系統/FileContentIndex/7f74b902-99f0-44f6-bdac-ceb0ba4e2947.vsidx
  2. BIN
      工巧明智能管理系統/.vs/我的系統/FileContentIndex/b73b4aef-0b2d-410b-acd7-a1adb9c4db3f.vsidx
  3. BIN
      工巧明智能管理系統/.vs/我的系統/v17/.suo
  4. 1
    1
      工巧明智能管理系統/我的系統/00-MyModule/全域變數.vb
  5. 146
    58
      工巧明智能管理系統/我的系統/02-財務系統管理/GCM/財務_彙總表_GCM.Designer.vb
  6. 70
    22
      工巧明智能管理系統/我的系統/02-財務系統管理/GCM/財務_彙總表_GCM.vb
  7. 414
    326
      工巧明智能管理系統/我的系統/02-財務系統管理/ISC/財務_彙總表_ICS.Designer.vb
  8. 69
    21
      工巧明智能管理系統/我的系統/02-財務系統管理/ISC/財務_彙總表_ICS.vb
  9. BIN
      工巧明智能管理系統/我的系統/bin/Debug/DawnCache/data_1
  10. BIN
      工巧明智能管理系統/我的系統/bin/Debug/GCM-ERP-SYS.exe
  11. BIN
      工巧明智能管理系統/我的系統/bin/Debug/GCM-ERP-SYS.pdb
  12. BIN
      工巧明智能管理系統/我的系統/bin/Debug/GPUCache/data_1
  13. 251
    0
      工巧明智能管理系統/我的系統/bin/Debug/debug.log
  14. BIN
      工巧明智能管理系統/我的系統/obj/x86/Debug/DesignTimeResolveAssemblyReferences.cache
  15. BIN
      工巧明智能管理系統/我的系統/obj/x86/Debug/GCM-ERP-SYS.exe
  16. BIN
      工巧明智能管理系統/我的系統/obj/x86/Debug/GCM-ERP-SYS.pdb
  17. BIN
      工巧明智能管理系統/我的系統/obj/x86/Debug/工巧明智能管理系統.vbproj.GenerateResource.cache
  18. BIN
      工巧明智能管理系統/我的系統/obj/x86/Debug/工巧明智能管理系統.vbproj.ResolveComReference.cache

BIN
工巧明智能管理系統/.vs/我的系統/FileContentIndex/7f74b902-99f0-44f6-bdac-ceb0ba4e2947.vsidx Прегледај датотеку


BIN
工巧明智能管理系統/.vs/我的系統/FileContentIndex/b73b4aef-0b2d-410b-acd7-a1adb9c4db3f.vsidx Прегледај датотеку


BIN
工巧明智能管理系統/.vs/我的系統/v17/.suo Прегледај датотеку


+ 1
- 1
工巧明智能管理系統/我的系統/00-MyModule/全域變數.vb Прегледај датотеку

@@ -11,7 +11,7 @@
11 11
     Public 零用金選擇, 低網速模式 As Boolean
12 12
     Public 行政採購簽核級別基數, 建築採購簽核級別基數, 工程圖庫限制 As Integer
13 13
     '----系統版本-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
14
-    Public 版本 As String = "2024010501"
14
+    Public 版本 As String = "2024021901"
15 15
     '----系統閒置-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
16 16
     Public 判斷重登 As Boolean : Public 內外網 As Boolean : Public 重登確認 As Boolean : Public 主頁開啟 As Boolean
17 17
     Public timeExit As Integer = 0 : Public timeExit2 As Integer = 0 : Public timeNow As Integer = 0 : Public timeNow2 As Integer = 0 : Public 密碼時限 As Integer = 30

+ 146
- 58
工巧明智能管理系統/我的系統/02-財務系統管理/GCM/財務_彙總表_GCM.Designer.vb Прегледај датотеку

@@ -54,6 +54,8 @@ Partial Class 財務_彙總表_GCM
54 54
         Dim ChartArea4 As System.Windows.Forms.DataVisualization.Charting.ChartArea = New System.Windows.Forms.DataVisualization.Charting.ChartArea()
55 55
         Dim Legend4 As System.Windows.Forms.DataVisualization.Charting.Legend = New System.Windows.Forms.DataVisualization.Charting.Legend()
56 56
         Dim Series4 As System.Windows.Forms.DataVisualization.Charting.Series = New System.Windows.Forms.DataVisualization.Charting.Series()
57
+        Dim DataGridViewCellStyle21 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
58
+        Dim DataGridViewCellStyle22 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
57 59
         Me.主表_dgv = New System.Windows.Forms.DataGridView()
58 60
         Me.主表1_dgv = New System.Windows.Forms.DataGridView()
59 61
         Me.主項_cb = New System.Windows.Forms.ComboBox()
@@ -89,6 +91,10 @@ Partial Class 財務_彙總表_GCM
89 91
         Me.Chart4 = New System.Windows.Forms.DataVisualization.Charting.Chart()
90 92
         Me.年份_cb = New System.Windows.Forms.ComboBox()
91 93
         Me.Panel1 = New System.Windows.Forms.Panel()
94
+        Me.Panel2 = New System.Windows.Forms.Panel()
95
+        Me.Panel3 = New System.Windows.Forms.Panel()
96
+        Me.Panel4 = New System.Windows.Forms.Panel()
97
+        Me.主表10_dgv = New System.Windows.Forms.DataGridView()
92 98
         CType(Me.主表_dgv, System.ComponentModel.ISupportInitialize).BeginInit()
93 99
         CType(Me.主表1_dgv, System.ComponentModel.ISupportInitialize).BeginInit()
94 100
         CType(Me.主表2_dgv, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -104,6 +110,10 @@ Partial Class 財務_彙總表_GCM
104 110
         CType(Me.Chart2, System.ComponentModel.ISupportInitialize).BeginInit()
105 111
         CType(Me.Chart4, System.ComponentModel.ISupportInitialize).BeginInit()
106 112
         Me.Panel1.SuspendLayout()
113
+        Me.Panel2.SuspendLayout()
114
+        Me.Panel3.SuspendLayout()
115
+        Me.Panel4.SuspendLayout()
116
+        CType(Me.主表10_dgv, System.ComponentModel.ISupportInitialize).BeginInit()
107 117
         Me.SuspendLayout()
108 118
         '
109 119
         '主表_dgv
@@ -113,13 +123,13 @@ Partial Class 財務_彙總表_GCM
113 123
         Me.主表_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
114 124
         Me.主表_dgv.BackgroundColor = System.Drawing.Color.White
115 125
         Me.主表_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
116
-        Me.主表_dgv.Location = New System.Drawing.Point(7, 30)
126
+        Me.主表_dgv.Location = New System.Drawing.Point(3, 328)
117 127
         Me.主表_dgv.Name = "主表_dgv"
118 128
         Me.主表_dgv.RowHeadersWidth = 5
119 129
         DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
120 130
         Me.主表_dgv.RowsDefaultCellStyle = DataGridViewCellStyle2
121 131
         Me.主表_dgv.RowTemplate.Height = 24
122
-        Me.主表_dgv.Size = New System.Drawing.Size(435, 197)
132
+        Me.主表_dgv.Size = New System.Drawing.Size(460, 144)
123 133
         Me.主表_dgv.TabIndex = 1098
124 134
         '
125 135
         '主表1_dgv
@@ -129,13 +139,13 @@ Partial Class 財務_彙總表_GCM
129 139
         Me.主表1_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
130 140
         Me.主表1_dgv.BackgroundColor = System.Drawing.Color.White
131 141
         Me.主表1_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
132
-        Me.主表1_dgv.Location = New System.Drawing.Point(7, 229)
142
+        Me.主表1_dgv.Location = New System.Drawing.Point(3, 30)
133 143
         Me.主表1_dgv.Name = "主表1_dgv"
134 144
         Me.主表1_dgv.RowHeadersWidth = 5
135 145
         DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
136 146
         Me.主表1_dgv.RowsDefaultCellStyle = DataGridViewCellStyle4
137 147
         Me.主表1_dgv.RowTemplate.Height = 24
138
-        Me.主表1_dgv.Size = New System.Drawing.Size(435, 167)
148
+        Me.主表1_dgv.Size = New System.Drawing.Size(236, 299)
139 149
         Me.主表1_dgv.TabIndex = 1099
140 150
         '
141 151
         '主項_cb
@@ -143,7 +153,7 @@ Partial Class 財務_彙總表_GCM
143 153
         Me.主項_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
144 154
         Me.主項_cb.FormattingEnabled = True
145 155
         Me.主項_cb.Items.AddRange(New Object() {"2019"})
146
-        Me.主項_cb.Location = New System.Drawing.Point(41, 3)
156
+        Me.主項_cb.Location = New System.Drawing.Point(37, 3)
147 157
         Me.主項_cb.Name = "主項_cb"
148 158
         Me.主項_cb.Size = New System.Drawing.Size(107, 24)
149 159
         Me.主項_cb.TabIndex = 1100
@@ -151,7 +161,7 @@ Partial Class 財務_彙總表_GCM
151 161
         'Label1
152 162
         '
153 163
         Me.Label1.AutoSize = True
154
-        Me.Label1.Location = New System.Drawing.Point(9, 7)
164
+        Me.Label1.Location = New System.Drawing.Point(5, 7)
155 165
         Me.Label1.Name = "Label1"
156 166
         Me.Label1.Size = New System.Drawing.Size(31, 16)
157 167
         Me.Label1.TabIndex = 1101
@@ -160,7 +170,7 @@ Partial Class 財務_彙總表_GCM
160 170
         'Label2
161 171
         '
162 172
         Me.Label2.AutoSize = True
163
-        Me.Label2.Location = New System.Drawing.Point(260, 8)
173
+        Me.Label2.Location = New System.Drawing.Point(256, 8)
164 174
         Me.Label2.Name = "Label2"
165 175
         Me.Label2.Size = New System.Drawing.Size(31, 16)
166 176
         Me.Label2.TabIndex = 1102
@@ -168,7 +178,7 @@ Partial Class 財務_彙總表_GCM
168 178
         '
169 179
         '加總_tb
170 180
         '
171
-        Me.加總_tb.Location = New System.Drawing.Point(294, 4)
181
+        Me.加總_tb.Location = New System.Drawing.Point(290, 4)
172 182
         Me.加總_tb.Name = "加總_tb"
173 183
         Me.加總_tb.Size = New System.Drawing.Size(146, 23)
174 184
         Me.加總_tb.TabIndex = 1103
@@ -182,34 +192,35 @@ Partial Class 財務_彙總表_GCM
182 192
         Me.主表2_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
183 193
         Me.主表2_dgv.BackgroundColor = System.Drawing.Color.White
184 194
         Me.主表2_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
185
-        Me.主表2_dgv.Location = New System.Drawing.Point(444, 30)
195
+        Me.主表2_dgv.Location = New System.Drawing.Point(462, 328)
186 196
         Me.主表2_dgv.Name = "主表2_dgv"
187 197
         Me.主表2_dgv.RowHeadersWidth = 5
188 198
         DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
189 199
         Me.主表2_dgv.RowsDefaultCellStyle = DataGridViewCellStyle6
190 200
         Me.主表2_dgv.RowTemplate.Height = 24
191
-        Me.主表2_dgv.Size = New System.Drawing.Size(180, 366)
201
+        Me.主表2_dgv.Size = New System.Drawing.Size(155, 144)
192 202
         Me.主表2_dgv.TabIndex = 1116
193 203
         '
194 204
         '主表5_dgv
195 205
         '
196 206
         DataGridViewCellStyle7.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(192, Byte), Integer))
197 207
         Me.主表5_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle7
208
+        Me.主表5_dgv.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
198 209
         Me.主表5_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
199 210
         Me.主表5_dgv.BackgroundColor = System.Drawing.Color.White
200 211
         Me.主表5_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
201
-        Me.主表5_dgv.Location = New System.Drawing.Point(1070, 30)
212
+        Me.主表5_dgv.Location = New System.Drawing.Point(1126, 328)
202 213
         Me.主表5_dgv.Name = "主表5_dgv"
203 214
         Me.主表5_dgv.RowHeadersWidth = 5
204 215
         DataGridViewCellStyle8.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
205 216
         Me.主表5_dgv.RowsDefaultCellStyle = DataGridViewCellStyle8
206 217
         Me.主表5_dgv.RowTemplate.Height = 24
207
-        Me.主表5_dgv.Size = New System.Drawing.Size(180, 366)
218
+        Me.主表5_dgv.Size = New System.Drawing.Size(155, 144)
208 219
         Me.主表5_dgv.TabIndex = 1123
209 220
         '
210 221
         '加總1_tb
211 222
         '
212
-        Me.加總1_tb.Location = New System.Drawing.Point(920, 4)
223
+        Me.加總1_tb.Location = New System.Drawing.Point(954, 4)
213 224
         Me.加總1_tb.Name = "加總1_tb"
214 225
         Me.加總1_tb.Size = New System.Drawing.Size(146, 23)
215 226
         Me.加總1_tb.TabIndex = 1122
@@ -219,7 +230,7 @@ Partial Class 財務_彙總表_GCM
219 230
         'Label3
220 231
         '
221 232
         Me.Label3.AutoSize = True
222
-        Me.Label3.Location = New System.Drawing.Point(886, 8)
233
+        Me.Label3.Location = New System.Drawing.Point(920, 8)
223 234
         Me.Label3.Name = "Label3"
224 235
         Me.Label3.Size = New System.Drawing.Size(31, 16)
225 236
         Me.Label3.TabIndex = 1121
@@ -228,7 +239,7 @@ Partial Class 財務_彙總表_GCM
228 239
         'Label4
229 240
         '
230 241
         Me.Label4.AutoSize = True
231
-        Me.Label4.Location = New System.Drawing.Point(635, 7)
242
+        Me.Label4.Location = New System.Drawing.Point(620, 7)
232 243
         Me.Label4.Name = "Label4"
233 244
         Me.Label4.Size = New System.Drawing.Size(31, 16)
234 245
         Me.Label4.TabIndex = 1120
@@ -239,7 +250,7 @@ Partial Class 財務_彙總表_GCM
239 250
         Me.主項1_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
240 251
         Me.主項1_cb.FormattingEnabled = True
241 252
         Me.主項1_cb.Items.AddRange(New Object() {"2019"})
242
-        Me.主項1_cb.Location = New System.Drawing.Point(667, 3)
253
+        Me.主項1_cb.Location = New System.Drawing.Point(652, 3)
243 254
         Me.主項1_cb.Name = "主項1_cb"
244 255
         Me.主項1_cb.Size = New System.Drawing.Size(107, 24)
245 256
         Me.主項1_cb.TabIndex = 1119
@@ -248,53 +259,59 @@ Partial Class 財務_彙總表_GCM
248 259
         '
249 260
         DataGridViewCellStyle9.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(192, Byte), Integer))
250 261
         Me.主表4_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle9
262
+        Me.主表4_dgv.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
263
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
251 264
         Me.主表4_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
252 265
         Me.主表4_dgv.BackgroundColor = System.Drawing.Color.White
253 266
         Me.主表4_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
254
-        Me.主表4_dgv.Location = New System.Drawing.Point(633, 229)
267
+        Me.主表4_dgv.Location = New System.Drawing.Point(618, 30)
255 268
         Me.主表4_dgv.Name = "主表4_dgv"
256 269
         Me.主表4_dgv.RowHeadersWidth = 5
257 270
         DataGridViewCellStyle10.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
258 271
         Me.主表4_dgv.RowsDefaultCellStyle = DataGridViewCellStyle10
259 272
         Me.主表4_dgv.RowTemplate.Height = 24
260
-        Me.主表4_dgv.Size = New System.Drawing.Size(435, 167)
273
+        Me.主表4_dgv.Size = New System.Drawing.Size(285, 299)
261 274
         Me.主表4_dgv.TabIndex = 1118
262 275
         '
263 276
         '主表3_dgv
264 277
         '
265 278
         DataGridViewCellStyle11.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(192, Byte), Integer))
266 279
         Me.主表3_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle11
280
+        Me.主表3_dgv.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
281
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
267 282
         Me.主表3_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
268 283
         Me.主表3_dgv.BackgroundColor = System.Drawing.Color.White
269 284
         Me.主表3_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
270
-        Me.主表3_dgv.Location = New System.Drawing.Point(633, 30)
285
+        Me.主表3_dgv.Location = New System.Drawing.Point(618, 328)
271 286
         Me.主表3_dgv.Name = "主表3_dgv"
272 287
         Me.主表3_dgv.RowHeadersWidth = 5
273 288
         DataGridViewCellStyle12.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
274 289
         Me.主表3_dgv.RowsDefaultCellStyle = DataGridViewCellStyle12
275 290
         Me.主表3_dgv.RowTemplate.Height = 24
276
-        Me.主表3_dgv.Size = New System.Drawing.Size(435, 197)
291
+        Me.主表3_dgv.Size = New System.Drawing.Size(509, 144)
277 292
         Me.主表3_dgv.TabIndex = 1117
278 293
         '
279 294
         '主表8_dgv
280 295
         '
281 296
         DataGridViewCellStyle13.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer))
282 297
         Me.主表8_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle13
298
+        Me.主表8_dgv.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
283 299
         Me.主表8_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
284 300
         Me.主表8_dgv.BackgroundColor = System.Drawing.Color.White
285 301
         Me.主表8_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
286
-        Me.主表8_dgv.Location = New System.Drawing.Point(1696, 30)
302
+        Me.主表8_dgv.Location = New System.Drawing.Point(1741, 328)
287 303
         Me.主表8_dgv.Name = "主表8_dgv"
288 304
         Me.主表8_dgv.RowHeadersWidth = 5
289 305
         DataGridViewCellStyle14.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
290 306
         Me.主表8_dgv.RowsDefaultCellStyle = DataGridViewCellStyle14
291 307
         Me.主表8_dgv.RowTemplate.Height = 24
292
-        Me.主表8_dgv.Size = New System.Drawing.Size(180, 366)
308
+        Me.主表8_dgv.Size = New System.Drawing.Size(155, 144)
293 309
         Me.主表8_dgv.TabIndex = 1130
294 310
         '
295 311
         '加總2_tb
296 312
         '
297
-        Me.加總2_tb.Location = New System.Drawing.Point(1546, 4)
313
+        Me.加總2_tb.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
314
+        Me.加總2_tb.Location = New System.Drawing.Point(1569, 4)
298 315
         Me.加總2_tb.Name = "加總2_tb"
299 316
         Me.加總2_tb.Size = New System.Drawing.Size(146, 23)
300 317
         Me.加總2_tb.TabIndex = 1129
@@ -303,8 +320,9 @@ Partial Class 財務_彙總表_GCM
303 320
         '
304 321
         'Label5
305 322
         '
323
+        Me.Label5.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
306 324
         Me.Label5.AutoSize = True
307
-        Me.Label5.Location = New System.Drawing.Point(1512, 8)
325
+        Me.Label5.Location = New System.Drawing.Point(1535, 8)
308 326
         Me.Label5.Name = "Label5"
309 327
         Me.Label5.Size = New System.Drawing.Size(31, 16)
310 328
         Me.Label5.TabIndex = 1128
@@ -312,8 +330,9 @@ Partial Class 財務_彙總表_GCM
312 330
         '
313 331
         'Label6
314 332
         '
333
+        Me.Label6.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
315 334
         Me.Label6.AutoSize = True
316
-        Me.Label6.Location = New System.Drawing.Point(1261, 7)
335
+        Me.Label6.Location = New System.Drawing.Point(1284, 7)
317 336
         Me.Label6.Name = "Label6"
318 337
         Me.Label6.Size = New System.Drawing.Size(31, 16)
319 338
         Me.Label6.TabIndex = 1127
@@ -321,10 +340,11 @@ Partial Class 財務_彙總表_GCM
321 340
         '
322 341
         '主項2_cb
323 342
         '
343
+        Me.主項2_cb.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
324 344
         Me.主項2_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
325 345
         Me.主項2_cb.FormattingEnabled = True
326 346
         Me.主項2_cb.Items.AddRange(New Object() {"2019"})
327
-        Me.主項2_cb.Location = New System.Drawing.Point(1293, 3)
347
+        Me.主項2_cb.Location = New System.Drawing.Point(1316, 3)
328 348
         Me.主項2_cb.Name = "主項2_cb"
329 349
         Me.主項2_cb.Size = New System.Drawing.Size(107, 24)
330 350
         Me.主項2_cb.TabIndex = 1126
@@ -333,38 +353,41 @@ Partial Class 財務_彙總表_GCM
333 353
         '
334 354
         DataGridViewCellStyle15.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer))
335 355
         Me.主表7_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle15
356
+        Me.主表7_dgv.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
336 357
         Me.主表7_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
337 358
         Me.主表7_dgv.BackgroundColor = System.Drawing.Color.White
338 359
         Me.主表7_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
339
-        Me.主表7_dgv.Location = New System.Drawing.Point(1259, 229)
360
+        Me.主表7_dgv.Location = New System.Drawing.Point(1282, 30)
340 361
         Me.主表7_dgv.Name = "主表7_dgv"
341 362
         Me.主表7_dgv.RowHeadersWidth = 5
342 363
         DataGridViewCellStyle16.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
343 364
         Me.主表7_dgv.RowsDefaultCellStyle = DataGridViewCellStyle16
344 365
         Me.主表7_dgv.RowTemplate.Height = 24
345
-        Me.主表7_dgv.Size = New System.Drawing.Size(435, 167)
366
+        Me.主表7_dgv.Size = New System.Drawing.Size(236, 299)
346 367
         Me.主表7_dgv.TabIndex = 1125
347 368
         '
348 369
         '主表6_dgv
349 370
         '
350 371
         DataGridViewCellStyle17.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer))
351 372
         Me.主表6_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle17
373
+        Me.主表6_dgv.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
352 374
         Me.主表6_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
353 375
         Me.主表6_dgv.BackgroundColor = System.Drawing.Color.White
354 376
         Me.主表6_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
355
-        Me.主表6_dgv.Location = New System.Drawing.Point(1259, 30)
377
+        Me.主表6_dgv.Location = New System.Drawing.Point(1282, 328)
356 378
         Me.主表6_dgv.Name = "主表6_dgv"
357 379
         Me.主表6_dgv.RowHeadersWidth = 5
358 380
         DataGridViewCellStyle18.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
359 381
         Me.主表6_dgv.RowsDefaultCellStyle = DataGridViewCellStyle18
360 382
         Me.主表6_dgv.RowTemplate.Height = 24
361
-        Me.主表6_dgv.Size = New System.Drawing.Size(435, 197)
383
+        Me.主表6_dgv.Size = New System.Drawing.Size(460, 144)
362 384
         Me.主表6_dgv.TabIndex = 1124
363 385
         '
364 386
         '加總3_tb
365 387
         '
388
+        Me.加總3_tb.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
366 389
         Me.加總3_tb.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer))
367
-        Me.加總3_tb.Location = New System.Drawing.Point(1520, 399)
390
+        Me.加總3_tb.Location = New System.Drawing.Point(1344, 475)
368 391
         Me.加總3_tb.Name = "加總3_tb"
369 392
         Me.加總3_tb.Size = New System.Drawing.Size(146, 23)
370 393
         Me.加總3_tb.TabIndex = 1132
@@ -373,9 +396,10 @@ Partial Class 財務_彙總表_GCM
373 396
         '
374 397
         'Label7
375 398
         '
399
+        Me.Label7.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
376 400
         Me.Label7.AutoSize = True
377 401
         Me.Label7.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer))
378
-        Me.Label7.Location = New System.Drawing.Point(1461, 403)
402
+        Me.Label7.Location = New System.Drawing.Point(1285, 479)
379 403
         Me.Label7.Name = "Label7"
380 404
         Me.Label7.Size = New System.Drawing.Size(55, 16)
381 405
         Me.Label7.TabIndex = 1131
@@ -383,7 +407,7 @@ Partial Class 財務_彙總表_GCM
383 407
         '
384 408
         '隱加總_tb
385 409
         '
386
-        Me.隱加總_tb.Location = New System.Drawing.Point(120, 3)
410
+        Me.隱加總_tb.Location = New System.Drawing.Point(117, 3)
387 411
         Me.隱加總_tb.Name = "隱加總_tb"
388 412
         Me.隱加總_tb.Size = New System.Drawing.Size(146, 23)
389 413
         Me.隱加總_tb.TabIndex = 1133
@@ -392,7 +416,7 @@ Partial Class 財務_彙總表_GCM
392 416
         '
393 417
         '隱加總1_tb
394 418
         '
395
-        Me.隱加總1_tb.Location = New System.Drawing.Point(120, 32)
419
+        Me.隱加總1_tb.Location = New System.Drawing.Point(117, 32)
396 420
         Me.隱加總1_tb.Name = "隱加總1_tb"
397 421
         Me.隱加總1_tb.Size = New System.Drawing.Size(146, 23)
398 422
         Me.隱加總1_tb.TabIndex = 1134
@@ -401,7 +425,7 @@ Partial Class 財務_彙總表_GCM
401 425
         '
402 426
         '隱加總2_tb
403 427
         '
404
-        Me.隱加總2_tb.Location = New System.Drawing.Point(120, 61)
428
+        Me.隱加總2_tb.Location = New System.Drawing.Point(117, 61)
405 429
         Me.隱加總2_tb.Name = "隱加總2_tb"
406 430
         Me.隱加總2_tb.Size = New System.Drawing.Size(146, 23)
407 431
         Me.隱加總2_tb.TabIndex = 1135
@@ -410,8 +434,9 @@ Partial Class 財務_彙總表_GCM
410 434
         '
411 435
         '加總4_tb
412 436
         '
437
+        Me.加總4_tb.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
413 438
         Me.加總4_tb.ForeColor = System.Drawing.Color.Green
414
-        Me.加總4_tb.Location = New System.Drawing.Point(1730, 399)
439
+        Me.加總4_tb.Location = New System.Drawing.Point(1554, 475)
415 440
         Me.加總4_tb.Name = "加總4_tb"
416 441
         Me.加總4_tb.Size = New System.Drawing.Size(146, 23)
417 442
         Me.加總4_tb.TabIndex = 1137
@@ -420,9 +445,10 @@ Partial Class 財務_彙總表_GCM
420 445
         '
421 446
         'Label8
422 447
         '
448
+        Me.Label8.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
423 449
         Me.Label8.AutoSize = True
424 450
         Me.Label8.ForeColor = System.Drawing.Color.Green
425
-        Me.Label8.Location = New System.Drawing.Point(1671, 403)
451
+        Me.Label8.Location = New System.Drawing.Point(1495, 479)
426 452
         Me.Label8.Name = "Label8"
427 453
         Me.Label8.Size = New System.Drawing.Size(55, 16)
428 454
         Me.Label8.TabIndex = 1136
@@ -430,6 +456,9 @@ Partial Class 財務_彙總表_GCM
430 456
         '
431 457
         'Chart1
432 458
         '
459
+        Me.Chart1.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
460
+            Or System.Windows.Forms.AnchorStyles.Left) _
461
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
433 462
         Me.Chart1.BackColor = System.Drawing.SystemColors.Control
434 463
         ChartArea1.AlignmentOrientation = CType((System.Windows.Forms.DataVisualization.Charting.AreaAlignmentOrientations.Vertical Or System.Windows.Forms.DataVisualization.Charting.AreaAlignmentOrientations.Horizontal), System.Windows.Forms.DataVisualization.Charting.AreaAlignmentOrientations)
435 464
         ChartArea1.AxisX.IntervalAutoMode = System.Windows.Forms.DataVisualization.Charting.IntervalAutoMode.VariableCount
@@ -452,7 +481,7 @@ Partial Class 財務_彙總表_GCM
452 481
         Legend1.IsTextAutoFit = False
453 482
         Legend1.Name = "Legend1"
454 483
         Me.Chart1.Legends.Add(Legend1)
455
-        Me.Chart1.Location = New System.Drawing.Point(6, 419)
484
+        Me.Chart1.Location = New System.Drawing.Point(-34, 478)
456 485
         Me.Chart1.Name = "Chart1"
457 486
         Series1.ChartArea = "ChartArea1"
458 487
         Series1.ChartType = System.Windows.Forms.DataVisualization.Charting.SeriesChartType.Line
@@ -460,7 +489,7 @@ Partial Class 財務_彙總表_GCM
460 489
         Series1.Legend = "Legend1"
461 490
         Series1.Name = "Series1"
462 491
         Me.Chart1.Series.Add(Series1)
463
-        Me.Chart1.Size = New System.Drawing.Size(1890, 275)
492
+        Me.Chart1.Size = New System.Drawing.Size(1964, 490)
464 493
         Me.Chart1.TabIndex = 1138
465 494
         Me.Chart1.Text = "Chart1"
466 495
         '
@@ -481,7 +510,8 @@ Partial Class 財務_彙總表_GCM
481 510
         '
482 511
         'Chart3
483 512
         '
484
-        Me.Chart3.BackColor = System.Drawing.SystemColors.Control
513
+        Me.Chart3.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
514
+            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
485 515
         ChartArea2.AlignmentOrientation = CType((System.Windows.Forms.DataVisualization.Charting.AreaAlignmentOrientations.Vertical Or System.Windows.Forms.DataVisualization.Charting.AreaAlignmentOrientations.Horizontal), System.Windows.Forms.DataVisualization.Charting.AreaAlignmentOrientations)
486 516
         ChartArea2.Area3DStyle.Inclination = 60
487 517
         ChartArea2.AxisX.IntervalAutoMode = System.Windows.Forms.DataVisualization.Charting.IntervalAutoMode.VariableCount
@@ -504,7 +534,7 @@ Partial Class 財務_彙總表_GCM
504 534
         Legend2.IsTextAutoFit = False
505 535
         Legend2.Name = "Legend1"
506 536
         Me.Chart3.Legends.Add(Legend2)
507
-        Me.Chart3.Location = New System.Drawing.Point(70, 696)
537
+        Me.Chart3.Location = New System.Drawing.Point(-12, -6)
508 538
         Me.Chart3.Name = "Chart3"
509 539
         Series2.ChartArea = "ChartArea1"
510 540
         Series2.ChartType = System.Windows.Forms.DataVisualization.Charting.SeriesChartType.Pie
@@ -512,13 +542,14 @@ Partial Class 財務_彙總表_GCM
512 542
         Series2.Legend = "Legend1"
513 543
         Series2.Name = "Series1"
514 544
         Me.Chart3.Series.Add(Series2)
515
-        Me.Chart3.Size = New System.Drawing.Size(554, 270)
545
+        Me.Chart3.Size = New System.Drawing.Size(390, 310)
516 546
         Me.Chart3.TabIndex = 1140
517 547
         Me.Chart3.Text = "Chart3"
518 548
         '
519 549
         'Chart2
520 550
         '
521
-        Me.Chart2.BackColor = System.Drawing.SystemColors.Control
551
+        Me.Chart2.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
552
+            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
522 553
         ChartArea3.AlignmentOrientation = CType((System.Windows.Forms.DataVisualization.Charting.AreaAlignmentOrientations.Vertical Or System.Windows.Forms.DataVisualization.Charting.AreaAlignmentOrientations.Horizontal), System.Windows.Forms.DataVisualization.Charting.AreaAlignmentOrientations)
523 554
         ChartArea3.Area3DStyle.Inclination = 60
524 555
         ChartArea3.AxisX.IntervalAutoMode = System.Windows.Forms.DataVisualization.Charting.IntervalAutoMode.VariableCount
@@ -541,7 +572,7 @@ Partial Class 財務_彙總表_GCM
541 572
         Legend3.IsTextAutoFit = False
542 573
         Legend3.Name = "Legend1"
543 574
         Me.Chart2.Legends.Add(Legend3)
544
-        Me.Chart2.Location = New System.Drawing.Point(696, 696)
575
+        Me.Chart2.Location = New System.Drawing.Point(-12, -6)
545 576
         Me.Chart2.Name = "Chart2"
546 577
         Series3.ChartArea = "ChartArea1"
547 578
         Series3.ChartType = System.Windows.Forms.DataVisualization.Charting.SeriesChartType.Pie
@@ -549,13 +580,14 @@ Partial Class 財務_彙總表_GCM
549 580
         Series3.Legend = "Legend1"
550 581
         Series3.Name = "Series1"
551 582
         Me.Chart2.Series.Add(Series3)
552
-        Me.Chart2.Size = New System.Drawing.Size(554, 270)
583
+        Me.Chart2.Size = New System.Drawing.Size(390, 310)
553 584
         Me.Chart2.TabIndex = 1141
554 585
         Me.Chart2.Text = "Chart2"
555 586
         '
556 587
         'Chart4
557 588
         '
558
-        Me.Chart4.BackColor = System.Drawing.SystemColors.Control
589
+        Me.Chart4.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
590
+            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
559 591
         ChartArea4.AlignmentOrientation = CType((System.Windows.Forms.DataVisualization.Charting.AreaAlignmentOrientations.Vertical Or System.Windows.Forms.DataVisualization.Charting.AreaAlignmentOrientations.Horizontal), System.Windows.Forms.DataVisualization.Charting.AreaAlignmentOrientations)
560 592
         ChartArea4.Area3DStyle.Inclination = 60
561 593
         ChartArea4.AxisX.IntervalAutoMode = System.Windows.Forms.DataVisualization.Charting.IntervalAutoMode.VariableCount
@@ -578,7 +610,7 @@ Partial Class 財務_彙總表_GCM
578 610
         Legend4.IsTextAutoFit = False
579 611
         Legend4.Name = "Legend1"
580 612
         Me.Chart4.Legends.Add(Legend4)
581
-        Me.Chart4.Location = New System.Drawing.Point(1322, 696)
613
+        Me.Chart4.Location = New System.Drawing.Point(-12, -6)
582 614
         Me.Chart4.Name = "Chart4"
583 615
         Series4.ChartArea = "ChartArea1"
584 616
         Series4.ChartType = System.Windows.Forms.DataVisualization.Charting.SeriesChartType.Pie
@@ -586,16 +618,17 @@ Partial Class 財務_彙總表_GCM
586 618
         Series4.Legend = "Legend1"
587 619
         Series4.Name = "Series1"
588 620
         Me.Chart4.Series.Add(Series4)
589
-        Me.Chart4.Size = New System.Drawing.Size(554, 270)
621
+        Me.Chart4.Size = New System.Drawing.Size(390, 310)
590 622
         Me.Chart4.TabIndex = 1142
591 623
         Me.Chart4.Text = "Chart4"
592 624
         '
593 625
         '年份_cb
594 626
         '
627
+        Me.年份_cb.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
595 628
         Me.年份_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
596 629
         Me.年份_cb.FormattingEnabled = True
597 630
         Me.年份_cb.Items.AddRange(New Object() {"2019"})
598
-        Me.年份_cb.Location = New System.Drawing.Point(1806, 3)
631
+        Me.年份_cb.Location = New System.Drawing.Point(1829, 3)
599 632
         Me.年份_cb.Name = "年份_cb"
600 633
         Me.年份_cb.Size = New System.Drawing.Size(70, 24)
601 634
         Me.年份_cb.TabIndex = 1143
@@ -603,24 +636,71 @@ Partial Class 財務_彙總表_GCM
603 636
         'Panel1
604 637
         '
605 638
         Me.Panel1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
639
+        Me.Panel1.Controls.Add(Me.主表10_dgv)
606 640
         Me.Panel1.Controls.Add(Me.主表9_dgv)
607 641
         Me.Panel1.Controls.Add(Me.隱加總_tb)
608 642
         Me.Panel1.Controls.Add(Me.隱加總1_tb)
609 643
         Me.Panel1.Controls.Add(Me.隱加總2_tb)
610
-        Me.Panel1.Location = New System.Drawing.Point(435, 424)
644
+        Me.Panel1.Location = New System.Drawing.Point(435, 509)
611 645
         Me.Panel1.Name = "Panel1"
612
-        Me.Panel1.Size = New System.Drawing.Size(278, 96)
646
+        Me.Panel1.Size = New System.Drawing.Size(382, 96)
613 647
         Me.Panel1.TabIndex = 1144
614 648
         '
649
+        'Panel2
650
+        '
651
+        Me.Panel2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
652
+        Me.Panel2.Controls.Add(Me.Chart3)
653
+        Me.Panel2.Location = New System.Drawing.Point(238, 30)
654
+        Me.Panel2.Name = "Panel2"
655
+        Me.Panel2.Size = New System.Drawing.Size(379, 299)
656
+        Me.Panel2.TabIndex = 1145
657
+        '
658
+        'Panel3
659
+        '
660
+        Me.Panel3.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
661
+        Me.Panel3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
662
+        Me.Panel3.Controls.Add(Me.Chart2)
663
+        Me.Panel3.Location = New System.Drawing.Point(902, 30)
664
+        Me.Panel3.Name = "Panel3"
665
+        Me.Panel3.Size = New System.Drawing.Size(379, 299)
666
+        Me.Panel3.TabIndex = 1146
667
+        '
668
+        'Panel4
669
+        '
670
+        Me.Panel4.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
671
+        Me.Panel4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
672
+        Me.Panel4.Controls.Add(Me.Chart4)
673
+        Me.Panel4.Location = New System.Drawing.Point(1517, 30)
674
+        Me.Panel4.Name = "Panel4"
675
+        Me.Panel4.Size = New System.Drawing.Size(379, 299)
676
+        Me.Panel4.TabIndex = 1147
677
+        '
678
+        '主表10_dgv
679
+        '
680
+        DataGridViewCellStyle21.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer))
681
+        Me.主表10_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle21
682
+        Me.主表10_dgv.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
683
+        Me.主表10_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
684
+        Me.主表10_dgv.BackgroundColor = System.Drawing.Color.White
685
+        Me.主表10_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
686
+        Me.主表10_dgv.Location = New System.Drawing.Point(264, 3)
687
+        Me.主表10_dgv.Name = "主表10_dgv"
688
+        Me.主表10_dgv.RowHeadersWidth = 5
689
+        DataGridViewCellStyle22.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
690
+        Me.主表10_dgv.RowsDefaultCellStyle = DataGridViewCellStyle22
691
+        Me.主表10_dgv.RowTemplate.Height = 24
692
+        Me.主表10_dgv.Size = New System.Drawing.Size(111, 84)
693
+        Me.主表10_dgv.TabIndex = 1148
694
+        '
615 695
         '財務_彙總表_GCM
616 696
         '
617 697
         Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!)
618 698
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
619 699
         Me.ClientSize = New System.Drawing.Size(1900, 971)
700
+        Me.Controls.Add(Me.主表5_dgv)
701
+        Me.Controls.Add(Me.Panel3)
702
+        Me.Controls.Add(Me.Panel2)
620 703
         Me.Controls.Add(Me.年份_cb)
621
-        Me.Controls.Add(Me.Chart4)
622
-        Me.Controls.Add(Me.Chart2)
623
-        Me.Controls.Add(Me.Chart3)
624 704
         Me.Controls.Add(Me.加總4_tb)
625 705
         Me.Controls.Add(Me.Label8)
626 706
         Me.Controls.Add(Me.加總3_tb)
@@ -630,22 +710,22 @@ Partial Class 財務_彙總表_GCM
630 710
         Me.Controls.Add(Me.Label5)
631 711
         Me.Controls.Add(Me.Label6)
632 712
         Me.Controls.Add(Me.主項2_cb)
633
-        Me.Controls.Add(Me.主表7_dgv)
634 713
         Me.Controls.Add(Me.主表6_dgv)
635
-        Me.Controls.Add(Me.主表5_dgv)
636 714
         Me.Controls.Add(Me.加總1_tb)
637 715
         Me.Controls.Add(Me.Label3)
638 716
         Me.Controls.Add(Me.Label4)
639 717
         Me.Controls.Add(Me.主項1_cb)
640
-        Me.Controls.Add(Me.主表4_dgv)
641 718
         Me.Controls.Add(Me.主表3_dgv)
642 719
         Me.Controls.Add(Me.主表2_dgv)
643 720
         Me.Controls.Add(Me.加總_tb)
644 721
         Me.Controls.Add(Me.Label2)
645 722
         Me.Controls.Add(Me.Label1)
646 723
         Me.Controls.Add(Me.主項_cb)
647
-        Me.Controls.Add(Me.主表1_dgv)
648 724
         Me.Controls.Add(Me.主表_dgv)
725
+        Me.Controls.Add(Me.主表7_dgv)
726
+        Me.Controls.Add(Me.主表4_dgv)
727
+        Me.Controls.Add(Me.主表1_dgv)
728
+        Me.Controls.Add(Me.Panel4)
649 729
         Me.Controls.Add(Me.Chart1)
650 730
         Me.Controls.Add(Me.Panel1)
651 731
         Me.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
@@ -668,6 +748,10 @@ Partial Class 財務_彙總表_GCM
668 748
         CType(Me.Chart4, System.ComponentModel.ISupportInitialize).EndInit()
669 749
         Me.Panel1.ResumeLayout(False)
670 750
         Me.Panel1.PerformLayout()
751
+        Me.Panel2.ResumeLayout(False)
752
+        Me.Panel3.ResumeLayout(False)
753
+        Me.Panel4.ResumeLayout(False)
754
+        CType(Me.主表10_dgv, System.ComponentModel.ISupportInitialize).EndInit()
671 755
         Me.ResumeLayout(False)
672 756
         Me.PerformLayout()
673 757
 
@@ -708,4 +792,8 @@ Partial Class 財務_彙總表_GCM
708 792
     Friend WithEvents Chart4 As DataVisualization.Charting.Chart
709 793
     Friend WithEvents 年份_cb As ComboBox
710 794
     Friend WithEvents Panel1 As Panel
795
+    Friend WithEvents Panel2 As Panel
796
+    Friend WithEvents Panel3 As Panel
797
+    Friend WithEvents Panel4 As Panel
798
+    Friend WithEvents 主表10_dgv As DataGridView
711 799
 End Class

+ 70
- 22
工巧明智能管理系統/我的系統/02-財務系統管理/GCM/財務_彙總表_GCM.vb Прегледај датотеку

@@ -1,10 +1,11 @@
1 1
 Imports System.Windows.Forms.DataVisualization.Charting
2 2
 Public Class 財務_彙總表_GCM
3
-    ReadOnly ds, ds1, ds2, ds3, ds4, ds5, ds6, ds7, ds8, ds9 As New DataSet
3
+    ReadOnly ds, ds1, ds2, ds3, ds4, ds5, ds6, ds7, ds8, ds9, ds10 As New DataSet
4
+    Dim 列高 As Integer
4 5
     '-----------------------------第一區-----------------------------------------------------------------------------------------------------------------------
5 6
     Private Sub Set_清單()
6 7
         主表_dgv.DataSource = Nothing : ds.Clear() : 主表_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
7
-        主表_dgv.ColumnHeadersHeight = 30 : 主表_dgv.AllowUserToAddRows = False
8
+        主表_dgv.ColumnHeadersHeight = 25 : 主表_dgv.AllowUserToAddRows = False : 主表_dgv.RowTemplate.Height = 列高
8 9
         ConnOpen()
9 10
         SQL1 = "SELECT 日期, 子項, 子細項, SUM(金額) AS 金額 FROM 財務彙總紀錄 
10 11
                 WHERE (主項 LIKE N'" & 主項_cb.Text & "') AND 日期 LIKE N'%" & 年份_cb.Text & "%' GROUP BY 日期, 子項, 子細項 ORDER BY 日期, 子項, 子細項"
@@ -14,26 +15,29 @@ Public Class 財務_彙總表_GCM
14 15
         主表_dgv.Columns(3).DefaultCellStyle.Format = "#,##0"
15 16
         主表_dgv.Columns(3).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
16 17
         Set_清單2() : Set_清單1()
18
+        For i As Integer = 0 To 主表1_dgv.Rows.Count - 1
19
+            主表1_dgv.Rows(i).Cells("比例.").Value = Strings.Format(CInt(主表1_dgv.Rows(i).Cells("金額").Value.ToString) / CInt(加總_tb.Text) * 100, "#,##0.00") & " %"
20
+        Next
17 21
     End Sub
18 22
     Private Sub Set_清單1()
19 23
         主表1_dgv.DataSource = Nothing : ds1.Clear() : 主表1_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
20
-        主表1_dgv.ColumnHeadersHeight = 30 : 主表1_dgv.AllowUserToAddRows = False
24
+        主表1_dgv.ColumnHeadersHeight = 25 : 主表1_dgv.AllowUserToAddRows = False : 主表1_dgv.RowTemplate.Height = 列高
21 25
         ConnOpen()
22
-        SQL1 = "SELECT TOP(10) 子細項, SUM(金額) AS 金額, ABS(SUM(金額)) AS 比例 FROM 財務彙總紀錄 
26
+        SQL1 = "SELECT TOP(15) 子細項, SUM(金額) AS 金額, ABS(SUM(金額)) AS 比例, 子細項 AS [比例.] FROM 財務彙總紀錄 
23 27
                 WHERE (主項 LIKE N'" & 主項_cb.Text & "') AND 子細項 NOT LIKE N'%借款%' AND 子細項 NOT LIKE N'%還款%' AND 日期 LIKE N'%" & 年份_cb.Text & "%'
24 28
                 GROUP BY 子細項 ORDER BY 金額"
25 29
         CmdSet_For_DGV() : da.Fill(ds1) : 主表1_dgv.DataSource = ds1.Tables(0) : conn.Close()
26 30
 
27
-        主表1_dgv.Columns(1).FillWeight = 130 : 主表1_dgv.Columns(1).FillWeight = 80 : 主表1_dgv.Columns(2).Visible = False
31
+        主表1_dgv.Columns(1).FillWeight = 130 : 主表1_dgv.Columns(1).FillWeight = 80 : 主表1_dgv.Columns(3).FillWeight = 60 : 主表1_dgv.Columns(2).Visible = False
28 32
         主表1_dgv.Columns(1).DefaultCellStyle.Format = "#,##0"
29 33
         主表1_dgv.Columns(1).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
30 34
         主表1_dgv.Columns(2).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
31
-
35
+        主表1_dgv.Columns(3).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
32 36
         主表1_dgv.Sort(主表1_dgv.Columns("比例"), System.ComponentModel.ListSortDirection.Descending)
33 37
     End Sub
34 38
     Private Sub Set_清單2()
35 39
         主表2_dgv.DataSource = Nothing : ds2.Clear() : 主表2_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
36
-        主表2_dgv.ColumnHeadersHeight = 30 : 主表2_dgv.AllowUserToAddRows = False
40
+        主表2_dgv.ColumnHeadersHeight = 25 : 主表2_dgv.AllowUserToAddRows = False : 主表2_dgv.RowTemplate.Height = 列高
37 41
         ConnOpen()
38 42
         SQL1 = "SELECT 日期, SUM(金額) AS 金額 FROM 財務彙總紀錄 
39 43
                 WHERE (主項 LIKE N'" & 主項_cb.Text & "') AND 日期 LIKE N'%" & 年份_cb.Text & "%' GROUP BY 日期 ORDER BY 日期"
@@ -60,7 +64,7 @@ Public Class 財務_彙總表_GCM
60 64
     '-----------------------------第二區-----------------------------------------------------------------------------------------------------------------------
61 65
     Private Sub Set_清單3()
62 66
         主表3_dgv.DataSource = Nothing : ds3.Clear() : 主表3_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
63
-        主表3_dgv.ColumnHeadersHeight = 30 : 主表3_dgv.AllowUserToAddRows = False
67
+        主表3_dgv.ColumnHeadersHeight = 25 : 主表3_dgv.AllowUserToAddRows = False : 主表3_dgv.RowTemplate.Height = 列高
64 68
         ConnOpen()
65 69
         SQL1 = "SELECT 日期, 子項, 子細項, SUM(金額) AS 金額 FROM 財務彙總紀錄 
66 70
                 WHERE (主項 LIKE N'" & 主項1_cb.Text & "') AND 日期 LIKE N'%" & 年份_cb.Text & "%' GROUP BY 日期, 子項, 子細項 ORDER BY 日期, 子項, 子細項"
@@ -70,12 +74,15 @@ Public Class 財務_彙總表_GCM
70 74
         主表3_dgv.Columns(3).DefaultCellStyle.Format = "#,##0"
71 75
         主表3_dgv.Columns(3).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
72 76
         Set_清單5() : Set_清單4()
77
+        For i As Integer = 0 To 主表4_dgv.Rows.Count - 1
78
+            主表4_dgv.Rows(i).Cells("比例.").Value = Strings.Format(CInt(主表4_dgv.Rows(i).Cells("金額").Value.ToString) / CInt(加總1_tb.Text) * 100, "#,##0.00") & " %"
79
+        Next
73 80
     End Sub
74 81
     Private Sub Set_清單4()
75 82
         主表4_dgv.DataSource = Nothing : ds4.Clear() : 主表4_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
76
-        主表4_dgv.ColumnHeadersHeight = 30 : 主表4_dgv.AllowUserToAddRows = False
83
+        主表4_dgv.ColumnHeadersHeight = 25 : 主表4_dgv.AllowUserToAddRows = False : 主表4_dgv.RowTemplate.Height = 列高
77 84
         ConnOpen()
78
-        SQL1 = "SELECT TOP(10) 子細項, SUM(金額) AS 金額, ABS(SUM(金額)) AS 比例 FROM 財務彙總紀錄 
85
+        SQL1 = "SELECT TOP(15) 子細項, SUM(金額) AS 金額, ABS(SUM(金額)) AS 比例, 子細項 AS [比例.] FROM 財務彙總紀錄 
79 86
                 WHERE (主項 LIKE N'" & 主項1_cb.Text & "') AND 子細項 NOT LIKE N'%借款%' AND 子細項 NOT LIKE N'%還款%' AND 日期 LIKE N'%" & 年份_cb.Text & "%' 
80 87
                 GROUP BY 子細項 ORDER BY 金額"
81 88
         CmdSet_For_DGV() : da.Fill(ds4) : 主表4_dgv.DataSource = ds4.Tables(0) : conn.Close()
@@ -84,12 +91,12 @@ Public Class 財務_彙總表_GCM
84 91
         主表4_dgv.Columns(1).DefaultCellStyle.Format = "#,##0" : 主表4_dgv.Columns(2).DefaultCellStyle.Format = "#,##0"
85 92
         主表4_dgv.Columns(1).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
86 93
         主表4_dgv.Columns(2).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
87
-
94
+        主表4_dgv.Columns(3).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
88 95
         主表4_dgv.Sort(主表4_dgv.Columns("比例"), System.ComponentModel.ListSortDirection.Descending)
89 96
     End Sub
90 97
     Private Sub Set_清單5()
91 98
         主表5_dgv.DataSource = Nothing : ds5.Clear() : 主表5_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
92
-        主表5_dgv.ColumnHeadersHeight = 30 : 主表5_dgv.AllowUserToAddRows = False
99
+        主表5_dgv.ColumnHeadersHeight = 25 : 主表5_dgv.AllowUserToAddRows = False : 主表5_dgv.RowTemplate.Height = 列高
93 100
         ConnOpen()
94 101
         SQL1 = "SELECT 日期, SUM(金額) AS 金額 FROM 財務彙總紀錄 
95 102
                 WHERE (主項 LIKE N'" & 主項1_cb.Text & "') AND 日期 LIKE N'%" & 年份_cb.Text & "%' GROUP BY 日期 ORDER BY 日期"
@@ -116,7 +123,7 @@ Public Class 財務_彙總表_GCM
116 123
     '-----------------------------第三區-----------------------------------------------------------------------------------------------------------------------
117 124
     Private Sub Set_清單6()
118 125
         主表6_dgv.DataSource = Nothing : ds6.Clear() : 主表6_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
119
-        主表6_dgv.ColumnHeadersHeight = 30 : 主表6_dgv.AllowUserToAddRows = False
126
+        主表6_dgv.ColumnHeadersHeight = 25 : 主表6_dgv.AllowUserToAddRows = False : 主表6_dgv.RowTemplate.Height = 列高
120 127
         ConnOpen()
121 128
         SQL1 = "SELECT 日期, 子項, 子細項, SUM(金額) AS 金額 FROM 財務彙總紀錄 
122 129
                 WHERE (主項 LIKE N'" & 主項2_cb.Text & "') AND 日期 LIKE N'%" & 年份_cb.Text & "%' GROUP BY 日期, 子項, 子細項 ORDER BY 日期, 子項, 子細項"
@@ -126,12 +133,15 @@ Public Class 財務_彙總表_GCM
126 133
         主表6_dgv.Columns(3).DefaultCellStyle.Format = "#,##0"
127 134
         主表6_dgv.Columns(3).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
128 135
         Set_清單8() : Set_清單7()
136
+        For i As Integer = 0 To 主表7_dgv.Rows.Count - 1
137
+            主表7_dgv.Rows(i).Cells("比例.").Value = Strings.Format(CInt(主表7_dgv.Rows(i).Cells("金額").Value.ToString) / CInt(加總2_tb.Text) * 100, "#,##0.00") & " %"
138
+        Next
129 139
     End Sub
130 140
     Private Sub Set_清單7()
131 141
         主表7_dgv.DataSource = Nothing : ds7.Clear() : 主表7_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
132
-        主表7_dgv.ColumnHeadersHeight = 30 : 主表7_dgv.AllowUserToAddRows = False
142
+        主表7_dgv.ColumnHeadersHeight = 25 : 主表7_dgv.AllowUserToAddRows = False : 主表7_dgv.RowTemplate.Height = 列高
133 143
         ConnOpen()
134
-        SQL1 = "SELECT TOP(10) 子細項, SUM(金額) AS 金額, ABS(SUM(金額)) AS 比例 FROM 財務彙總紀錄 
144
+        SQL1 = "SELECT TOP(15) 子細項, SUM(金額) AS 金額, ABS(SUM(金額)) AS 比例, 子細項 AS [比例.] FROM 財務彙總紀錄 
135 145
                 WHERE (主項 LIKE N'" & 主項2_cb.Text & "') AND 子細項 NOT LIKE N'%借款%' AND 子細項 NOT LIKE N'%還款%' AND 日期 LIKE N'%" & 年份_cb.Text & "%'
136 146
                 GROUP BY 子細項 ORDER BY 金額"
137 147
         CmdSet_For_DGV() : da.Fill(ds7) : 主表7_dgv.DataSource = ds7.Tables(0) : conn.Close()
@@ -140,12 +150,12 @@ Public Class 財務_彙總表_GCM
140 150
         主表7_dgv.Columns(1).DefaultCellStyle.Format = "#,##0" : 主表7_dgv.Columns(2).DefaultCellStyle.Format = "#,##0"
141 151
         主表7_dgv.Columns(1).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
142 152
         主表7_dgv.Columns(2).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
143
-
153
+        主表7_dgv.Columns(3).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
144 154
         主表7_dgv.Sort(主表7_dgv.Columns("比例"), System.ComponentModel.ListSortDirection.Descending)
145 155
     End Sub
146 156
     Private Sub Set_清單8()
147 157
         主表8_dgv.DataSource = Nothing : ds8.Clear() : 主表8_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
148
-        主表8_dgv.ColumnHeadersHeight = 30 : 主表8_dgv.AllowUserToAddRows = False
158
+        主表8_dgv.ColumnHeadersHeight = 25 : 主表8_dgv.AllowUserToAddRows = False : 主表8_dgv.RowTemplate.Height = 列高
149 159
         ConnOpen()
150 160
         SQL1 = "SELECT 日期, SUM(金額) AS 金額 FROM 財務彙總紀錄 
151 161
                 WHERE (主項 LIKE N'" & 主項2_cb.Text & "') AND 日期 LIKE N'%" & 年份_cb.Text & "%' GROUP BY 日期 ORDER BY 日期"
@@ -171,7 +181,7 @@ Public Class 財務_彙總表_GCM
171 181
     End Sub
172 182
     Private Sub Set_清單9()
173 183
         主表9_dgv.DataSource = Nothing : ds9.Clear() : 主表9_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
174
-        主表9_dgv.ColumnHeadersHeight = 30 : 主表9_dgv.AllowUserToAddRows = False
184
+        主表9_dgv.ColumnHeadersHeight = 25 : 主表9_dgv.AllowUserToAddRows = False : 主表9_dgv.RowTemplate.Height = 列高
175 185
         ConnOpen()
176 186
         SQL1 = "SELECT 日期, 日期 AS 金額1, 日期 AS 金額2, 日期 AS 金額3 FROM 財務彙總紀錄 WHERE 日期 LIKE N'%" & 年份_cb.Text & "%' GROUP BY 日期 ORDER BY 日期"
177 187
         CmdSet_For_DGV() : da.Fill(ds9) : 主表9_dgv.DataSource = ds9.Tables(0) : conn.Close()
@@ -195,6 +205,31 @@ Public Class 財務_彙總表_GCM
195 205
                     主表9_dgv.Rows(I).Cells("金額3").Value = 主表8_dgv.Rows(II).Cells("金額").Value
196 206
                 End If
197 207
             Next
208
+        Next : Set_清單10()
209
+    End Sub
210
+    Private Sub Set_清單10()
211
+        主表10_dgv.DataSource = Nothing : ds10.Clear() : 主表10_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
212
+        主表10_dgv.ColumnHeadersHeight = 25 : 主表10_dgv.AllowUserToAddRows = False : 主表10_dgv.RowTemplate.Height = 列高
213
+        ConnOpen()
214
+        SQL1 = "SELECT     財務彙總紀錄.日期, AA.餘額
215
+                FROM       財務彙總紀錄 LEFT OUTER JOIN
216
+                          (SELECT          LEFT(日期, 7) AS 日期, SUM(收入 * 匯率) AS 餘額
217
+                           FROM               財務流水帳
218
+                           WHERE           (類別 LIKE 'D%') AND (日期 LIKE N'%" & 年份_cb.Text & "%')
219
+                           GROUP BY    LEFT(日期, 7)) AS AA ON LEFT(財務彙總紀錄.日期, 7) = AA.日期
220
+                WHERE     (財務彙總紀錄.日期 LIKE N'%" & 年份_cb.Text & "%')
221
+                GROUP BY   財務彙總紀錄.日期, AA.餘額
222
+                ORDER BY   財務彙總紀錄.日期"
223
+        CmdSet_For_DGV() : da.Fill(ds10) : 主表10_dgv.DataSource = ds10.Tables(0) : conn.Close()
224
+        For i As Integer = 0 To 主表10_dgv.Rows.Count - 1
225
+            If IsDBNull(主表10_dgv.Rows(i).Cells("餘額").Value) Then
226
+                主表10_dgv.Rows(i).Cells("餘額").Value = "0"
227
+            End If
228
+            If i > 0 Then
229
+                If 主表10_dgv.Rows(i).Cells("餘額").Value = 0 And 主表10_dgv.Rows(i - 1).Cells("餘額").Value > 0 Then
230
+                    主表10_dgv.Rows(i).Cells("餘額").Value = 主表10_dgv.Rows(i - 1).Cells("餘額").Value
231
+                End If
232
+            End If
198 233
         Next
199 234
     End Sub
200 235
     Private Sub 彙總()
@@ -208,6 +243,8 @@ Public Class 財務_彙總表_GCM
208 243
         Set_清單9()
209 244
 
210 245
         Chart1.Series.Clear() : Chart1.ChartAreas(0).AxisX.Minimum = 0
246
+        Chart1.ChartAreas(0).AxisY.LabelStyle.Font = New Font("Arial", 8) : Chart1.ChartAreas(0).AxisY.LabelStyle.Format = "#,##0"
247
+
211 248
         If 主項2_cb.Text <> "" Then
212 249
             Chart1.Series.Add(主項2_cb.Text)
213 250
             If 主項2_cb.Text = "資本" Then : Chart1.Series(主項2_cb.Text).ChartType = SeriesChartType.Line
@@ -222,7 +259,7 @@ Public Class 財務_彙總表_GCM
222 259
             Chart4.Series(主項2_cb.Text).IsVisibleInLegend = True
223 260
             Chart4.Series(主項2_cb.Text).IsXValueIndexed = True
224 261
             For i As Integer = 0 To 主表7_dgv.Rows.Count - 1
225
-                Chart4.Series(主項2_cb.Text).Points.AddXY(主表7_dgv.Rows(i).Cells("子細項").Value.ToString, Format(主表7_dgv.Rows(i).Cells("金額").Value, "#,##0"))
262
+                Chart4.Series(主項2_cb.Text).Points.AddXY(主表7_dgv.Rows(i).Cells("子細項").Value.ToString, 主表7_dgv.Rows(i).Cells("比例.").Value.ToString.Replace(" ", "").Replace("%", ""))
226 263
             Next
227 264
         End If
228 265
 
@@ -240,7 +277,7 @@ Public Class 財務_彙總表_GCM
240 277
             Chart2.Series(主項1_cb.Text).IsVisibleInLegend = True
241 278
             Chart2.Series(主項1_cb.Text).IsXValueIndexed = True
242 279
             For i As Integer = 0 To 主表4_dgv.Rows.Count - 1
243
-                Chart2.Series(主項1_cb.Text).Points.AddXY(主表4_dgv.Rows(i).Cells("子細項").Value.ToString, Format(主表4_dgv.Rows(i).Cells("金額").Value, "#,##0"))
280
+                Chart2.Series(主項1_cb.Text).Points.AddXY(主表4_dgv.Rows(i).Cells("子細項").Value.ToString, 主表4_dgv.Rows(i).Cells("比例.").Value.ToString.Replace(" ", "").Replace("%", ""))
244 281
             Next
245 282
         End If
246 283
 
@@ -258,9 +295,15 @@ Public Class 財務_彙總表_GCM
258 295
             Chart3.Series(主項_cb.Text).IsVisibleInLegend = True
259 296
             Chart3.Series(主項_cb.Text).IsXValueIndexed = True
260 297
             For i As Integer = 0 To 主表1_dgv.Rows.Count - 1
261
-                Chart3.Series(主項_cb.Text).Points.AddXY(主表1_dgv.Rows(i).Cells("子細項").Value.ToString, Format(主表1_dgv.Rows(i).Cells("金額").Value, "#,##0"))
298
+                Chart3.Series(主項_cb.Text).Points.AddXY(主表1_dgv.Rows(i).Cells("子細項").Value.ToString, 主表1_dgv.Rows(i).Cells("比例.").Value.ToString.Replace(" ", "").Replace("%", ""))
262 299
             Next
263 300
         End If
301
+
302
+        Chart1.Series.Add("資金餘額")
303
+        Chart1.Series("資金餘額").ChartType = SeriesChartType.Line
304
+        For i As Integer = 0 To 主表10_dgv.Rows.Count - 1
305
+            Chart1.Series("資金餘額").Points.AddXY(主表10_dgv.Rows(i).Cells("日期").Value.ToString, 主表10_dgv.Rows(i).Cells("餘額").Value.ToString)
306
+        Next
264 307
     End Sub
265 308
     Private Sub 主項下拉()
266 309
         ConnOpen() : SQL1 = "SELECT  主項 FROM 財務彙總紀錄 WHERE 主項 NOT LIKE N'上月結存' GROUP BY 主項 ORDER BY 主項 DESC" : CmdSet_For_dr()
@@ -273,8 +316,13 @@ Public Class 財務_彙總表_GCM
273 316
     End Sub
274 317
     Private Sub 財務_彙總表_Load(sender As Object, e As EventArgs) Handles MyBase.Load
275 318
         Me.MdiParent = GCM_ERP_SYS : Me.WindowState = 2 : Me.AutoScroll = True
276
-        GCM_ERP_SYS.WindowState = 2
319
+        GCM_ERP_SYS.WindowState = 2 : 列高 = 19
277 320
         ComboBox1下拉表單資料載入() : 主項下拉() : 主項_cb.SelectedIndex = 0 : 主項1_cb.SelectedIndex = 1 : 主項2_cb.SelectedIndex = 2
321
+        主表_dgv.RowsDefaultCellStyle.Font = New System.Drawing.Font("微軟正黑體", 7.6) : 主表1_dgv.RowsDefaultCellStyle.Font = New System.Drawing.Font("微軟正黑體", 7.6)
322
+        主表2_dgv.RowsDefaultCellStyle.Font = New System.Drawing.Font("微軟正黑體", 7.6) : 主表3_dgv.RowsDefaultCellStyle.Font = New System.Drawing.Font("微軟正黑體", 7.6)
323
+        主表4_dgv.RowsDefaultCellStyle.Font = New System.Drawing.Font("微軟正黑體", 7.6) : 主表5_dgv.RowsDefaultCellStyle.Font = New System.Drawing.Font("微軟正黑體", 7.6)
324
+        主表6_dgv.RowsDefaultCellStyle.Font = New System.Drawing.Font("微軟正黑體", 7.6) : 主表7_dgv.RowsDefaultCellStyle.Font = New System.Drawing.Font("微軟正黑體", 7.6)
325
+        主表8_dgv.RowsDefaultCellStyle.Font = New System.Drawing.Font("微軟正黑體", 7.6)
278 326
     End Sub
279 327
     Private Sub 財務_彙總表_Closed(sender As Object, e As EventArgs) Handles MyBase.Closed
280 328
         GCM_ERP_SYS.WindowState = 0

+ 414
- 326
工巧明智能管理系統/我的系統/02-財務系統管理/ISC/財務_彙總表_ICS.Designer.vb
Разлика између датотеке није приказан због своје велике величине
Прегледај датотеку


+ 69
- 21
工巧明智能管理系統/我的系統/02-財務系統管理/ISC/財務_彙總表_ICS.vb Прегледај датотеку

@@ -1,10 +1,11 @@
1 1
 Imports System.Windows.Forms.DataVisualization.Charting
2 2
 Public Class 財務_彙總表_ICS
3
-    ReadOnly ds, ds1, ds2, ds3, ds4, ds5, ds6, ds7, ds8, ds9 As New DataSet
3
+    ReadOnly ds, ds1, ds2, ds3, ds4, ds5, ds6, ds7, ds8, ds9, ds10 As New DataSet
4
+    Dim 列高 As Integer
4 5
     '-----------------------------第一區-----------------------------------------------------------------------------------------------------------------------
5 6
     Private Sub Set_清單()
6 7
         主表_dgv.DataSource = Nothing : ds.Clear() : 主表_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
7
-        主表_dgv.ColumnHeadersHeight = 30 : 主表_dgv.AllowUserToAddRows = False
8
+        主表_dgv.ColumnHeadersHeight = 25 : 主表_dgv.AllowUserToAddRows = False : 主表_dgv.RowTemplate.Height = 列高
8 9
         ConnOpen()
9 10
         SQL1 = "SELECT 日期, 子項, 子細項, SUM(金額) AS 金額 FROM 財務彙總紀錄_ICS 
10 11
                 WHERE (主項 LIKE N'" & 主項_cb.Text & "') AND 日期 LIKE N'%" & 年份_cb.Text & "%' GROUP BY 日期, 子項, 子細項 ORDER BY 日期, 子項, 子細項"
@@ -14,26 +15,29 @@ Public Class 財務_彙總表_ICS
14 15
         主表_dgv.Columns(3).DefaultCellStyle.Format = "#,##0"
15 16
         主表_dgv.Columns(3).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
16 17
         Set_清單2() : Set_清單1()
18
+        For i As Integer = 0 To 主表1_dgv.Rows.Count - 1
19
+            主表1_dgv.Rows(i).Cells("比例.").Value = Strings.Format(CInt(主表1_dgv.Rows(i).Cells("金額").Value.ToString) / CInt(加總_tb.Text) * 100, "#,##0.00") & " %"
20
+        Next
17 21
     End Sub
18 22
     Private Sub Set_清單1()
19 23
         主表1_dgv.DataSource = Nothing : ds1.Clear() : 主表1_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
20
-        主表1_dgv.ColumnHeadersHeight = 30 : 主表1_dgv.AllowUserToAddRows = False
24
+        主表1_dgv.ColumnHeadersHeight = 25 : 主表1_dgv.AllowUserToAddRows = False : 主表1_dgv.RowTemplate.Height = 列高
21 25
         ConnOpen()
22
-        SQL1 = "SELECT TOP(10) 子細項, SUM(金額) AS 金額, ABS(SUM(金額)) AS 比例 FROM 財務彙總紀錄_ICS 
26
+        SQL1 = "SELECT TOP(10) 子細項, SUM(金額) AS 金額, ABS(SUM(金額)) AS 比例, 子細項 AS [比例.] FROM 財務彙總紀錄_ICS 
23 27
                 WHERE (主項 LIKE N'" & 主項_cb.Text & "') AND 子細項 NOT LIKE N'%借款%' AND 子細項 NOT LIKE N'%還款%' AND 日期 LIKE N'%" & 年份_cb.Text & "%'
24 28
                 GROUP BY 子細項 ORDER BY 金額"
25 29
         CmdSet_For_DGV() : da.Fill(ds1) : 主表1_dgv.DataSource = ds1.Tables(0) : conn.Close()
26 30
 
27
-        主表1_dgv.Columns(1).FillWeight = 130 : 主表1_dgv.Columns(1).FillWeight = 80 : 主表1_dgv.Columns(2).Visible = False
31
+        主表1_dgv.Columns(1).FillWeight = 130 : 主表1_dgv.Columns(1).FillWeight = 80 : 主表1_dgv.Columns(3).FillWeight = 60 : 主表1_dgv.Columns(2).Visible = False
28 32
         主表1_dgv.Columns(1).DefaultCellStyle.Format = "#,##0"
29 33
         主表1_dgv.Columns(1).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
30 34
         主表1_dgv.Columns(2).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
31
-
35
+        主表1_dgv.Columns(3).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
32 36
         主表1_dgv.Sort(主表1_dgv.Columns("比例"), System.ComponentModel.ListSortDirection.Descending)
33 37
     End Sub
34 38
     Private Sub Set_清單2()
35 39
         主表2_dgv.DataSource = Nothing : ds2.Clear() : 主表2_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
36
-        主表2_dgv.ColumnHeadersHeight = 30 : 主表2_dgv.AllowUserToAddRows = False
40
+        主表2_dgv.ColumnHeadersHeight = 25 : 主表2_dgv.AllowUserToAddRows = False : 主表2_dgv.RowTemplate.Height = 列高
37 41
         ConnOpen()
38 42
         SQL1 = "SELECT 日期, SUM(金額) AS 金額 FROM 財務彙總紀錄_ICS 
39 43
                 WHERE (主項 LIKE N'" & 主項_cb.Text & "') AND 日期 LIKE N'%" & 年份_cb.Text & "%' GROUP BY 日期 ORDER BY 日期"
@@ -60,7 +64,7 @@ Public Class 財務_彙總表_ICS
60 64
     '-----------------------------第二區-----------------------------------------------------------------------------------------------------------------------
61 65
     Private Sub Set_清單3()
62 66
         主表3_dgv.DataSource = Nothing : ds3.Clear() : 主表3_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
63
-        主表3_dgv.ColumnHeadersHeight = 30 : 主表3_dgv.AllowUserToAddRows = False
67
+        主表3_dgv.ColumnHeadersHeight = 25 : 主表3_dgv.AllowUserToAddRows = False : 主表3_dgv.RowTemplate.Height = 列高
64 68
         ConnOpen()
65 69
         SQL1 = "SELECT 日期, 子項, 子細項, SUM(金額) AS 金額 FROM 財務彙總紀錄_ICS 
66 70
                 WHERE (主項 LIKE N'" & 主項1_cb.Text & "') AND 日期 LIKE N'%" & 年份_cb.Text & "%' GROUP BY 日期, 子項, 子細項 ORDER BY 日期, 子項, 子細項"
@@ -70,12 +74,15 @@ Public Class 財務_彙總表_ICS
70 74
         主表3_dgv.Columns(3).DefaultCellStyle.Format = "#,##0"
71 75
         主表3_dgv.Columns(3).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
72 76
         Set_清單5() : Set_清單4()
77
+        For i As Integer = 0 To 主表4_dgv.Rows.Count - 1
78
+            主表4_dgv.Rows(i).Cells("比例.").Value = Strings.Format(CInt(主表4_dgv.Rows(i).Cells("金額").Value.ToString) / CInt(加總1_tb.Text) * 100, "#,##0.00") & " %"
79
+        Next
73 80
     End Sub
74 81
     Private Sub Set_清單4()
75 82
         主表4_dgv.DataSource = Nothing : ds4.Clear() : 主表4_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
76
-        主表4_dgv.ColumnHeadersHeight = 30 : 主表4_dgv.AllowUserToAddRows = False
83
+        主表4_dgv.ColumnHeadersHeight = 25 : 主表4_dgv.AllowUserToAddRows = False : 主表4_dgv.RowTemplate.Height = 列高
77 84
         ConnOpen()
78
-        SQL1 = "SELECT TOP(10) 子細項, SUM(金額) AS 金額, ABS(SUM(金額)) AS 比例 FROM 財務彙總紀錄_ICS 
85
+        SQL1 = "SELECT TOP(10) 子細項, SUM(金額) AS 金額, ABS(SUM(金額)) AS 比例, 子細項 AS [比例.] FROM 財務彙總紀錄_ICS 
79 86
                 WHERE (主項 LIKE N'" & 主項1_cb.Text & "') AND 子細項 NOT LIKE N'%借款%' AND 子細項 NOT LIKE N'%還款%' AND 日期 LIKE N'%" & 年份_cb.Text & "%' 
80 87
                 GROUP BY 子細項 ORDER BY 金額"
81 88
         CmdSet_For_DGV() : da.Fill(ds4) : 主表4_dgv.DataSource = ds4.Tables(0) : conn.Close()
@@ -84,12 +91,12 @@ Public Class 財務_彙總表_ICS
84 91
         主表4_dgv.Columns(1).DefaultCellStyle.Format = "#,##0" : 主表4_dgv.Columns(2).DefaultCellStyle.Format = "#,##0"
85 92
         主表4_dgv.Columns(1).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
86 93
         主表4_dgv.Columns(2).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
87
-
94
+        主表4_dgv.Columns(3).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
88 95
         主表4_dgv.Sort(主表4_dgv.Columns("比例"), System.ComponentModel.ListSortDirection.Descending)
89 96
     End Sub
90 97
     Private Sub Set_清單5()
91 98
         主表5_dgv.DataSource = Nothing : ds5.Clear() : 主表5_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
92
-        主表5_dgv.ColumnHeadersHeight = 30 : 主表5_dgv.AllowUserToAddRows = False
99
+        主表5_dgv.ColumnHeadersHeight = 25 : 主表5_dgv.AllowUserToAddRows = False : 主表5_dgv.RowTemplate.Height = 列高
93 100
         ConnOpen()
94 101
         SQL1 = "SELECT 日期, SUM(金額) AS 金額 FROM 財務彙總紀錄_ICS 
95 102
                 WHERE (主項 LIKE N'" & 主項1_cb.Text & "') AND 日期 LIKE N'%" & 年份_cb.Text & "%' GROUP BY 日期 ORDER BY 日期"
@@ -116,7 +123,7 @@ Public Class 財務_彙總表_ICS
116 123
     '-----------------------------第三區-----------------------------------------------------------------------------------------------------------------------
117 124
     Private Sub Set_清單6()
118 125
         主表6_dgv.DataSource = Nothing : ds6.Clear() : 主表6_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
119
-        主表6_dgv.ColumnHeadersHeight = 30 : 主表6_dgv.AllowUserToAddRows = False
126
+        主表6_dgv.ColumnHeadersHeight = 25 : 主表6_dgv.AllowUserToAddRows = False : 主表6_dgv.RowTemplate.Height = 列高
120 127
         ConnOpen()
121 128
         SQL1 = "SELECT 日期, 子項, 子細項, SUM(金額) AS 金額 FROM 財務彙總紀錄_ICS 
122 129
                 WHERE (主項 LIKE N'" & 主項2_cb.Text & "') AND 日期 LIKE N'%" & 年份_cb.Text & "%' GROUP BY 日期, 子項, 子細項 ORDER BY 日期, 子項, 子細項"
@@ -126,12 +133,15 @@ Public Class 財務_彙總表_ICS
126 133
         主表6_dgv.Columns(3).DefaultCellStyle.Format = "#,##0"
127 134
         主表6_dgv.Columns(3).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
128 135
         Set_清單8() : Set_清單7()
136
+        For i As Integer = 0 To 主表7_dgv.Rows.Count - 1
137
+            主表7_dgv.Rows(i).Cells("比例.").Value = Strings.Format(CInt(主表7_dgv.Rows(i).Cells("金額").Value.ToString) / CInt(加總2_tb.Text) * 100, "#,##0.00") & " %"
138
+        Next
129 139
     End Sub
130 140
     Private Sub Set_清單7()
131 141
         主表7_dgv.DataSource = Nothing : ds7.Clear() : 主表7_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
132
-        主表7_dgv.ColumnHeadersHeight = 30 : 主表7_dgv.AllowUserToAddRows = False
142
+        主表7_dgv.ColumnHeadersHeight = 25 : 主表7_dgv.AllowUserToAddRows = False : 主表7_dgv.RowTemplate.Height = 列高
133 143
         ConnOpen()
134
-        SQL1 = "SELECT TOP(10) 子細項, SUM(金額) AS 金額, ABS(SUM(金額)) AS 比例 FROM 財務彙總紀錄_ICS 
144
+        SQL1 = "SELECT TOP(10) 子細項, SUM(金額) AS 金額, ABS(SUM(金額)) AS 比例, 子細項 AS [比例.] FROM 財務彙總紀錄_ICS 
135 145
                 WHERE (主項 LIKE N'" & 主項2_cb.Text & "') AND 子細項 NOT LIKE N'%借款%' AND 子細項 NOT LIKE N'%還款%' AND 日期 LIKE N'%" & 年份_cb.Text & "%'
136 146
                 GROUP BY 子細項 ORDER BY 金額"
137 147
         CmdSet_For_DGV() : da.Fill(ds7) : 主表7_dgv.DataSource = ds7.Tables(0) : conn.Close()
@@ -140,12 +150,12 @@ Public Class 財務_彙總表_ICS
140 150
         主表7_dgv.Columns(1).DefaultCellStyle.Format = "#,##0" : 主表7_dgv.Columns(2).DefaultCellStyle.Format = "#,##0"
141 151
         主表7_dgv.Columns(1).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
142 152
         主表7_dgv.Columns(2).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
143
-
153
+        主表7_dgv.Columns(3).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
144 154
         主表7_dgv.Sort(主表7_dgv.Columns("比例"), System.ComponentModel.ListSortDirection.Descending)
145 155
     End Sub
146 156
     Private Sub Set_清單8()
147 157
         主表8_dgv.DataSource = Nothing : ds8.Clear() : 主表8_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
148
-        主表8_dgv.ColumnHeadersHeight = 30 : 主表8_dgv.AllowUserToAddRows = False
158
+        主表8_dgv.ColumnHeadersHeight = 25 : 主表8_dgv.AllowUserToAddRows = False : 主表8_dgv.RowTemplate.Height = 列高
149 159
         ConnOpen()
150 160
         SQL1 = "SELECT 日期, SUM(金額) AS 金額 FROM 財務彙總紀錄_ICS 
151 161
                 WHERE (主項 LIKE N'" & 主項2_cb.Text & "') AND 日期 LIKE N'%" & 年份_cb.Text & "%' GROUP BY 日期 ORDER BY 日期"
@@ -195,6 +205,31 @@ Public Class 財務_彙總表_ICS
195 205
                     主表9_dgv.Rows(I).Cells("金額3").Value = 主表8_dgv.Rows(II).Cells("金額").Value
196 206
                 End If
197 207
             Next
208
+        Next : Set_清單10()
209
+    End Sub
210
+    Private Sub Set_清單10()
211
+        主表10_dgv.DataSource = Nothing : ds10.Clear() : 主表10_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
212
+        主表10_dgv.ColumnHeadersHeight = 25 : 主表10_dgv.AllowUserToAddRows = False : 主表10_dgv.RowTemplate.Height = 列高
213
+        ConnOpen()
214
+        SQL1 = "SELECT     財務彙總紀錄_ICS.日期, AA.餘額
215
+                FROM       財務彙總紀錄_ICS LEFT OUTER JOIN
216
+                          (SELECT          LEFT(日期, 7) AS 日期, SUM(收入 * 匯率) AS 餘額
217
+                           FROM               財務流水帳_ICS
218
+                           WHERE           (類別 LIKE 'D%') AND (日期 LIKE N'%" & 年份_cb.Text & "%')
219
+                           GROUP BY    LEFT(日期, 7)) AS AA ON LEFT(財務彙總紀錄_ICS.日期, 7) = AA.日期
220
+                WHERE     (財務彙總紀錄_ICS.日期 LIKE N'%" & 年份_cb.Text & "%')
221
+                GROUP BY   財務彙總紀錄_ICS.日期, AA.餘額
222
+                ORDER BY   財務彙總紀錄_ICS.日期"
223
+        CmdSet_For_DGV() : da.Fill(ds10) : 主表10_dgv.DataSource = ds10.Tables(0) : conn.Close()
224
+        For i As Integer = 0 To 主表10_dgv.Rows.Count - 1
225
+            If IsDBNull(主表10_dgv.Rows(i).Cells("餘額").Value) Then
226
+                主表10_dgv.Rows(i).Cells("餘額").Value = "0"
227
+            End If
228
+            If i > 0 Then
229
+                If 主表10_dgv.Rows(i).Cells("餘額").Value = 0 And 主表10_dgv.Rows(i - 1).Cells("餘額").Value > 0 Then
230
+                    主表10_dgv.Rows(i).Cells("餘額").Value = 主表10_dgv.Rows(i - 1).Cells("餘額").Value
231
+                End If
232
+            End If
198 233
         Next
199 234
     End Sub
200 235
     Private Sub 彙總()
@@ -208,6 +243,8 @@ Public Class 財務_彙總表_ICS
208 243
         Set_清單9()
209 244
 
210 245
         Chart1.Series.Clear() : Chart1.ChartAreas(0).AxisX.Minimum = 0
246
+        Chart1.ChartAreas(0).AxisY.LabelStyle.Font = New Font("Arial", 8) : Chart1.ChartAreas(0).AxisY.LabelStyle.Format = "#,##0"
247
+
211 248
         If 主項2_cb.Text <> "" Then
212 249
             Chart1.Series.Add(主項2_cb.Text)
213 250
             If 主項2_cb.Text = "資本" Then : Chart1.Series(主項2_cb.Text).ChartType = SeriesChartType.Line
@@ -222,7 +259,7 @@ Public Class 財務_彙總表_ICS
222 259
             Chart4.Series(主項2_cb.Text).IsVisibleInLegend = True
223 260
             Chart4.Series(主項2_cb.Text).IsXValueIndexed = True
224 261
             For i As Integer = 0 To 主表7_dgv.Rows.Count - 1
225
-                Chart4.Series(主項2_cb.Text).Points.AddXY(主表7_dgv.Rows(i).Cells("子細項").Value.ToString, Format(主表7_dgv.Rows(i).Cells("金額").Value, "#,##0"))
262
+                Chart4.Series(主項2_cb.Text).Points.AddXY(主表7_dgv.Rows(i).Cells("子細項").Value.ToString, 主表7_dgv.Rows(i).Cells("比例.").Value.ToString.Replace(" ", "").Replace("%", ""))
226 263
             Next
227 264
         End If
228 265
 
@@ -240,7 +277,7 @@ Public Class 財務_彙總表_ICS
240 277
             Chart2.Series(主項1_cb.Text).IsVisibleInLegend = True
241 278
             Chart2.Series(主項1_cb.Text).IsXValueIndexed = True
242 279
             For i As Integer = 0 To 主表4_dgv.Rows.Count - 1
243
-                Chart2.Series(主項1_cb.Text).Points.AddXY(主表4_dgv.Rows(i).Cells("子細項").Value.ToString, Format(主表4_dgv.Rows(i).Cells("金額").Value, "#,##0"))
280
+                Chart2.Series(主項1_cb.Text).Points.AddXY(主表4_dgv.Rows(i).Cells("子細項").Value.ToString, 主表4_dgv.Rows(i).Cells("比例.").Value.ToString.Replace(" ", "").Replace("%", ""))
244 281
             Next
245 282
         End If
246 283
 
@@ -258,9 +295,15 @@ Public Class 財務_彙總表_ICS
258 295
             Chart3.Series(主項_cb.Text).IsVisibleInLegend = True
259 296
             Chart3.Series(主項_cb.Text).IsXValueIndexed = True
260 297
             For i As Integer = 0 To 主表1_dgv.Rows.Count - 1
261
-                Chart3.Series(主項_cb.Text).Points.AddXY(主表1_dgv.Rows(i).Cells("子細項").Value.ToString, Format(主表1_dgv.Rows(i).Cells("金額").Value, "#,##0"))
298
+                Chart3.Series(主項_cb.Text).Points.AddXY(主表1_dgv.Rows(i).Cells("子細項").Value.ToString, 主表1_dgv.Rows(i).Cells("比例.").Value.ToString.Replace(" ", "").Replace("%", ""))
262 299
             Next
263 300
         End If
301
+
302
+        Chart1.Series.Add("資金餘額")
303
+        Chart1.Series("資金餘額").ChartType = SeriesChartType.Line
304
+        For i As Integer = 0 To 主表10_dgv.Rows.Count - 1
305
+            Chart1.Series("資金餘額").Points.AddXY(主表10_dgv.Rows(i).Cells("日期").Value.ToString, 主表10_dgv.Rows(i).Cells("餘額").Value.ToString)
306
+        Next
264 307
     End Sub
265 308
     Private Sub 主項下拉()
266 309
         ConnOpen() : SQL1 = "SELECT  主項 FROM 財務彙總紀錄_ICS WHERE 主項 NOT LIKE N'上月結存' GROUP BY 主項 ORDER BY 主項 DESC" : CmdSet_For_dr()
@@ -273,11 +316,16 @@ Public Class 財務_彙總表_ICS
273 316
     End Sub
274 317
     Private Sub 財務_彙總表_ICS_Load(sender As Object, e As EventArgs) Handles MyBase.Load
275 318
         Me.MdiParent = GCM_ERP_SYS : Me.WindowState = 2 : Me.AutoScroll = True
276
-        GCM_ERP_SYS.WindowState = 2
319
+        GCM_ERP_SYS.WindowState = 2 : 列高 = 19
277 320
         ComboBox1下拉表單資料載入() : 主項下拉()
278 321
         If 主項_cb.Items.Count >= 1 Then : 主項_cb.SelectedIndex = 0 : End If
279 322
         If 主項_cb.Items.Count >= 2 Then : 主項1_cb.SelectedIndex = 1 : End If
280 323
         If 主項_cb.Items.Count >= 3 Then : 主項2_cb.SelectedIndex = 2 : End If
324
+        主表_dgv.RowsDefaultCellStyle.Font = New System.Drawing.Font("微軟正黑體", 7.6) : 主表1_dgv.RowsDefaultCellStyle.Font = New System.Drawing.Font("微軟正黑體", 7.6)
325
+        主表2_dgv.RowsDefaultCellStyle.Font = New System.Drawing.Font("微軟正黑體", 7.6) : 主表3_dgv.RowsDefaultCellStyle.Font = New System.Drawing.Font("微軟正黑體", 7.6)
326
+        主表4_dgv.RowsDefaultCellStyle.Font = New System.Drawing.Font("微軟正黑體", 7.6) : 主表5_dgv.RowsDefaultCellStyle.Font = New System.Drawing.Font("微軟正黑體", 7.6)
327
+        主表6_dgv.RowsDefaultCellStyle.Font = New System.Drawing.Font("微軟正黑體", 7.6) : 主表7_dgv.RowsDefaultCellStyle.Font = New System.Drawing.Font("微軟正黑體", 7.6)
328
+        主表8_dgv.RowsDefaultCellStyle.Font = New System.Drawing.Font("微軟正黑體", 7.6)
281 329
     End Sub
282 330
     Private Sub 財務_彙總表_Closed(sender As Object, e As EventArgs) Handles MyBase.Closed
283 331
         GCM_ERP_SYS.WindowState = 0

BIN
工巧明智能管理系統/我的系統/bin/Debug/DawnCache/data_1 Прегледај датотеку


BIN
工巧明智能管理系統/我的系統/bin/Debug/GCM-ERP-SYS.exe Прегледај датотеку


BIN
工巧明智能管理系統/我的系統/bin/Debug/GCM-ERP-SYS.pdb Прегледај датотеку


BIN
工巧明智能管理系統/我的系統/bin/Debug/GPUCache/data_1 Прегледај датотеку


+ 251
- 0
工巧明智能管理系統/我的系統/bin/Debug/debug.log Прегледај датотеку

@@ -493,3 +493,254 @@ ERROR: Couldn't read tbsCertificate as SEQUENCE
493 493
 ERROR: Failed parsing Certificate
494 494
 
495 495
 [0105/142140.917:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkN1KA0EMhd/GK6fj2qpXxUeR+Ulns838mMy09O0NZVUE9aIQODmQfCTn3AyWQCOC2EXrfQBfVjEZE7sOm4xls8j9uZlQS4fSbaORsIg9VM4muyOw9bVKV3Ui0K+wgBwITOOaGERuQSSq3tEfmwv05sLRvukH1g+kaBlID46mKUh+un++SEOtB04rJdc4SAPB3Cr37JoS6HJAol8gfYass3BSY6S7r/MJPTsNc+6ZnmTG03d3C0YjbLXET10Rr3k/vTxsn6fdtH28C34/fQCVZLDN (2)
496
+[0219/145229.019:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
497
+[0219/145231.195:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
498
+ERROR: Couldn't read tbsCertificate as SEQUENCE
499
+ERROR: Failed parsing Certificate
500
+
501
+[0219/145232.985:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
502
+ERROR: Couldn't read tbsCertificate as SEQUENCE
503
+ERROR: Failed parsing Certificate
504
+
505
+[0219/145233.341:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)
506
+[0219/145631.662:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
507
+[0219/145633.536:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
508
+ERROR: Couldn't read tbsCertificate as SEQUENCE
509
+ERROR: Failed parsing Certificate
510
+
511
+[0219/145634.888:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
512
+ERROR: Couldn't read tbsCertificate as SEQUENCE
513
+ERROR: Failed parsing Certificate
514
+
515
+[0219/145635.231:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)
516
+[0219/150047.588:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
517
+[0219/150050.341:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
518
+ERROR: Couldn't read tbsCertificate as SEQUENCE
519
+ERROR: Failed parsing Certificate
520
+
521
+[0219/150050.814:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
522
+ERROR: Couldn't read tbsCertificate as SEQUENCE
523
+ERROR: Failed parsing Certificate
524
+
525
+[0219/150051.227:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)
526
+[0219/151021.295:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
527
+[0219/151023.265:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
528
+ERROR: Couldn't read tbsCertificate as SEQUENCE
529
+ERROR: Failed parsing Certificate
530
+
531
+[0219/151024.693:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
532
+ERROR: Couldn't read tbsCertificate as SEQUENCE
533
+ERROR: Failed parsing Certificate
534
+
535
+[0219/151025.123:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)
536
+[0219/151556.208:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
537
+[0219/151558.113:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
538
+ERROR: Couldn't read tbsCertificate as SEQUENCE
539
+ERROR: Failed parsing Certificate
540
+
541
+[0219/151559.414:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
542
+ERROR: Couldn't read tbsCertificate as SEQUENCE
543
+ERROR: Failed parsing Certificate
544
+
545
+[0219/151559.675:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)
546
+[0219/152111.391:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
547
+[0219/152113.282:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
548
+ERROR: Couldn't read tbsCertificate as SEQUENCE
549
+ERROR: Failed parsing Certificate
550
+
551
+[0219/152114.490:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
552
+ERROR: Couldn't read tbsCertificate as SEQUENCE
553
+ERROR: Failed parsing Certificate
554
+
555
+[0219/152114.884:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)
556
+[0219/152635.239:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
557
+[0219/152638.784:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
558
+ERROR: Couldn't read tbsCertificate as SEQUENCE
559
+ERROR: Failed parsing Certificate
560
+
561
+[0219/152640.071:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
562
+ERROR: Couldn't read tbsCertificate as SEQUENCE
563
+ERROR: Failed parsing Certificate
564
+
565
+[0219/152640.468:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)
566
+[0219/153144.881:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
567
+[0219/153147.810:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
568
+ERROR: Couldn't read tbsCertificate as SEQUENCE
569
+ERROR: Failed parsing Certificate
570
+
571
+[0219/153149.365:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
572
+ERROR: Couldn't read tbsCertificate as SEQUENCE
573
+ERROR: Failed parsing Certificate
574
+
575
+[0219/153149.677:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)
576
+[0219/153457.337:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
577
+[0219/153500.323:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
578
+ERROR: Couldn't read tbsCertificate as SEQUENCE
579
+ERROR: Failed parsing Certificate
580
+
581
+[0219/153500.836:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
582
+ERROR: Couldn't read tbsCertificate as SEQUENCE
583
+ERROR: Failed parsing Certificate
584
+
585
+[0219/153501.161:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)
586
+[0219/153803.428:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
587
+[0219/153805.439:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
588
+ERROR: Couldn't read tbsCertificate as SEQUENCE
589
+ERROR: Failed parsing Certificate
590
+
591
+[0219/153806.830:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
592
+ERROR: Couldn't read tbsCertificate as SEQUENCE
593
+ERROR: Failed parsing Certificate
594
+
595
+[0219/153807.195:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)
596
+[0219/154100.016:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
597
+[0219/154103.124:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
598
+ERROR: Couldn't read tbsCertificate as SEQUENCE
599
+ERROR: Failed parsing Certificate
600
+
601
+[0219/154103.646:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
602
+ERROR: Couldn't read tbsCertificate as SEQUENCE
603
+ERROR: Failed parsing Certificate
604
+
605
+[0219/154104.031:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)
606
+[0219/160753.698:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
607
+[0219/160755.993:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
608
+ERROR: Couldn't read tbsCertificate as SEQUENCE
609
+ERROR: Failed parsing Certificate
610
+
611
+[0219/160757.466:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
612
+ERROR: Couldn't read tbsCertificate as SEQUENCE
613
+ERROR: Failed parsing Certificate
614
+
615
+[0219/160757.762:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)
616
+[0219/160951.455:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
617
+[0219/160953.306:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
618
+ERROR: Couldn't read tbsCertificate as SEQUENCE
619
+ERROR: Failed parsing Certificate
620
+
621
+[0219/160954.649:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
622
+ERROR: Couldn't read tbsCertificate as SEQUENCE
623
+ERROR: Failed parsing Certificate
624
+
625
+[0219/160955.017:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)
626
+[0219/161152.365:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
627
+[0219/161154.238:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
628
+ERROR: Couldn't read tbsCertificate as SEQUENCE
629
+ERROR: Failed parsing Certificate
630
+
631
+[0219/161154.761:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
632
+ERROR: Couldn't read tbsCertificate as SEQUENCE
633
+ERROR: Failed parsing Certificate
634
+
635
+[0219/161155.202:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)
636
+[0219/162819.162:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
637
+[0219/162822.133:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
638
+ERROR: Couldn't read tbsCertificate as SEQUENCE
639
+ERROR: Failed parsing Certificate
640
+
641
+[0219/162823.580:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
642
+ERROR: Couldn't read tbsCertificate as SEQUENCE
643
+ERROR: Failed parsing Certificate
644
+
645
+[0219/162823.945:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)
646
+[0219/162931.304:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
647
+[0219/162933.203:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
648
+ERROR: Couldn't read tbsCertificate as SEQUENCE
649
+ERROR: Failed parsing Certificate
650
+
651
+[0219/162934.658:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
652
+ERROR: Couldn't read tbsCertificate as SEQUENCE
653
+ERROR: Failed parsing Certificate
654
+
655
+[0219/162934.958:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)
656
+[0219/163014.066:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
657
+[0219/163015.886:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
658
+ERROR: Couldn't read tbsCertificate as SEQUENCE
659
+ERROR: Failed parsing Certificate
660
+
661
+[0219/163016.319:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
662
+ERROR: Couldn't read tbsCertificate as SEQUENCE
663
+ERROR: Failed parsing Certificate
664
+
665
+[0219/163016.680:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)
666
+[0219/163140.933:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
667
+[0219/163142.866:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
668
+ERROR: Couldn't read tbsCertificate as SEQUENCE
669
+ERROR: Failed parsing Certificate
670
+
671
+[0219/163143.252:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
672
+ERROR: Couldn't read tbsCertificate as SEQUENCE
673
+ERROR: Failed parsing Certificate
674
+
675
+[0219/163143.551:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)
676
+[0219/164520.897:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
677
+[0219/164522.855:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
678
+ERROR: Couldn't read tbsCertificate as SEQUENCE
679
+ERROR: Failed parsing Certificate
680
+
681
+[0219/164524.142:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
682
+ERROR: Couldn't read tbsCertificate as SEQUENCE
683
+ERROR: Failed parsing Certificate
684
+
685
+[0219/164524.475:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)
686
+[0219/164909.476:WARNING:frame_impl.cc(420)] SendProcessMessage sent to detached frame 17179869185 [4,1] will be ignored
687
+[0219/165825.213:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
688
+[0219/165829.063:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
689
+ERROR: Couldn't read tbsCertificate as SEQUENCE
690
+ERROR: Failed parsing Certificate
691
+
692
+[0219/165830.343:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
693
+ERROR: Couldn't read tbsCertificate as SEQUENCE
694
+ERROR: Failed parsing Certificate
695
+
696
+[0219/165830.655:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)
697
+[0219/170239.197:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
698
+[0219/170241.084:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
699
+ERROR: Couldn't read tbsCertificate as SEQUENCE
700
+ERROR: Failed parsing Certificate
701
+
702
+[0219/170241.523:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
703
+ERROR: Couldn't read tbsCertificate as SEQUENCE
704
+ERROR: Failed parsing Certificate
705
+
706
+[0219/170241.831:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)
707
+[0219/171747.373:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
708
+[0219/171750.561:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
709
+ERROR: Couldn't read tbsCertificate as SEQUENCE
710
+ERROR: Failed parsing Certificate
711
+
712
+[0219/171752.073:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
713
+ERROR: Couldn't read tbsCertificate as SEQUENCE
714
+ERROR: Failed parsing Certificate
715
+
716
+[0219/171752.377:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)
717
+[0219/173529.571:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
718
+[0219/173532.216:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
719
+ERROR: Couldn't read tbsCertificate as SEQUENCE
720
+ERROR: Failed parsing Certificate
721
+
722
+[0219/173533.653:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
723
+ERROR: Couldn't read tbsCertificate as SEQUENCE
724
+ERROR: Failed parsing Certificate
725
+
726
+[0219/173533.985:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)
727
+[0219/173729.422:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
728
+[0219/173731.203:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
729
+ERROR: Couldn't read tbsCertificate as SEQUENCE
730
+ERROR: Failed parsing Certificate
731
+
732
+[0219/173731.766:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
733
+ERROR: Couldn't read tbsCertificate as SEQUENCE
734
+ERROR: Failed parsing Certificate
735
+
736
+[0219/173732.070:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)
737
+[0219/180504.417:WARNING:chrome_browser_cloud_management_controller.cc(87)] Could not create policy manager as CBCM is not enabled.
738
+[0219/180506.312:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
739
+ERROR: Couldn't read tbsCertificate as SEQUENCE
740
+ERROR: Failed parsing Certificate
741
+
742
+[0219/180508.007:ERROR:cert_issuer_source_aia.cc(34)] Error parsing cert retrieved from AIA (as DER):
743
+ERROR: Couldn't read tbsCertificate as SEQUENCE
744
+ERROR: Failed parsing Certificate
745
+
746
+[0219/180508.412:INFO:CONSOLE(2)] "JQMIGRATE: Migrate is installed, version 3.4.1", source: https://gcm-smart.com/_jb_static/??-eJydkMsKAjEMRf/GlbU6oq7ET5G2E2c6pg+TjOLfG8QHgm6EwM1d5CQ3l2piDji2wHbQOo1A14eYFDtyArMU82zg6aWaULJAFltx7GJmeyiUTHJHIOtLYVF1zCB3WIgUEEyl0hEw/4PosHiHPyYHkOrC0e41gfVjxNYSoB7cmqog/nRfUkgPSXPDWY1hca/NGD05/UMvCVfcx/O7+wej6WvJ7VMfiF3aLjbz9XK+3jTNJPjt4gaR4ZXx (2)

BIN
工巧明智能管理系統/我的系統/obj/x86/Debug/DesignTimeResolveAssemblyReferences.cache Прегледај датотеку


BIN
工巧明智能管理系統/我的系統/obj/x86/Debug/GCM-ERP-SYS.exe Прегледај датотеку


BIN
工巧明智能管理系統/我的系統/obj/x86/Debug/GCM-ERP-SYS.pdb Прегледај датотеку


BIN
工巧明智能管理系統/我的系統/obj/x86/Debug/工巧明智能管理系統.vbproj.GenerateResource.cache Прегледај датотеку


BIN
工巧明智能管理系統/我的系統/obj/x86/Debug/工巧明智能管理系統.vbproj.ResolveComReference.cache Прегледај датотеку


Loading…
Откажи
Сачувај