20250321備份

.vs/ZJ-ERP-SYS/v17/DocumentLayout.backup.json

@@ -2,10 +2,6 @@
   "Version": 1,
   "WorkspaceRootPath": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\",
   "Documents": [
-    {
-      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|d:\\\u5DE5\u5DE7\u660E\\zj\\zj-erp-sys\\zj-erp-sys\\01\u3001module\\\u5168\u57DF\u8B8A\u6578.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
-      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\01\u3001module\\\u5168\u57DF\u8B8A\u6578.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
-    },
     {
       "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u51FA\u5EAB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
       "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u51FA\u5EAB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
@@ -19,36 +15,48 @@
       "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\01\u3001module\\sql_\u5009\u5132\u7CFB\u7D71\u7BA1\u7406.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
     },
     {
-      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
-      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
+      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|d:\\\u5DE5\u5DE7\u660E\\zj\\zj-erp-sys\\zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
+      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
+    },
+    {
+      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
+      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
+    },
+    {
+      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
+      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
+    },
+    {
+      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
+      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
     },
     {
       "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
       "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
     },
     {
-      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
-      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
+      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
+      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
     },
     {
-      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
-      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
+      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|d:\\\u5DE5\u5DE7\u660E\\zj\\zj-erp-sys\\zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5217\u5370\u78BA\u8A8D.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
+      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5217\u5370\u78BA\u8A8D.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
     },
     {
-      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\loginform1.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
-      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\loginform1.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
+      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|d:\\\u5DE5\u5DE7\u660E\\zj\\zj-erp-sys\\zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5217\u5370\u78BA\u8A8D.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
+      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5217\u5370\u78BA\u8A8D.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
     },
     {
-      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\loginform1.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
-      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\loginform1.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
+      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\01\u3001module\\\u5168\u57DF\u8B8A\u6578.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
+      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\01\u3001module\\\u5168\u57DF\u8B8A\u6578.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
     },
     {
-      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
-      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
+      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\loginform1.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
+      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\loginform1.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
     },
     {
-      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
-      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
+      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\loginform1.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
+      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\loginform1.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
     },
     {
       "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\zj_erp_sys.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
@@ -66,11 +74,11 @@
       "DocumentGroups": [
         {
           "DockedWidth": 200,
-          "SelectedChildIndex": 6,
+          "SelectedChildIndex": 15,
           "Children": [
             {
               "$type": "Document",
-              "DocumentIndex": 12,
+              "DocumentIndex": 14,
               "Title": "ZJ_ERP_SYS.vb",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\ZJ_ERP_SYS.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\ZJ_ERP_SYS.vb",
@@ -83,7 +91,7 @@
             },
             {
               "$type": "Document",
-              "DocumentIndex": 13,
+              "DocumentIndex": 15,
               "Title": "ZJ_ERP_SYS.vb [\u8A2D\u8A08]",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\ZJ_ERP_SYS.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\ZJ_ERP_SYS.vb",
@@ -95,7 +103,32 @@
             },
             {
               "$type": "Document",
-              "DocumentIndex": 8,
+              "DocumentIndex": 10,
+              "Title": "\u5217\u5370\u78BA\u8A8D.vb",
+              "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5217\u5370\u78BA\u8A8D.vb",
+              "RelativeDocumentMoniker": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5217\u5370\u78BA\u8A8D.vb",
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5217\u5370\u78BA\u8A8D.vb",
+              "RelativeToolTip": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5217\u5370\u78BA\u8A8D.vb",
+              "ViewState": "AgIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA==",
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
+              "WhenOpened": "2025-03-20T01:38:19.268Z",
+              "EditorCaption": ""
+            },
+            {
+              "$type": "Document",
+              "DocumentIndex": 9,
+              "Title": "\u5217\u5370\u78BA\u8A8D.vb [\u8A2D\u8A08]",
+              "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5217\u5370\u78BA\u8A8D.vb",
+              "RelativeDocumentMoniker": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5217\u5370\u78BA\u8A8D.vb",
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5217\u5370\u78BA\u8A8D.vb [\u8A2D\u8A08]",
+              "RelativeToolTip": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5217\u5370\u78BA\u8A8D.vb [\u8A2D\u8A08]",
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
+              "WhenOpened": "2025-03-20T01:37:35.492Z",
+              "EditorCaption": " [\u8A2D\u8A08]"
+            },
+            {
+              "$type": "Document",
+              "DocumentIndex": 12,
               "Title": "LoginForm1.vb",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\LoginForm1.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\LoginForm1.vb",
@@ -107,7 +140,7 @@
             },
             {
               "$type": "Document",
-              "DocumentIndex": 9,
+              "DocumentIndex": 13,
               "Title": "LoginForm1.vb [\u8A2D\u8A08]",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\LoginForm1.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\LoginForm1.vb",
@@ -117,29 +150,32 @@
             },
             {
               "$type": "Document",
-              "DocumentIndex": 4,
+              "DocumentIndex": 8,
               "Title": "\u4EE3\u8FA6\u4E8B\u9805.vb",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb",
               "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb",
               "RelativeToolTip": "ZJ-ERP-SYS\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb",
-              "ViewState": "AgIAAOQAAAAAAAAAAAAIwAkBAABAAAAAAAAAAA==",
+              "ViewState": "AgIAAGYAAAAAAAAAAAAiwHwAAAAIAAAAAAAAAA==",
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
-              "WhenOpened": "2025-03-19T12:32:29.877Z"
+              "WhenOpened": "2025-03-19T12:32:29.877Z",
+              "EditorCaption": ""
             },
             {
               "$type": "Document",
-              "DocumentIndex": 5,
+              "DocumentIndex": 7,
               "Title": "\u4EE3\u8FA6\u4E8B\u9805.vb [\u8A2D\u8A08]",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb",
-              "ToolTip": "C:\\Users\\USER\\Downloads\\ZJ-ERP-SYS-SIU-master\\zj-erp-sys-siu\\ZJ-ERP-SYS\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb [\u8A2D\u8A08]",
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb [\u8A2D\u8A08]",
+              "RelativeToolTip": "ZJ-ERP-SYS\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb [\u8A2D\u8A08]",
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
-              "WhenOpened": "2025-03-19T12:32:27.907Z"
+              "WhenOpened": "2025-03-19T12:32:27.907Z",
+              "EditorCaption": " [\u8A2D\u8A08]"
             },
             {
               "$type": "Document",
-              "DocumentIndex": 0,
+              "DocumentIndex": 11,
               "Title": "\u5168\u57DF\u8B8A\u6578.vb",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\01\u3001Module\\\u5168\u57DF\u8B8A\u6578.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\01\u3001Module\\\u5168\u57DF\u8B8A\u6578.vb",
@@ -147,87 +183,95 @@
               "RelativeToolTip": "ZJ-ERP-SYS\\01\u3001Module\\\u5168\u57DF\u8B8A\u6578.vb",
               "ViewState": "AgIAAAEAAAAAAAAAAAAuwAYAAAAlAAAAAAAAAA==",
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
-              "WhenOpened": "2025-03-19T09:35:04.913Z",
-              "EditorCaption": ""
+              "WhenOpened": "2025-03-19T09:35:04.913Z"
             },
             {
               "$type": "Document",
-              "DocumentIndex": 6,
+              "DocumentIndex": 3,
               "Title": "\u5009\u5132\u5165\u5EAB.vb",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb",
               "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb",
               "RelativeToolTip": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb",
-              "ViewState": "AgIAAAYBAAAAAAAAAAAgwBsBAAAPAAAAAAAAAA==",
+              "ViewState": "AgIAAL0AAAAAAAAAAAAgwNMAAAAHAAAAAAAAAA==",
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
-              "WhenOpened": "2025-03-06T14:37:47.901Z"
+              "WhenOpened": "2025-03-06T14:37:47.901Z",
+              "EditorCaption": ""
             },
             {
               "$type": "Document",
-              "DocumentIndex": 7,
+              "DocumentIndex": 4,
               "Title": "\u5009\u5132\u5165\u5EAB.vb [\u8A2D\u8A08]",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb",
-              "ToolTip": "C:\\Users\\USER\\Downloads\\ZJ-ERP-SYS-SIU-master\\zj-erp-sys-siu\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb [\u8A2D\u8A08]",
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb [\u8A2D\u8A08]",
+              "RelativeToolTip": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb [\u8A2D\u8A08]",
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
-              "WhenOpened": "2025-03-06T14:24:38.441Z"
+              "WhenOpened": "2025-03-06T14:24:38.441Z",
+              "EditorCaption": " [\u8A2D\u8A08]"
             },
             {
               "$type": "Document",
-              "DocumentIndex": 10,
+              "DocumentIndex": 6,
               "Title": "\u5009\u5132\u63A7\u5236\u8868.vb [\u8A2D\u8A08]",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb",
-              "ToolTip": "D:\\zj-erp-sys-leehsiehjui\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb [\u8A2D\u8A08]",
-              "RelativeToolTip": "..\\..\\..\\zj-erp-sys-leehsiehjui\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb [\u8A2D\u8A08]",
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb [\u8A2D\u8A08]",
+              "RelativeToolTip": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb [\u8A2D\u8A08]",
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
-              "WhenOpened": "2025-03-18T06:49:05.267Z"
+              "WhenOpened": "2025-03-18T06:49:05.267Z",
+              "EditorCaption": " [\u8A2D\u8A08]"
             },
             {
               "$type": "Document",
-              "DocumentIndex": 11,
+              "DocumentIndex": 5,
               "Title": "\u5009\u5132\u63A7\u5236\u8868.vb",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb",
               "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb",
               "RelativeToolTip": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb",
-              "ViewState": "AQIAAHcAAAAAAAAAAAAswIYAAAAUAAAA",
+              "ViewState": "AgIAAHcAAAAAAAAAAAAswIYAAAAUAAAAAAAAAA==",
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
-              "WhenOpened": "2025-03-18T06:49:10.703Z"
+              "WhenOpened": "2025-03-18T06:49:10.703Z",
+              "EditorCaption": ""
             },
             {
               "$type": "Document",
-              "DocumentIndex": 3,
+              "DocumentIndex": 2,
               "Title": "SQL_\u5009\u5132\u7CFB\u7D71\u7BA1\u7406.vb",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\01\u3001Module\\SQL_\u5009\u5132\u7CFB\u7D71\u7BA1\u7406.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\01\u3001Module\\SQL_\u5009\u5132\u7CFB\u7D71\u7BA1\u7406.vb",
               "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\01\u3001Module\\SQL_\u5009\u5132\u7CFB\u7D71\u7BA1\u7406.vb",
               "RelativeToolTip": "ZJ-ERP-SYS\\01\u3001Module\\SQL_\u5009\u5132\u7CFB\u7D71\u7BA1\u7406.vb",
-              "ViewState": "AgIAABoAAAAAAAAAAAAAADQAAAAIAAAAAAAAAA==",
+              "ViewState": "AgIAAAEAAAAAAAAAAAAQwA8AAAAdAAAAAAAAAA==",
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
-              "WhenOpened": "2025-03-06T14:09:17.15Z"
+              "WhenOpened": "2025-03-06T14:09:17.15Z",
+              "EditorCaption": ""
             },
             {
               "$type": "Document",
-              "DocumentIndex": 2,
+              "DocumentIndex": 1,
               "Title": "\u5009\u5132\u51FA\u5EAB.vb [\u8A2D\u8A08]",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u51FA\u5EAB.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u51FA\u5EAB.vb",
-              "ToolTip": "C:\\Users\\USER\\Downloads\\ZJ-ERP-SYS-SIU-master\\zj-erp-sys-siu\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u51FA\u5EAB.vb [\u8A2D\u8A08]",
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u51FA\u5EAB.vb [\u8A2D\u8A08]",
+              "RelativeToolTip": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u51FA\u5EAB.vb [\u8A2D\u8A08]",
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
-              "WhenOpened": "2025-03-19T02:20:25.744Z"
+              "WhenOpened": "2025-03-19T02:20:25.744Z",
+              "EditorCaption": " [\u8A2D\u8A08]"
             },
             {
               "$type": "Document",
-              "DocumentIndex": 1,
+              "DocumentIndex": 0,
               "Title": "\u5009\u5132\u51FA\u5EAB.vb",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u51FA\u5EAB.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u51FA\u5EAB.vb",
               "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u51FA\u5EAB.vb",
               "RelativeToolTip": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u51FA\u5EAB.vb",
-              "ViewState": "AgIAAJMAAAAAAAAAAAAUwJoAAAAWAAAAAAAAAA==",
+              "ViewState": "AgIAAL8AAAAAAAAAAAAgwNcAAABOAAAAAAAAAA==",
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
-              "WhenOpened": "2025-03-19T02:22:07.062Z"
+              "WhenOpened": "2025-03-19T02:22:07.062Z",
+              "EditorCaption": ""
             }
           ]
         }

.vs/ZJ-ERP-SYS/v17/DocumentLayout.json

@@ -2,10 +2,6 @@
   "Version": 1,
   "WorkspaceRootPath": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\",
   "Documents": [
-    {
-      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|d:\\\u5DE5\u5DE7\u660E\\zj\\zj-erp-sys\\zj-erp-sys\\01\u3001module\\\u5168\u57DF\u8B8A\u6578.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
-      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\01\u3001module\\\u5168\u57DF\u8B8A\u6578.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
-    },
     {
       "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u51FA\u5EAB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
       "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u51FA\u5EAB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
@@ -19,36 +15,48 @@
       "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\01\u3001module\\sql_\u5009\u5132\u7CFB\u7D71\u7BA1\u7406.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
     },
     {
-      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
-      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
+      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|d:\\\u5DE5\u5DE7\u660E\\zj\\zj-erp-sys\\zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
+      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
+    },
+    {
+      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
+      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
+    },
+    {
+      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
+      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
+    },
+    {
+      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
+      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
     },
     {
       "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
       "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
     },
     {
-      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
-      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
+      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
+      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
     },
     {
-      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
-      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
+      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|d:\\\u5DE5\u5DE7\u660E\\zj\\zj-erp-sys\\zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5217\u5370\u78BA\u8A8D.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
+      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5217\u5370\u78BA\u8A8D.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
     },
     {
-      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\loginform1.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
-      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\loginform1.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
+      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|d:\\\u5DE5\u5DE7\u660E\\zj\\zj-erp-sys\\zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5217\u5370\u78BA\u8A8D.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
+      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5217\u5370\u78BA\u8A8D.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
     },
     {
-      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\loginform1.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
-      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\loginform1.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
+      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\01\u3001module\\\u5168\u57DF\u8B8A\u6578.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
+      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\01\u3001module\\\u5168\u57DF\u8B8A\u6578.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
     },
     {
-      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
-      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
+      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\loginform1.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
+      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\loginform1.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
     },
     {
-      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
-      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
+      "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\loginform1.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
+      "RelativeMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|solutionrelative:zj-erp-sys\\loginform1.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
     },
     {
       "AbsoluteMoniker": "D:0:0:{3AF1FD27-3669-4FE7-9F5A-9D1EC2BBECE3}|ZJ-ERP-SYS\\ZJ-ERP-SYS.vbproj|D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\zj-erp-sys\\zj_erp_sys.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
@@ -66,11 +74,11 @@
       "DocumentGroups": [
         {
           "DockedWidth": 200,
-          "SelectedChildIndex": 6,
+          "SelectedChildIndex": 15,
           "Children": [
             {
               "$type": "Document",
-              "DocumentIndex": 12,
+              "DocumentIndex": 14,
               "Title": "ZJ_ERP_SYS.vb",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\ZJ_ERP_SYS.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\ZJ_ERP_SYS.vb",
@@ -83,7 +91,7 @@
             },
             {
               "$type": "Document",
-              "DocumentIndex": 13,
+              "DocumentIndex": 15,
               "Title": "ZJ_ERP_SYS.vb [\u8A2D\u8A08]",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\ZJ_ERP_SYS.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\ZJ_ERP_SYS.vb",
@@ -95,7 +103,32 @@
             },
             {
               "$type": "Document",
-              "DocumentIndex": 8,
+              "DocumentIndex": 10,
+              "Title": "\u5217\u5370\u78BA\u8A8D.vb",
+              "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5217\u5370\u78BA\u8A8D.vb",
+              "RelativeDocumentMoniker": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5217\u5370\u78BA\u8A8D.vb",
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5217\u5370\u78BA\u8A8D.vb",
+              "RelativeToolTip": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5217\u5370\u78BA\u8A8D.vb",
+              "ViewState": "AgIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA==",
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
+              "WhenOpened": "2025-03-20T01:38:19.268Z",
+              "EditorCaption": ""
+            },
+            {
+              "$type": "Document",
+              "DocumentIndex": 9,
+              "Title": "\u5217\u5370\u78BA\u8A8D.vb [\u8A2D\u8A08]",
+              "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5217\u5370\u78BA\u8A8D.vb",
+              "RelativeDocumentMoniker": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5217\u5370\u78BA\u8A8D.vb",
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5217\u5370\u78BA\u8A8D.vb [\u8A2D\u8A08]",
+              "RelativeToolTip": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5217\u5370\u78BA\u8A8D.vb [\u8A2D\u8A08]",
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
+              "WhenOpened": "2025-03-20T01:37:35.492Z",
+              "EditorCaption": " [\u8A2D\u8A08]"
+            },
+            {
+              "$type": "Document",
+              "DocumentIndex": 12,
               "Title": "LoginForm1.vb",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\LoginForm1.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\LoginForm1.vb",
@@ -107,7 +140,7 @@
             },
             {
               "$type": "Document",
-              "DocumentIndex": 9,
+              "DocumentIndex": 13,
               "Title": "LoginForm1.vb [\u8A2D\u8A08]",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\LoginForm1.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\LoginForm1.vb",
@@ -117,29 +150,32 @@
             },
             {
               "$type": "Document",
-              "DocumentIndex": 4,
+              "DocumentIndex": 8,
               "Title": "\u4EE3\u8FA6\u4E8B\u9805.vb",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb",
               "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb",
               "RelativeToolTip": "ZJ-ERP-SYS\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb",
-              "ViewState": "AgIAAOQAAAAAAAAAAAAIwAkBAABAAAAAAAAAAA==",
+              "ViewState": "AgIAAGYAAAAAAAAAAAAiwHwAAAAIAAAAAAAAAA==",
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
-              "WhenOpened": "2025-03-19T12:32:29.877Z"
+              "WhenOpened": "2025-03-19T12:32:29.877Z",
+              "EditorCaption": ""
             },
             {
               "$type": "Document",
-              "DocumentIndex": 5,
+              "DocumentIndex": 7,
               "Title": "\u4EE3\u8FA6\u4E8B\u9805.vb [\u8A2D\u8A08]",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb",
-              "ToolTip": "C:\\Users\\USER\\Downloads\\ZJ-ERP-SYS-SIU-master\\zj-erp-sys-siu\\ZJ-ERP-SYS\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb [\u8A2D\u8A08]",
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb [\u8A2D\u8A08]",
+              "RelativeToolTip": "ZJ-ERP-SYS\\10\u3001\u80CC\u666F\u7A0B\u5F0F\u8207\u5176\u4ED6\u8996\u7A97\\\u4EE3\u8FA6\u4E8B\u9805.vb [\u8A2D\u8A08]",
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
-              "WhenOpened": "2025-03-19T12:32:27.907Z"
+              "WhenOpened": "2025-03-19T12:32:27.907Z",
+              "EditorCaption": " [\u8A2D\u8A08]"
             },
             {
               "$type": "Document",
-              "DocumentIndex": 0,
+              "DocumentIndex": 11,
               "Title": "\u5168\u57DF\u8B8A\u6578.vb",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\01\u3001Module\\\u5168\u57DF\u8B8A\u6578.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\01\u3001Module\\\u5168\u57DF\u8B8A\u6578.vb",
@@ -147,87 +183,95 @@
               "RelativeToolTip": "ZJ-ERP-SYS\\01\u3001Module\\\u5168\u57DF\u8B8A\u6578.vb",
               "ViewState": "AgIAAAEAAAAAAAAAAAAuwAYAAAAlAAAAAAAAAA==",
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
-              "WhenOpened": "2025-03-19T09:35:04.913Z",
-              "EditorCaption": ""
+              "WhenOpened": "2025-03-19T09:35:04.913Z"
             },
             {
               "$type": "Document",
-              "DocumentIndex": 6,
+              "DocumentIndex": 3,
               "Title": "\u5009\u5132\u5165\u5EAB.vb",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb",
               "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb",
               "RelativeToolTip": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb",
-              "ViewState": "AgIAAAYBAAAAAAAAAAAgwBsBAAAPAAAAAAAAAA==",
+              "ViewState": "AgIAAL0AAAAAAAAAAAAgwNMAAAAHAAAAAAAAAA==",
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
-              "WhenOpened": "2025-03-06T14:37:47.901Z"
+              "WhenOpened": "2025-03-06T14:37:47.901Z",
+              "EditorCaption": ""
             },
             {
               "$type": "Document",
-              "DocumentIndex": 7,
+              "DocumentIndex": 4,
               "Title": "\u5009\u5132\u5165\u5EAB.vb [\u8A2D\u8A08]",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb",
-              "ToolTip": "C:\\Users\\USER\\Downloads\\ZJ-ERP-SYS-SIU-master\\zj-erp-sys-siu\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb [\u8A2D\u8A08]",
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb [\u8A2D\u8A08]",
+              "RelativeToolTip": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u5165\u5EAB.vb [\u8A2D\u8A08]",
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
-              "WhenOpened": "2025-03-06T14:24:38.441Z"
+              "WhenOpened": "2025-03-06T14:24:38.441Z",
+              "EditorCaption": " [\u8A2D\u8A08]"
             },
             {
               "$type": "Document",
-              "DocumentIndex": 10,
+              "DocumentIndex": 6,
               "Title": "\u5009\u5132\u63A7\u5236\u8868.vb [\u8A2D\u8A08]",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb",
-              "ToolTip": "D:\\zj-erp-sys-leehsiehjui\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb [\u8A2D\u8A08]",
-              "RelativeToolTip": "..\\..\\..\\zj-erp-sys-leehsiehjui\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb [\u8A2D\u8A08]",
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb [\u8A2D\u8A08]",
+              "RelativeToolTip": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb [\u8A2D\u8A08]",
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
-              "WhenOpened": "2025-03-18T06:49:05.267Z"
+              "WhenOpened": "2025-03-18T06:49:05.267Z",
+              "EditorCaption": " [\u8A2D\u8A08]"
             },
             {
               "$type": "Document",
-              "DocumentIndex": 11,
+              "DocumentIndex": 5,
               "Title": "\u5009\u5132\u63A7\u5236\u8868.vb",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb",
               "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb",
               "RelativeToolTip": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u63A7\u5236\u8868.vb",
-              "ViewState": "AQIAAHcAAAAAAAAAAAAswIYAAAAUAAAA",
+              "ViewState": "AgIAAHcAAAAAAAAAAAAswIYAAAAUAAAAAAAAAA==",
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
-              "WhenOpened": "2025-03-18T06:49:10.703Z"
+              "WhenOpened": "2025-03-18T06:49:10.703Z",
+              "EditorCaption": ""
             },
             {
               "$type": "Document",
-              "DocumentIndex": 3,
+              "DocumentIndex": 2,
               "Title": "SQL_\u5009\u5132\u7CFB\u7D71\u7BA1\u7406.vb",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\01\u3001Module\\SQL_\u5009\u5132\u7CFB\u7D71\u7BA1\u7406.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\01\u3001Module\\SQL_\u5009\u5132\u7CFB\u7D71\u7BA1\u7406.vb",
               "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\01\u3001Module\\SQL_\u5009\u5132\u7CFB\u7D71\u7BA1\u7406.vb",
               "RelativeToolTip": "ZJ-ERP-SYS\\01\u3001Module\\SQL_\u5009\u5132\u7CFB\u7D71\u7BA1\u7406.vb",
-              "ViewState": "AgIAABoAAAAAAAAAAAAAADQAAAAIAAAAAAAAAA==",
+              "ViewState": "AgIAAAEAAAAAAAAAAAAQwA8AAAAdAAAAAAAAAA==",
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
-              "WhenOpened": "2025-03-06T14:09:17.15Z"
+              "WhenOpened": "2025-03-06T14:09:17.15Z",
+              "EditorCaption": ""
             },
             {
               "$type": "Document",
-              "DocumentIndex": 2,
+              "DocumentIndex": 1,
               "Title": "\u5009\u5132\u51FA\u5EAB.vb [\u8A2D\u8A08]",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u51FA\u5EAB.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u51FA\u5EAB.vb",
-              "ToolTip": "C:\\Users\\USER\\Downloads\\ZJ-ERP-SYS-SIU-master\\zj-erp-sys-siu\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u51FA\u5EAB.vb [\u8A2D\u8A08]",
+              "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u51FA\u5EAB.vb [\u8A2D\u8A08]",
+              "RelativeToolTip": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u51FA\u5EAB.vb [\u8A2D\u8A08]",
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
-              "WhenOpened": "2025-03-19T02:20:25.744Z"
+              "WhenOpened": "2025-03-19T02:20:25.744Z",
+              "EditorCaption": " [\u8A2D\u8A08]"
             },
             {
               "$type": "Document",
-              "DocumentIndex": 1,
+              "DocumentIndex": 0,
               "Title": "\u5009\u5132\u51FA\u5EAB.vb",
               "DocumentMoniker": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u51FA\u5EAB.vb",
               "RelativeDocumentMoniker": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u51FA\u5EAB.vb",
               "ToolTip": "D:\\\u5DE5\u5DE7\u660E\\ZJ\\ZJ-ERP-SYS\\ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u51FA\u5EAB.vb",
               "RelativeToolTip": "ZJ-ERP-SYS\\04\u3001\u5009\u5132\u7CFB\u7D71\\\u5009\u5132\u51FA\u5EAB.vb",
-              "ViewState": "AgIAAJMAAAAAAAAAAAAUwJoAAAAWAAAAAAAAAA==",
+              "ViewState": "AgIAAL8AAAAAAAAAAAAgwNcAAABOAAAAAAAAAA==",
               "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
-              "WhenOpened": "2025-03-19T02:22:07.062Z"
+              "WhenOpened": "2025-03-19T02:22:07.062Z",
+              "EditorCaption": ""
             }
           ]
         }

ZJ-ERP-SYS/01、Module/SQL_倉儲系統管理.vb

@@ -16,12 +16,12 @@
                             WHERE   (倉名編號 LIKE N'" & 倉名編號 & "')" : CmdSet_For_dr()
     End Sub
     '---------------------倉儲出庫-----------------------------------------------------------------------------------------------------------------
-    Friend Sub SQL_倉儲出庫清單()
+    Friend Sub SQL_倉儲出庫清單(條件 As String)
         ConnOpen()
-        SQL1 = "SELECT    倉儲明細執行單號.執行單號 AS 出庫單號
+        SQL1 = "SELECT    倉儲明細執行單號.執行單號 AS 出庫單號, 倉儲明細執行單號.單據單號
                 FROM      倉儲明細執行單號 INNER JOIN 倉儲明細表 ON 倉儲明細執行單號.執行單號 = 倉儲明細表.執行單號
-                WHERE    (倉儲明細表.狀態 LIKE N'領料出庫') AND (倉儲明細表.倉庫作業 LIKE '')
-                GROUP BY  倉儲明細執行單號.執行單號  ORDER BY  倉儲明細執行單號.執行單號 DESC"
+                WHERE    (倉儲明細表.狀態 LIKE N'領料出庫') AND (倉儲明細表.倉庫作業 " & 條件 & " '')
+                GROUP BY  倉儲明細執行單號.執行單號, 倉儲明細執行單號.單據單號  ORDER BY  倉儲明細執行單號.執行單號 DESC"
         CmdSet_For_DGV()
     End Sub
     Friend Sub SQL_倉儲出庫_物料清單(倉名 As String, 訂製狀態 As String, 倉儲狀態 As String)
@@ -53,12 +53,12 @@
         CmdSet_For_DGV()
     End Sub
     '---------------------倉儲入庫-----------------------------------------------------------------------------------------------------------------
-    Friend Sub SQL_倉儲入庫清單()
+    Friend Sub SQL_倉儲入庫清單(條件 As String)
         ConnOpen()
-        SQL1 = "SELECT    倉儲明細執行單號.執行單號 AS 入庫單號
+        SQL1 = "SELECT    倉儲明細執行單號.執行單號 AS 入庫單號, 倉儲明細執行單號.單據單號
                 FROM      倉儲明細執行單號 INNER JOIN 倉儲明細表 ON 倉儲明細執行單號.執行單號 = 倉儲明細表.執行單號
-                WHERE    (倉儲明細表.狀態 LIKE N'採購入庫') AND (倉儲明細表.倉庫作業 LIKE '')
-                GROUP BY  倉儲明細執行單號.執行單號  ORDER BY  倉儲明細執行單號.執行單號 DESC"
+                WHERE    (倉儲明細表.狀態 LIKE N'採購入庫') AND (倉儲明細表.倉庫作業 " & 條件 & " N'')
+                GROUP BY  倉儲明細執行單號.執行單號, 倉儲明細執行單號.單據單號  ORDER BY  倉儲明細執行單號.執行單號 DESC"
         CmdSet_For_DGV()
     End Sub
     Friend Sub SQL_倉儲入庫明細清單(執行單號 As String)
@@ -102,9 +102,9 @@
             End If
         Else
             If PA2 = "" Then
-                SQL2 = " WHERE (物料資料庫.料號 LIKE N'" & PA & "%' OR 物料資料庫.品名 LIKE N'%" & PA & "%') AND (物料資料庫.料號 NOT LIKE N'MT00000001')"
+                SQL2 = " WHERE (物料資料庫.品名 LIKE N'%" & PA1 & "%') AND (物料資料庫.料號 NOT LIKE N'MT00000001')"
             Else
-                SQL2 = " WHERE (供應商資料表.編號 LIKE '" & PA2 & "') AND (物料資料庫.料號 LIKE N'" & PA & "%' OR 物料資料庫.品名 LIKE N'%" & PA & "%') AND 
+                SQL2 = " WHERE (供應商資料表.編號 LIKE '" & PA2 & "') AND (物料資料庫.品名 LIKE N'%" & PA1 & "%') AND 
                                (物料資料庫.料號 NOT LIKE N'MT00000001')"
             End If
         End If
@@ -139,6 +139,11 @@
     Friend Sub SQL_倉儲明細表_單項刪除(資料流水號 As String)
         ConnOpen() : SQL1 = "DELETE FROM 倉儲明細表  WHERE (資料流水號 = N'" & 資料流水號 & "')" : CmdSet_For_dr()
     End Sub
+    Friend Sub SQL_倉儲控制_存檔(執行單號 As String, 單據單號 As String)
+        ConnOpen()
+        SQL1 = "UPDATE 倉儲明細執行單號 SET 單據單號 = N'" & 單據單號 & "'  WHERE (執行單號 = N'" & 執行單號 & "')"
+        CmdSet_For_dr()
+    End Sub
     Friend Sub SQL_倉儲明細表_存檔(資料流水號 As String, 備註 As String, 產品編號 As String, 入庫 As String)
         ConnOpen()
         SQL1 = "UPDATE 倉儲明細表 SET 備註 = N'" & 備註 & "' ,產品編號 = N'" & 產品編號 & "', 入庫 = N'" & 入庫 & "'   WHERE (資料流水號 = N'" & 資料流水號 & "')"

ZJ-ERP-SYS/04、倉儲系統/倉儲入庫.Designer.vb

@@ -23,12 +23,12 @@ Partial Class 倉儲入庫
     <System.Diagnostics.DebuggerStepThrough()> _
     Private Sub InitializeComponent()
         Me.components = New System.ComponentModel.Container()
-        Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
-        Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle7 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle8 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle9 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle10 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle11 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Dim DataGridViewCellStyle12 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
         Me.地區_cb = New System.Windows.Forms.ComboBox()
         Me.供應商_cb = New System.Windows.Forms.ComboBox()
         Me.供應商編碼_cb = New System.Windows.Forms.ComboBox()
@@ -87,6 +87,10 @@ Partial Class 倉儲入庫
         Me.查詢_bt = New System.Windows.Forms.Button()
         Me.清空_bt = New System.Windows.Forms.Button()
         Me.物料圖_pb = New System.Windows.Forms.PictureBox()
+        Me.新增_bt = New System.Windows.Forms.Button()
+        Me.紙號_tb = New System.Windows.Forms.TextBox()
+        Me.已入庫_ch = New System.Windows.Forms.CheckBox()
+        Me.未入庫_ch = New System.Windows.Forms.CheckBox()
         CType(Me.物料清單_dgv, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.Panel1.SuspendLayout()
         CType(Me.明細_dgv, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -285,8 +289,8 @@ Partial Class 倉儲入庫
         '
         '物料清單_dgv
         '
-        DataGridViewCellStyle1.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer))
-        Me.物料清單_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
+        DataGridViewCellStyle7.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer))
+        Me.物料清單_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle7
         Me.物料清單_dgv.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
             Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
         Me.物料清單_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
@@ -295,9 +299,9 @@ Partial Class 倉儲入庫
         Me.物料清單_dgv.Location = New System.Drawing.Point(1, 79)
         Me.物料清單_dgv.Name = "物料清單_dgv"
         Me.物料清單_dgv.RowHeadersWidth = 5
-        DataGridViewCellStyle2.Font = New System.Drawing.Font("微軟正黑體", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
-        DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.物料清單_dgv.RowsDefaultCellStyle = DataGridViewCellStyle2
+        DataGridViewCellStyle8.Font = New System.Drawing.Font("微軟正黑體", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
+        DataGridViewCellStyle8.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.物料清單_dgv.RowsDefaultCellStyle = DataGridViewCellStyle8
         Me.物料清單_dgv.RowTemplate.Height = 24
         Me.物料清單_dgv.Size = New System.Drawing.Size(406, 317)
         Me.物料清單_dgv.TabIndex = 1549
@@ -401,41 +405,41 @@ Partial Class 倉儲入庫
         '
         '明細_dgv
         '
-        DataGridViewCellStyle3.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer))
-        Me.明細_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle3
+        DataGridViewCellStyle9.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer))
+        Me.明細_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle9
         Me.明細_dgv.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
             Or System.Windows.Forms.AnchorStyles.Left) _
             Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
         Me.明細_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
         Me.明細_dgv.BackgroundColor = System.Drawing.Color.White
         Me.明細_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
-        Me.明細_dgv.Location = New System.Drawing.Point(573, 57)
+        Me.明細_dgv.Location = New System.Drawing.Point(636, 57)
         Me.明細_dgv.Name = "明細_dgv"
         Me.明細_dgv.RowHeadersWidth = 5
-        DataGridViewCellStyle4.Font = New System.Drawing.Font("微軟正黑體", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
-        DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.明細_dgv.RowsDefaultCellStyle = DataGridViewCellStyle4
+        DataGridViewCellStyle10.Font = New System.Drawing.Font("微軟正黑體", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
+        DataGridViewCellStyle10.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.明細_dgv.RowsDefaultCellStyle = DataGridViewCellStyle10
         Me.明細_dgv.RowTemplate.Height = 24
-        Me.明細_dgv.Size = New System.Drawing.Size(922, 599)
+        Me.明細_dgv.Size = New System.Drawing.Size(859, 599)
         Me.明細_dgv.TabIndex = 1573
         '
         '入庫單_dgv
         '
-        DataGridViewCellStyle5.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer))
-        Me.入庫單_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle5
+        DataGridViewCellStyle11.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer))
+        Me.入庫單_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle11
         Me.入庫單_dgv.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
             Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
         Me.入庫單_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
         Me.入庫單_dgv.BackgroundColor = System.Drawing.Color.White
         Me.入庫單_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
-        Me.入庫單_dgv.Location = New System.Drawing.Point(408, 21)
+        Me.入庫單_dgv.Location = New System.Drawing.Point(408, 43)
         Me.入庫單_dgv.Name = "入庫單_dgv"
         Me.入庫單_dgv.RowHeadersWidth = 5
-        DataGridViewCellStyle6.Font = New System.Drawing.Font("微軟正黑體", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
-        DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.入庫單_dgv.RowsDefaultCellStyle = DataGridViewCellStyle6
+        DataGridViewCellStyle12.Font = New System.Drawing.Font("微軟正黑體", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
+        DataGridViewCellStyle12.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
+        Me.入庫單_dgv.RowsDefaultCellStyle = DataGridViewCellStyle12
         Me.入庫單_dgv.RowTemplate.Height = 24
-        Me.入庫單_dgv.Size = New System.Drawing.Size(163, 635)
+        Me.入庫單_dgv.Size = New System.Drawing.Size(227, 613)
         Me.入庫單_dgv.TabIndex = 1574
         '
         'Label1
@@ -450,7 +454,7 @@ Partial Class 倉儲入庫
         '
         '單據編號_bt
         '
-        Me.單據編號_bt.Location = New System.Drawing.Point(634, 2)
+        Me.單據編號_bt.Location = New System.Drawing.Point(694, 2)
         Me.單據編號_bt.Name = "單據編號_bt"
         Me.單據編號_bt.ReadOnly = True
         Me.單據編號_bt.Size = New System.Drawing.Size(156, 23)
@@ -460,7 +464,7 @@ Partial Class 倉儲入庫
         '
         Me.Label2.AutoSize = True
         Me.Label2.ImeMode = System.Windows.Forms.ImeMode.NoControl
-        Me.Label2.Location = New System.Drawing.Point(577, 6)
+        Me.Label2.Location = New System.Drawing.Point(637, 6)
         Me.Label2.Name = "Label2"
         Me.Label2.Size = New System.Drawing.Size(55, 16)
         Me.Label2.TabIndex = 1581
@@ -474,7 +478,7 @@ Partial Class 倉儲入庫
         '單項_rb
         '
         Me.單項_rb.AutoSize = True
-        Me.單項_rb.Location = New System.Drawing.Point(1063, 3)
+        Me.單項_rb.Location = New System.Drawing.Point(1170, 3)
         Me.單項_rb.Name = "單項_rb"
         Me.單項_rb.Size = New System.Drawing.Size(73, 20)
         Me.單項_rb.TabIndex = 1583
@@ -485,7 +489,7 @@ Partial Class 倉儲入庫
         '整張_rb
         '
         Me.整張_rb.AutoSize = True
-        Me.整張_rb.Location = New System.Drawing.Point(1063, 27)
+        Me.整張_rb.Location = New System.Drawing.Point(1170, 27)
         Me.整張_rb.Name = "整張_rb"
         Me.整張_rb.Size = New System.Drawing.Size(73, 20)
         Me.整張_rb.TabIndex = 1584
@@ -497,15 +501,16 @@ Partial Class 倉儲入庫
         '
         Me.Label3.AutoSize = True
         Me.Label3.ImeMode = System.Windows.Forms.ImeMode.NoControl
-        Me.Label3.Location = New System.Drawing.Point(577, 31)
+        Me.Label3.Location = New System.Drawing.Point(637, 31)
         Me.Label3.Name = "Label3"
         Me.Label3.Size = New System.Drawing.Size(55, 16)
         Me.Label3.TabIndex = 1586
-        Me.Label3.Text = "項        次"
+        Me.Label3.Text = "紙張單號"
         '
         '項次_tb
         '
-        Me.項次_tb.Location = New System.Drawing.Point(634, 27)
+        Me.項次_tb.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.項次_tb.Location = New System.Drawing.Point(1444, 31)
         Me.項次_tb.Name = "項次_tb"
         Me.項次_tb.ReadOnly = True
         Me.項次_tb.Size = New System.Drawing.Size(51, 23)
@@ -626,7 +631,7 @@ Partial Class 倉儲入庫
         Me.列印_bt.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
         Me.列印_bt.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer))
         Me.列印_bt.ImeMode = System.Windows.Forms.ImeMode.NoControl
-        Me.列印_bt.Location = New System.Drawing.Point(1139, 1)
+        Me.列印_bt.Location = New System.Drawing.Point(1246, 1)
         Me.列印_bt.Name = "列印_bt"
         Me.列印_bt.Size = New System.Drawing.Size(50, 50)
         Me.列印_bt.TabIndex = 1582
@@ -638,7 +643,7 @@ Partial Class 倉儲入庫
         Me.確認入庫_bt.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
         Me.確認入庫_bt.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer))
         Me.確認入庫_bt.ImeMode = System.Windows.Forms.ImeMode.NoControl
-        Me.確認入庫_bt.Location = New System.Drawing.Point(933, 1)
+        Me.確認入庫_bt.Location = New System.Drawing.Point(1040, 1)
         Me.確認入庫_bt.Name = "確認入庫_bt"
         Me.確認入庫_bt.Size = New System.Drawing.Size(100, 50)
         Me.確認入庫_bt.TabIndex = 1579
@@ -650,7 +655,7 @@ Partial Class 倉儲入庫
         Me.去除_bt.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
         Me.去除_bt.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer))
         Me.去除_bt.ImeMode = System.Windows.Forms.ImeMode.NoControl
-        Me.去除_bt.Location = New System.Drawing.Point(841, 1)
+        Me.去除_bt.Location = New System.Drawing.Point(952, 1)
         Me.去除_bt.Name = "去除_bt"
         Me.去除_bt.Size = New System.Drawing.Size(50, 50)
         Me.去除_bt.TabIndex = 1578
@@ -662,7 +667,7 @@ Partial Class 倉儲入庫
         Me.存檔_bt.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
         Me.存檔_bt.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer))
         Me.存檔_bt.ImeMode = System.Windows.Forms.ImeMode.NoControl
-        Me.存檔_bt.Location = New System.Drawing.Point(791, 1)
+        Me.存檔_bt.Location = New System.Drawing.Point(902, 1)
         Me.存檔_bt.Name = "存檔_bt"
         Me.存檔_bt.Size = New System.Drawing.Size(50, 50)
         Me.存檔_bt.TabIndex = 1577
@@ -717,12 +722,56 @@ Partial Class 倉儲入庫
         Me.物料圖_pb.TabIndex = 1559
         Me.物料圖_pb.TabStop = False
         '
+        '新增_bt
+        '
+        Me.新增_bt.BackgroundImage = Global.ZJ_ERP_SYS.My.Resources.Resources.add_2
+        Me.新增_bt.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
+        Me.新增_bt.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer))
+        Me.新增_bt.ImeMode = System.Windows.Forms.ImeMode.NoControl
+        Me.新增_bt.Location = New System.Drawing.Point(851, 1)
+        Me.新增_bt.Name = "新增_bt"
+        Me.新增_bt.Size = New System.Drawing.Size(50, 50)
+        Me.新增_bt.TabIndex = 1588
+        Me.新增_bt.UseVisualStyleBackColor = True
+        '
+        '紙號_tb
+        '
+        Me.紙號_tb.Location = New System.Drawing.Point(694, 28)
+        Me.紙號_tb.Name = "紙號_tb"
+        Me.紙號_tb.Size = New System.Drawing.Size(156, 23)
+        Me.紙號_tb.TabIndex = 1589
+        '
+        '已入庫_ch
+        '
+        Me.已入庫_ch.AutoSize = True
+        Me.已入庫_ch.Location = New System.Drawing.Point(516, 22)
+        Me.已入庫_ch.Name = "已入庫_ch"
+        Me.已入庫_ch.Size = New System.Drawing.Size(62, 20)
+        Me.已入庫_ch.TabIndex = 1590
+        Me.已入庫_ch.Text = "已入庫"
+        Me.已入庫_ch.UseVisualStyleBackColor = True
+        '
+        '未入庫_ch
+        '
+        Me.未入庫_ch.AutoSize = True
+        Me.未入庫_ch.Checked = True
+        Me.未入庫_ch.CheckState = System.Windows.Forms.CheckState.Checked
+        Me.未入庫_ch.Location = New System.Drawing.Point(448, 22)
+        Me.未入庫_ch.Name = "未入庫_ch"
+        Me.未入庫_ch.Size = New System.Drawing.Size(62, 20)
+        Me.未入庫_ch.TabIndex = 1591
+        Me.未入庫_ch.Text = "未入庫"
+        Me.未入庫_ch.UseVisualStyleBackColor = True
+        '
         '倉儲入庫
         '
         Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!)
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
         Me.ClientSize = New System.Drawing.Size(1500, 657)
-        Me.Controls.Add(Me.Label3)
+        Me.Controls.Add(Me.未入庫_ch)
+        Me.Controls.Add(Me.已入庫_ch)
+        Me.Controls.Add(Me.紙號_tb)
+        Me.Controls.Add(Me.新增_bt)
         Me.Controls.Add(Me.項次_tb)
         Me.Controls.Add(Me.整張_rb)
         Me.Controls.Add(Me.單項_rb)
@@ -742,7 +791,6 @@ Partial Class 倉儲入庫
         Me.Controls.Add(Me.清空_bt)
         Me.Controls.Add(Me.供應商_cb)
         Me.Controls.Add(Me.供應商編碼_cb)
-        Me.Controls.Add(Me.Label16)
         Me.Controls.Add(Me.最大庫存量_tb)
         Me.Controls.Add(Me.品名_tb)
         Me.Controls.Add(Me.庫存量_tb)
@@ -761,6 +809,8 @@ Partial Class 倉儲入庫
         Me.Controls.Add(Me.物料清單_dgv)
         Me.Controls.Add(Me.Label1)
         Me.Controls.Add(Me.Panel4)
+        Me.Controls.Add(Me.Label3)
+        Me.Controls.Add(Me.Label16)
         Me.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
         Me.Margin = New System.Windows.Forms.Padding(4)
         Me.Name = "倉儲入庫"
@@ -838,4 +888,8 @@ Partial Class 倉儲入庫
     Friend WithEvents Label7 As Label
     Friend WithEvents 料號1_tb As TextBox
     Friend WithEvents PrintDocument1 As Printing.PrintDocument
+    Friend WithEvents 新增_bt As Button
+    Friend WithEvents 紙號_tb As TextBox
+    Friend WithEvents 已入庫_ch As CheckBox
+    Friend WithEvents 未入庫_ch As CheckBox
 End Class

ZJ-ERP-SYS/04、倉儲系統/倉儲入庫.vb

@@ -30,10 +30,16 @@ Public Class 倉儲入庫
         Dim ds As New DataSet : 入庫單_dgv.DataSource = Nothing : ds.Clear()
         入庫單_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
         入庫單_dgv.ColumnHeadersHeight = 40 : 入庫單_dgv.AllowUserToAddRows = False : 入庫單_dgv.RowTemplate.Height = 25
-        SQL_倉儲入庫清單()
+        If 未入庫_ch.Checked = True Then : SQL_倉儲入庫清單("LIKE") : Else : SQL_倉儲入庫清單("NOT LIKE") : End If
         da.Fill(ds) : 入庫單_dgv.DataSource = ds.Tables(0) : conn.Close()
         入庫單_dgv.Columns(0).ReadOnly = True
     End Sub
+    Private Sub 未入庫_ch_CheckedChanged(sender As Object, e As EventArgs) Handles 未入庫_ch.Click
+        未入庫_ch.Checked = True : 已入庫_ch.Checked = False : 明細_dgv.DataSource = Nothing : Set_清單1()
+    End Sub
+    Private Sub 已入庫_ch_CheckedChanged(sender As Object, e As EventArgs) Handles 已入庫_ch.Click
+        未入庫_ch.Checked = False : 已入庫_ch.Checked = True : 明細_dgv.DataSource = Nothing : Set_清單1()
+    End Sub
     Private Sub Set_清單2()
         Dim ds As New DataSet : 明細_dgv.DataSource = Nothing : ds.Clear()
         明細_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
@@ -72,7 +78,7 @@ Public Class 倉儲入庫
         While (dr.Read()) : 指定倉庫_cb.Items.Add(dr("倉名")) : End While : conn.Close()
         If 指定倉庫_cb.Items.Count = 0 Then
             SQL_倉名_下拉清單() : While (dr.Read()) : 指定倉庫_cb.Items.Add(dr("倉名")) : End While : conn.Close()
-        End If
+        End If : 指定倉庫_cb.SelectedIndex = 0
     End Sub
     Private Sub 訂製狀態_cb_下拉表單資料載入()
         SQL_訂製狀態_下拉清單() : 訂製狀態_cb.Items.Clear() : 訂製編碼_cb.Items.Clear() : 訂製狀態_cb.Items.Add("") : 訂製編碼_cb.Items.Add("")
@@ -108,30 +114,22 @@ Public Class 倉儲入庫
         End If
     End Sub
     Private Sub 入庫單_dgv_CellClick(ByVal sender As System.Object, ByVal e As DataGridViewCellEventArgs) Handles 入庫單_dgv.CellClick
-        If e.RowIndex = -1 Then
-        Else
-            單據編號_bt.Text = 入庫單_dgv("入庫單號", e.RowIndex).Value.ToString
+        If e.RowIndex = -1 Then : Else
+            單據編號_bt.Text = 入庫單_dgv("入庫單號", e.RowIndex).Value.ToString : 紙號_tb.Text = 入庫單_dgv("單據單號", e.RowIndex).Value.ToString
             NUM = -1 : 項次_tb.Text = "" : 流水號_tb.Text = "" : Set_清單2()
         End If
     End Sub
     Private Sub 明細_dgv_CellClick(ByVal sender As System.Object, ByVal e As DataGridViewCellEventArgs) Handles 明細_dgv.CellClick
-        If e.RowIndex = -1 Then
-
-        Else
-            項次_tb.Text = 明細_dgv("項", e.RowIndex).Value.ToString
-            流水號_tb.Text = 明細_dgv("資料流水號", e.RowIndex).Value.ToString
+        If e.RowIndex = -1 Then : Else
+            項次_tb.Text = 明細_dgv("項", e.RowIndex).Value.ToString : 流水號_tb.Text = 明細_dgv("資料流水號", e.RowIndex).Value.ToString
             NUM = e.RowIndex
         End If
     End Sub
     Private Sub 地區_cb_SelectedIndexChanged(sender As Object, e As EventArgs) Handles 地區_cb.SelectedIndexChanged
         地區編碼_cb.SelectedIndex = 地區_cb.SelectedIndex
-        If 地區_cb.Text = "" And 查詢_tb.Text = "" Then
-            供應商_cb.Items.Clear() : 供應商編碼_cb.Items.Clear() : Set_清單()
-        ElseIf 地區_cb.Text = "" Then
-            查詢_tb.Text = "" : 供應商_cb.Items.Clear() : 供應商編碼_cb.Items.Clear()
-        ElseIf 地區_cb.Text <> "" Then
-            查詢_tb.Text = "" : 供應商_下拉表單資料載入()
-        End If
+        If 地區_cb.Text = "" And 查詢_tb.Text = "" Then : 供應商_cb.Items.Clear() : 供應商編碼_cb.Items.Clear() : Set_清單()
+        ElseIf 地區_cb.Text = "" Then : 查詢_tb.Text = "" : 供應商_cb.Items.Clear() : 供應商編碼_cb.Items.Clear()
+        ElseIf 地區_cb.Text <> "" Then : 查詢_tb.Text = "" : 供應商_下拉表單資料載入() : End If
     End Sub
     Private Sub 地區編碼_cb_SelectedIndexChanged(sender As Object, e As EventArgs) Handles 地區編碼_cb.SelectedIndexChanged
         地區_cb.SelectedIndex = 地區編碼_cb.SelectedIndex
@@ -163,13 +161,15 @@ Public Class 倉儲入庫
     Private Sub 儲態編號_cb_SelectedIndexChanged(sender As Object, e As EventArgs) Handles 儲態編號_cb.SelectedIndexChanged
         倉儲狀態_cb.SelectedIndex = 儲態編號_cb.SelectedIndex
     End Sub
-
     Private Sub 查詢_bt_Click(sender As Object, e As EventArgs) Handles 查詢_bt.Click
-        查詢_tb.Text = InputBox("查詢的物料關鍵關鍵字!!")
+        查詢_tb.Text = InputBox("查詢的物料關鍵關鍵字!!") : Set_清單()
     End Sub
     Private Sub Set_日期格式轉換()
         DTP = Strings.Format(Today(), "yyyy/MM/dd") : DTP1 = Strings.Format(Today(), "yyyyMMdd")
     End Sub
+    Private Sub 新增_bt_Click(sender As Object, e As EventArgs) Handles 新增_bt.Click
+        單據編號_bt.Text = ""
+    End Sub
     Private Sub 加入單據_bt_Click(sender As Object, e As EventArgs) Handles 加入單據_bt.Click
         If 料號_tb.Text = "" Then : MsgBox("請先選擇要加入的物料!!") : Else
             If 指定倉庫_cb.Text = "" Then : MsgBox("庫存區域未指定!!") : Else
@@ -197,64 +197,45 @@ Public Class 倉儲入庫
                 ElseIf EDR > 999999 And EDR < 1000000 Then : ESTR = "WH" & "00" & EDR
                 ElseIf EDR > 9999999 And EDR < 10000000 Then : ESTR = "WH" & "0" & EDR
                 ElseIf EDR > 99999999 Then : ESTR = "WH" & EDR : End If
-
                 Set_日期格式轉換()
-
-                Dim 倉級 As String = ""
-                Dim 倉編 As String = ""
+                Dim 倉級 As String = "" : Dim 倉編 As String = ""
                 SQL_倉儲分區查詢(指定倉庫_cb.Text)
-                If dr.Read() Then
-                    倉級 = dr("倉級")
-                    倉編 = dr("倉名編號")
-                End If : conn.Close()
+                If dr.Read() Then : 倉級 = dr("倉級") : 倉編 = dr("倉名編號") : End If : conn.Close()
                 SQL_倉儲明細表_倉儲入庫(ESTR, 單據編號_bt.Text, 倉級, 倉編, 料號_tb.Text, 數量, "0", "", "採購入庫", "", gUserName, DTP, "", "", "", "",
                                儲態編號_cb.Text, 訂製編碼_cb.Text, "", "") : conn.Close()
                 Set_清單1() : Set_清單2()
             End If
         End If
     End Sub
-
     Private Sub 存檔_bt_Click(sender As Object, e As EventArgs) Handles 存檔_bt.Click
-        If 單據編號_bt.Text = "" Then
-            MsgBox("沒有選擇要儲存的單號")
-        Else
+        If 單據編號_bt.Text = "" Then : MsgBox("沒有選擇要儲存的單號") : Else
+            SQL_倉儲控制_存檔(單據編號_bt.Text, 紙號_tb.Text)
             For i As Integer = 0 To 明細_dgv.Rows.Count - 1
                 Dim 入庫 As String = 明細_dgv.Rows(i).Cells("入庫").Value.ToString()
                 Dim 備註 As String = 明細_dgv.Rows(i).Cells("備註").Value.ToString()
                 Dim 流水號 As String = 明細_dgv.Rows(i).Cells("資料流水號").Value.ToString()
                 Dim 產品編號 As String = 明細_dgv.Rows(i).Cells("產品編號").Value.ToString()
                 SQL_倉儲明細表_存檔(流水號, 備註, 產品編號, 入庫)
-            Next
-            conn.Close() : Set_清單2() : MessageBox.Show("儲存完成")
+            Next : conn.Close() : Set_清單1() : Set_清單2() : MessageBox.Show("儲存完成")
         End If
     End Sub
-
     Private Sub 去除_bt_Click(sender As Object, e As EventArgs) Handles 去除_bt.Click
-        If 單據編號_bt.Text = "" Then '--------------------設定條件讓流水號控件不為空
-            MsgBox("沒有選擇要刪除的單號")
-        Else
-            If 項次_tb.Text = "" Then
-                MsgBox("沒有選擇要列印的項次")
-            Else
+        If 單據編號_bt.Text = "" Then : MsgBox("沒有選擇要刪除的單號") : Else '--------------------設定條件讓流水號控件不為空
+            If 項次_tb.Text = "" Then : MsgBox("沒有選擇要列印的項次") : Else
                 Dim aa1 As MsgBoxResult = MsgBox("確定要執行刪除指令嗎?", MsgBoxStyle.OkCancel)
                 If aa1 = MsgBoxResult.Ok Then
-
                     SQL_倉儲明細表_單項刪除(流水號_tb.Text)
                     項次_tb.Text = "" : 流水號_tb.Text = "" : Set_清單1() : Set_清單2()
                     If 明細_dgv.Rows.Count < 1 Then
                         SQL_倉儲明細表_刪除(單據編號_bt.Text) : SQL_倉儲明細執行單號_刪除(單據編號_bt.Text)
                         單據編號_bt.Text = "" : Set_清單1()
-                    End If
-                    conn.Close()
+                    End If : conn.Close()
                 End If
             End If
         End If
     End Sub
-
     Private Sub 確認入庫_bt_Click(sender As Object, e As EventArgs) Handles 確認入庫_bt.Click
-        If 單據編號_bt.Text = "" Then
-            MsgBox("沒有選擇要入庫的單號")
-        Else
+        If 單據編號_bt.Text = "" Then : MsgBox("沒有選擇要入庫的單號") : Else
             For i As Integer = 0 To 明細_dgv.Rows.Count - 1
                 Dim 入庫 As String = 明細_dgv.Rows(i).Cells("入庫").Value.ToString()
                 Dim 流水號 As String = 明細_dgv.Rows(i).Cells("資料流水號").Value.ToString()
@@ -269,16 +250,58 @@ Public Class 倉儲入庫
         End If
     End Sub
     Private Sub Button1_Click(sender As Object, e As EventArgs) Handles 列印_bt.Click
-
-        If 單項_rb.Checked = False AndAlso 整張_rb.Checked = False Then
-            MsgBox("沒有選擇要列印的模式")
-        Else
-            If 單據編號_bt.Text = "" Then
-                MsgBox("沒有選擇要列印的單號")
+        PrintDocument1.DefaultPageSettings.Landscape = True : Dim printDialog As New PrintDialog() : printDialog.Document = PrintDocument1
+        If printDialog.ShowDialog() = DialogResult.OK Then
+            If 單項_rb.Checked = False AndAlso 整張_rb.Checked = False Then : MsgBox("沒有選擇要列印的模式")
             Else
-                If 單項_rb.Checked = True AndAlso 整張_rb.Checked = False Then
-                    If 項次_tb.Text = "" Then
-                        MsgBox("沒有選擇要列印的項次")
+                If 單據編號_bt.Text = "" Then : MsgBox("沒有選擇要列印的單號") : Else
+                    If 單項_rb.Checked = True AndAlso 整張_rb.Checked = False Then
+                        If 項次_tb.Text = "" Then : MsgBox("沒有選擇要列印的項次") : Else
+                            For i As Integer = 0 To 明細_dgv.Rows.Count - 1
+                                Dim 入庫 As String = 明細_dgv.Rows(i).Cells("入庫").Value.ToString()
+                                Dim 備註 As String = 明細_dgv.Rows(i).Cells("備註").Value.ToString()
+                                Dim 流水號 As String = 明細_dgv.Rows(i).Cells("資料流水號").Value.ToString()
+                                Dim 產品編號 As String = 明細_dgv.Rows(i).Cells("產品編號").Value.ToString()
+                                SQL_倉儲明細表_存檔(流水號, 備註, 產品編號, 入庫)
+                            Next
+                            列印確認.品名_lb.Text = 明細_dgv("品名", NUM).Value.ToString
+                            列印確認.單張_rb.Checked = False : 列印確認.數量_rb.Checked = False : 列印確認.自訂_rb.Checked = False
+                            列印確認.數量_NUD.Value = 1
+                            列印確認.ShowDialog()
+
+                            If 列印確認.列印確認通過 Then
+                                ' 確認列印，開始執行後續程式碼
+                                Dim printCount As Integer = 1
+                                If 列印確認.單張_rb.Checked = True Then
+                                    printCount = 1 ' 單張
+                                ElseIf 列印確認.數量_rb.Checked = True Then
+                                    printCount = CInt(明細_dgv("入庫", NUM).Value) ' 根據表格的入庫數量
+                                ElseIf 列印確認.自訂_rb.Checked = True Then
+                                    printCount = CInt(列印確認.數量_NUD.Value) ' 自訂數量
+                                End If
+                                Dim 品名 As String = 明細_dgv("品名", NUM).Value.ToString()
+                                Dim 流水 As String = 明細_dgv("資料流水號", NUM).Value.ToString()
+                                Dim 料號 As String = 明細_dgv("料號", NUM).Value.ToString()
+                                Dim 倉名 As String = 明細_dgv("倉名編號", NUM).Value.ToString()
+                                Dim 訂製 As String = 明細_dgv("訂製狀態", NUM).Value.ToString()
+                                Dim 物料 As String = 明細_dgv("物料狀態", NUM).Value.ToString()
+                                Dim 產號 As String = 明細_dgv("產品編號", NUM).Value.ToString()
+                                Dim QR As String = 料號 & "," & 倉名 & "," & 訂製 & "," & 物料 & "," & 產號
+                                QRCode2_pb.Image = Nothing
+                                QRCode2_pb.Image = New Bitmap(QRCode2_pb.Width, QRCode2_pb.Height)
+                                Dim GP2 As Graphics = Graphics.FromImage(QRCode2_pb.Image)
+                                QRCODE.Type = DotNetBarcode.Types.QRCode : QRCODE.QRQuitZone = 0 : QRCODE.QRWriteBar(QR, 0, 0, 4.5, GP2)
+                                QRCode2_pb.SizeMode = 4
+                                QR品名.Text = 品名
+                                入庫.Text = Strings.Format(Today(), "yyyy/MM/dd")
+                                批號.Text = 流水
+                                Set_列印(printCount)
+
+                                MsgBox("列印完成")
+                            Else
+                                MsgBox("列印已取消")
+                            End If
+                        End If
                     Else
                         For i As Integer = 0 To 明細_dgv.Rows.Count - 1
                             Dim 入庫 As String = 明細_dgv.Rows(i).Cells("入庫").Value.ToString()
@@ -287,97 +310,49 @@ Public Class 倉儲入庫
                             Dim 產品編號 As String = 明細_dgv.Rows(i).Cells("產品編號").Value.ToString()
                             SQL_倉儲明細表_存檔(流水號, 備註, 產品編號, 入庫)
                         Next
-                        列印確認.品名_lb.Text = 明細_dgv("品名", NUM).Value.ToString
-                        列印確認.單張_rb.Checked = False : 列印確認.數量_rb.Checked = False : 列印確認.自訂_rb.Checked = False
-                        列印確認.數量_NUD.Value = 1
-                        列印確認.ShowDialog()
+                        For i As Integer = 0 To 明細_dgv.Rows.Count - 1
+                            列印確認.品名_lb.Text = 明細_dgv("品名", i).Value.ToString
+                            列印確認.單張_rb.Checked = False : 列印確認.數量_rb.Checked = False : 列印確認.自訂_rb.Checked = False
+                            列印確認.數量_NUD.Value = 1
+                            列印確認.ShowDialog()
 
-                        If 列印確認.列印確認通過 Then
-                            ' 確認列印，開始執行後續程式碼
-                            Dim printCount As Integer = 1
-                            If 列印確認.單張_rb.Checked = True Then
-                                printCount = 1 ' 單張
-                            ElseIf 列印確認.數量_rb.Checked = True Then
-                                printCount = CInt(明細_dgv("入庫", NUM).Value) ' 根據表格的入庫數量
-                            ElseIf 列印確認.自訂_rb.Checked = True Then
-                                printCount = CInt(列印確認.數量_NUD.Value) ' 自訂數量
+                            If 列印確認.列印確認通過 Then
+                                ' 確認列印，開始執行後續程式碼
+                                Dim printCount As Integer = 1
+                                If 列印確認.單張_rb.Checked = True Then
+                                    printCount = 1 ' 單張
+                                ElseIf 列印確認.數量_rb.Checked = True Then
+                                    printCount = CInt(明細_dgv("入庫", i).Value) ' 根據表格的入庫數量
+                                ElseIf 列印確認.自訂_rb.Checked = True Then
+                                    printCount = CInt(列印確認.數量_NUD.Value) ' 自訂數量
+                                End If
+                                Dim 品名 As String = 明細_dgv("品名", i).Value.ToString()
+                                Dim 流水 As String = 明細_dgv("資料流水號", i).Value.ToString()
+                                Dim 料號 As String = 明細_dgv("料號", i).Value.ToString()
+                                Dim 倉名 As String = 明細_dgv("倉名編號", i).Value.ToString()
+                                Dim 訂製 As String = 明細_dgv("訂製狀態", i).Value.ToString()
+                                Dim 物料 As String = 明細_dgv("物料狀態", i).Value.ToString()
+                                Dim 產號 As String = 明細_dgv("產品編號", i).Value.ToString()
+                                Dim QR As String = 料號 & "," & 倉名 & "," & 訂製 & "," & 物料 & "," & 產號
+                                QRCode2_pb.Image = Nothing
+                                QRCode2_pb.Image = New Bitmap(QRCode2_pb.Width, QRCode2_pb.Height)
+                                Dim GP2 As Graphics = Graphics.FromImage(QRCode2_pb.Image)
+                                QRCODE.Type = DotNetBarcode.Types.QRCode : QRCODE.QRQuitZone = 0 : QRCODE.QRWriteBar(QR, 0, 0, 4.5, GP2)
+                                QRCode2_pb.SizeMode = 4
+                                QR品名.Text = 品名
+                                入庫.Text = Strings.Format(Today(), "yyyy/MM/dd")
+                                批號.Text = 流水
+                                Set_列印(printCount)
+                            Else
+                                MsgBox(明細_dgv("品名", i).Value.ToString & "列印已取消")
                             End If
-                            Dim 品名 As String = 明細_dgv("品名", NUM).Value.ToString()
-                            Dim 流水 As String = 明細_dgv("資料流水號", NUM).Value.ToString()
-                            Dim 料號 As String = 明細_dgv("料號", NUM).Value.ToString()
-                            Dim 倉名 As String = 明細_dgv("倉名編號", NUM).Value.ToString()
-                            Dim 訂製 As String = 明細_dgv("訂製狀態", NUM).Value.ToString()
-                            Dim 物料 As String = 明細_dgv("物料狀態", NUM).Value.ToString()
-                            Dim 產號 As String = 明細_dgv("產品編號", NUM).Value.ToString()
-                            Dim QR As String = 料號 & "," & 倉名 & "," & 訂製 & "," & 物料 & "," & 產號
-                            QRCode2_pb.Image = Nothing
-                            QRCode2_pb.Image = New Bitmap(QRCode2_pb.Width, QRCode2_pb.Height)
-                            Dim GP2 As Graphics = Graphics.FromImage(QRCode2_pb.Image)
-                            QRCODE.Type = DotNetBarcode.Types.QRCode : QRCODE.QRQuitZone = 0 : QRCODE.QRWriteBar(QR, 0, 0, 4.5, GP2)
-                            QRCode2_pb.SizeMode = 4
-                            QR品名.Text = 品名
-                            入庫.Text = Strings.Format(Today(), "yyyy/MM/dd")
-                            批號.Text = 流水
-                            'Set_列印(printCount)
-
-                            MsgBox("列印完成")
-                        Else
-                            MsgBox("列印已取消")
-                        End If
+                        Next
                     End If
-                Else
-                    For i As Integer = 0 To 明細_dgv.Rows.Count - 1
-                        Dim 入庫 As String = 明細_dgv.Rows(i).Cells("入庫").Value.ToString()
-                        Dim 備註 As String = 明細_dgv.Rows(i).Cells("備註").Value.ToString()
-                        Dim 流水號 As String = 明細_dgv.Rows(i).Cells("資料流水號").Value.ToString()
-                        Dim 產品編號 As String = 明細_dgv.Rows(i).Cells("產品編號").Value.ToString()
-                        SQL_倉儲明細表_存檔(流水號, 備註, 產品編號, 入庫)
-                    Next
-                    For i As Integer = 0 To 明細_dgv.Rows.Count - 1
-                        列印確認.品名_lb.Text = 明細_dgv("品名", i).Value.ToString
-                        列印確認.單張_rb.Checked = False : 列印確認.數量_rb.Checked = False : 列印確認.自訂_rb.Checked = False
-                        列印確認.數量_NUD.Value = 1
-                        列印確認.ShowDialog()
-
-                        If 列印確認.列印確認通過 Then
-                            ' 確認列印，開始執行後續程式碼
-                            Dim printCount As Integer = 1
-                            If 列印確認.單張_rb.Checked = True Then
-                                printCount = 1 ' 單張
-                            ElseIf 列印確認.數量_rb.Checked = True Then
-                                printCount = CInt(明細_dgv("入庫", i).Value) ' 根據表格的入庫數量
-                            ElseIf 列印確認.自訂_rb.Checked = True Then
-                                printCount = CInt(列印確認.數量_NUD.Value) ' 自訂數量
-                            End If
-                            Dim 品名 As String = 明細_dgv("品名", i).Value.ToString()
-                            Dim 流水 As String = 明細_dgv("資料流水號", i).Value.ToString()
-                            Dim 料號 As String = 明細_dgv("料號", i).Value.ToString()
-                            Dim 倉名 As String = 明細_dgv("倉名編號", i).Value.ToString()
-                            Dim 訂製 As String = 明細_dgv("訂製狀態", i).Value.ToString()
-                            Dim 物料 As String = 明細_dgv("物料狀態", i).Value.ToString()
-                            Dim 產號 As String = 明細_dgv("產品編號", i).Value.ToString()
-                            Dim QR As String = 料號 & "," & 倉名 & "," & 訂製 & "," & 物料 & "," & 產號
-                            QRCode2_pb.Image = Nothing
-                            QRCode2_pb.Image = New Bitmap(QRCode2_pb.Width, QRCode2_pb.Height)
-                            Dim GP2 As Graphics = Graphics.FromImage(QRCode2_pb.Image)
-                            QRCODE.Type = DotNetBarcode.Types.QRCode : QRCODE.QRQuitZone = 0 : QRCODE.QRWriteBar(QR, 0, 0, 4.5, GP2)
-                            QRCode2_pb.SizeMode = 4
-                            QR品名.Text = 品名
-                            入庫.Text = Strings.Format(Today(), "yyyy/MM/dd")
-                            批號.Text = 流水
-                            Set_列印(printCount)
-                        Else
-                            MsgBox(明細_dgv("品名", i).Value.ToString & "列印已取消")
-                        End If
-                    Next
                 End If
             End If
         End If
-
     End Sub
-
     Private Sub Set_列印(ByVal printCount As Integer)
-
         PrintDocument1.DefaultPageSettings.Landscape = False ' 設定為直向 (Portrait)
         PrintDocument1.DefaultPageSettings.Margins = New Printing.Margins(0, 0, 0, 0) ' 邊界設定為 0
         For i As Integer = 1 To printCount
@@ -410,6 +385,4 @@ Public Class 倉儲入庫
     Private Sub 確認入庫_bt_MouseEnter(sender As Object, e As EventArgs) Handles 確認入庫_bt.MouseEnter
         ToolTip1.SetToolTip(Me.確認入庫_bt, "確認入庫")
     End Sub
-
-
 End Class

ZJ-ERP-SYS/04、倉儲系統/倉儲出庫.Designer.vb

@@ -56,9 +56,8 @@ Partial Class 倉儲出庫
         Me.Label18 = New System.Windows.Forms.Label()
         Me.指定倉庫_cb = New System.Windows.Forms.ComboBox()
         Me.物料清單_dgv = New System.Windows.Forms.DataGridView()
-        Me.入庫單_dgv = New System.Windows.Forms.DataGridView()
+        Me.出庫單_dgv = New System.Windows.Forms.DataGridView()
         Me.Label1 = New System.Windows.Forms.Label()
-        Me.Label3 = New System.Windows.Forms.Label()
         Me.項次_tb = New System.Windows.Forms.TextBox()
         Me.Label2 = New System.Windows.Forms.Label()
         Me.單據編號_bt = New System.Windows.Forms.TextBox()
@@ -73,9 +72,13 @@ Partial Class 倉儲出庫
         Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components)
         Me.庫存量_lb = New System.Windows.Forms.Label()
         Me.掃描_bt = New System.Windows.Forms.Button()
+        Me.未出庫_ch = New System.Windows.Forms.CheckBox()
+        Me.已出庫_ch = New System.Windows.Forms.CheckBox()
+        Me.紙號_tb = New System.Windows.Forms.TextBox()
+        Me.Label3 = New System.Windows.Forms.Label()
         Me.Panel1.SuspendLayout()
         CType(Me.物料清單_dgv, System.ComponentModel.ISupportInitialize).BeginInit()
-        CType(Me.入庫單_dgv, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.出庫單_dgv, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.明細_dgv, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.物料圖_pb, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.SuspendLayout()
@@ -359,24 +362,24 @@ Partial Class 倉儲出庫
         Me.物料清單_dgv.Size = New System.Drawing.Size(406, 317)
         Me.物料清單_dgv.TabIndex = 1577
         '
-        '入庫單_dgv
+        '出庫單_dgv
         '
         DataGridViewCellStyle3.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer))
-        Me.入庫單_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle3
-        Me.入庫單_dgv.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+        Me.出庫單_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle3
+        Me.出庫單_dgv.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
             Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
-        Me.入庫單_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
-        Me.入庫單_dgv.BackgroundColor = System.Drawing.Color.White
-        Me.入庫單_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
-        Me.入庫單_dgv.Location = New System.Drawing.Point(411, 20)
-        Me.入庫單_dgv.Name = "入庫單_dgv"
-        Me.入庫單_dgv.RowHeadersWidth = 5
+        Me.出庫單_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
+        Me.出庫單_dgv.BackgroundColor = System.Drawing.Color.White
+        Me.出庫單_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.出庫單_dgv.Location = New System.Drawing.Point(411, 47)
+        Me.出庫單_dgv.Name = "出庫單_dgv"
+        Me.出庫單_dgv.RowHeadersWidth = 5
         DataGridViewCellStyle4.Font = New System.Drawing.Font("微軟正黑體", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
         DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
-        Me.入庫單_dgv.RowsDefaultCellStyle = DataGridViewCellStyle4
-        Me.入庫單_dgv.RowTemplate.Height = 24
-        Me.入庫單_dgv.Size = New System.Drawing.Size(163, 635)
-        Me.入庫單_dgv.TabIndex = 1601
+        Me.出庫單_dgv.RowsDefaultCellStyle = DataGridViewCellStyle4
+        Me.出庫單_dgv.RowTemplate.Height = 24
+        Me.出庫單_dgv.Size = New System.Drawing.Size(267, 608)
+        Me.出庫單_dgv.TabIndex = 1601
         '
         'Label1
         '
@@ -388,19 +391,9 @@ Partial Class 倉儲出庫
         Me.Label1.Text = "出   庫   單   據"
         Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
         '
-        'Label3
-        '
-        Me.Label3.AutoSize = True
-        Me.Label3.ImeMode = System.Windows.Forms.ImeMode.NoControl
-        Me.Label3.Location = New System.Drawing.Point(579, 31)
-        Me.Label3.Name = "Label3"
-        Me.Label3.Size = New System.Drawing.Size(55, 16)
-        Me.Label3.TabIndex = 1610
-        Me.Label3.Text = "項        次"
-        '
         '項次_tb
         '
-        Me.項次_tb.Location = New System.Drawing.Point(636, 27)
+        Me.項次_tb.Location = New System.Drawing.Point(1003, 27)
         Me.項次_tb.Name = "項次_tb"
         Me.項次_tb.ReadOnly = True
         Me.項次_tb.Size = New System.Drawing.Size(51, 23)
@@ -411,7 +404,7 @@ Partial Class 倉儲出庫
         '
         Me.Label2.AutoSize = True
         Me.Label2.ImeMode = System.Windows.Forms.ImeMode.NoControl
-        Me.Label2.Location = New System.Drawing.Point(579, 6)
+        Me.Label2.Location = New System.Drawing.Point(684, 6)
         Me.Label2.Name = "Label2"
         Me.Label2.Size = New System.Drawing.Size(55, 16)
         Me.Label2.TabIndex = 1608
@@ -419,7 +412,7 @@ Partial Class 倉儲出庫
         '
         '單據編號_bt
         '
-        Me.單據編號_bt.Location = New System.Drawing.Point(636, 2)
+        Me.單據編號_bt.Location = New System.Drawing.Point(741, 2)
         Me.單據編號_bt.Name = "單據編號_bt"
         Me.單據編號_bt.ReadOnly = True
         Me.單據編號_bt.Size = New System.Drawing.Size(156, 23)
@@ -435,14 +428,14 @@ Partial Class 倉儲出庫
         Me.明細_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
         Me.明細_dgv.BackgroundColor = System.Drawing.Color.White
         Me.明細_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
-        Me.明細_dgv.Location = New System.Drawing.Point(575, 53)
+        Me.明細_dgv.Location = New System.Drawing.Point(679, 53)
         Me.明細_dgv.Name = "明細_dgv"
         Me.明細_dgv.RowHeadersWidth = 5
         DataGridViewCellStyle6.Font = New System.Drawing.Font("微軟正黑體", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
         DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
         Me.明細_dgv.RowsDefaultCellStyle = DataGridViewCellStyle6
         Me.明細_dgv.RowTemplate.Height = 24
-        Me.明細_dgv.Size = New System.Drawing.Size(922, 603)
+        Me.明細_dgv.Size = New System.Drawing.Size(818, 603)
         Me.明細_dgv.TabIndex = 1603
         '
         '確認入庫_bt
@@ -451,7 +444,7 @@ Partial Class 倉儲出庫
         Me.確認入庫_bt.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
         Me.確認入庫_bt.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer))
         Me.確認入庫_bt.ImeMode = System.Windows.Forms.ImeMode.NoControl
-        Me.確認入庫_bt.Location = New System.Drawing.Point(928, 1)
+        Me.確認入庫_bt.Location = New System.Drawing.Point(1060, 1)
         Me.確認入庫_bt.Name = "確認入庫_bt"
         Me.確認入庫_bt.Size = New System.Drawing.Size(100, 50)
         Me.確認入庫_bt.TabIndex = 1606
@@ -463,7 +456,7 @@ Partial Class 倉儲出庫
         Me.去除_bt.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
         Me.去除_bt.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer))
         Me.去除_bt.ImeMode = System.Windows.Forms.ImeMode.NoControl
-        Me.去除_bt.Location = New System.Drawing.Point(843, 1)
+        Me.去除_bt.Location = New System.Drawing.Point(948, 1)
         Me.去除_bt.Name = "去除_bt"
         Me.去除_bt.Size = New System.Drawing.Size(50, 50)
         Me.去除_bt.TabIndex = 1605
@@ -475,7 +468,7 @@ Partial Class 倉儲出庫
         Me.存檔_bt.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
         Me.存檔_bt.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer))
         Me.存檔_bt.ImeMode = System.Windows.Forms.ImeMode.NoControl
-        Me.存檔_bt.Location = New System.Drawing.Point(793, 1)
+        Me.存檔_bt.Location = New System.Drawing.Point(898, 1)
         Me.存檔_bt.Name = "存檔_bt"
         Me.存檔_bt.Size = New System.Drawing.Size(50, 50)
         Me.存檔_bt.TabIndex = 1604
@@ -558,14 +551,56 @@ Partial Class 倉儲出庫
         Me.掃描_bt.Text = "掃描QRCODE沒反應請按此按鈕"
         Me.掃描_bt.UseVisualStyleBackColor = True
         '
+        '未出庫_ch
+        '
+        Me.未出庫_ch.AutoSize = True
+        Me.未出庫_ch.Checked = True
+        Me.未出庫_ch.CheckState = System.Windows.Forms.CheckState.Checked
+        Me.未出庫_ch.Location = New System.Drawing.Point(453, 24)
+        Me.未出庫_ch.Name = "未出庫_ch"
+        Me.未出庫_ch.Size = New System.Drawing.Size(62, 20)
+        Me.未出庫_ch.TabIndex = 1614
+        Me.未出庫_ch.Text = "未出庫"
+        Me.未出庫_ch.UseVisualStyleBackColor = True
+        '
+        '已出庫_ch
+        '
+        Me.已出庫_ch.AutoSize = True
+        Me.已出庫_ch.Location = New System.Drawing.Point(521, 24)
+        Me.已出庫_ch.Name = "已出庫_ch"
+        Me.已出庫_ch.Size = New System.Drawing.Size(62, 20)
+        Me.已出庫_ch.TabIndex = 1613
+        Me.已出庫_ch.Text = "已出庫"
+        Me.已出庫_ch.UseVisualStyleBackColor = True
+        '
+        '紙號_tb
+        '
+        Me.紙號_tb.Location = New System.Drawing.Point(741, 27)
+        Me.紙號_tb.Name = "紙號_tb"
+        Me.紙號_tb.Size = New System.Drawing.Size(156, 23)
+        Me.紙號_tb.TabIndex = 1616
+        '
+        'Label3
+        '
+        Me.Label3.AutoSize = True
+        Me.Label3.ImeMode = System.Windows.Forms.ImeMode.NoControl
+        Me.Label3.Location = New System.Drawing.Point(684, 30)
+        Me.Label3.Name = "Label3"
+        Me.Label3.Size = New System.Drawing.Size(55, 16)
+        Me.Label3.TabIndex = 1615
+        Me.Label3.Text = "紙張單號"
+        '
         '倉儲出庫
         '
         Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!)
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
         Me.ClientSize = New System.Drawing.Size(1500, 657)
+        Me.Controls.Add(Me.紙號_tb)
+        Me.Controls.Add(Me.Label3)
+        Me.Controls.Add(Me.未出庫_ch)
+        Me.Controls.Add(Me.已出庫_ch)
         Me.Controls.Add(Me.掃描_bt)
         Me.Controls.Add(Me.庫存量_lb)
-        Me.Controls.Add(Me.Label3)
         Me.Controls.Add(Me.項次_tb)
         Me.Controls.Add(Me.Label2)
         Me.Controls.Add(Me.單據編號_bt)
@@ -573,7 +608,7 @@ Partial Class 倉儲出庫
         Me.Controls.Add(Me.去除_bt)
         Me.Controls.Add(Me.存檔_bt)
         Me.Controls.Add(Me.明細_dgv)
-        Me.Controls.Add(Me.入庫單_dgv)
+        Me.Controls.Add(Me.出庫單_dgv)
         Me.Controls.Add(Me.Label1)
         Me.Controls.Add(Me.加入單據_bt)
         Me.Controls.Add(Me.需要全部庫存區域清單_ch)
@@ -605,7 +640,7 @@ Partial Class 倉儲出庫
         Me.Panel1.ResumeLayout(False)
         Me.Panel1.PerformLayout()
         CType(Me.物料清單_dgv, System.ComponentModel.ISupportInitialize).EndInit()
-        CType(Me.入庫單_dgv, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.出庫單_dgv, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.明細_dgv, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.物料圖_pb, System.ComponentModel.ISupportInitialize).EndInit()
         Me.ResumeLayout(False)
@@ -643,9 +678,8 @@ Partial Class 倉儲出庫
     Friend WithEvents 物料圖_pb As PictureBox
     Friend WithEvents 指定倉庫_cb As ComboBox
     Friend WithEvents 物料清單_dgv As DataGridView
-    Friend WithEvents 入庫單_dgv As DataGridView
+    Friend WithEvents 出庫單_dgv As DataGridView
     Friend WithEvents Label1 As Label
-    Friend WithEvents Label3 As Label
     Friend WithEvents 項次_tb As TextBox
     Friend WithEvents Label2 As Label
     Friend WithEvents 單據編號_bt As TextBox
@@ -657,4 +691,8 @@ Partial Class 倉儲出庫
     Friend WithEvents 庫存量_lb As Label
     Friend WithEvents 掃描_bt As Button
     Friend WithEvents 產品編號_tb As TextBox
+    Friend WithEvents 未出庫_ch As CheckBox
+    Friend WithEvents 已出庫_ch As CheckBox
+    Friend WithEvents 紙號_tb As TextBox
+    Friend WithEvents Label3 As Label
 End Class

ZJ-ERP-SYS/04、倉儲系統/倉儲出庫.vb

@@ -27,12 +27,18 @@ Public Class 倉儲出庫
         Next : ZJ_ERP_SYS.ToolStripProgressBar1.Value = 0 : 最終數 = 0
     End Sub
     Private Sub Set_清單1()
-        Dim ds As New DataSet : 入庫單_dgv.DataSource = Nothing : ds.Clear()
-        入庫單_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
-        入庫單_dgv.ColumnHeadersHeight = 40 : 入庫單_dgv.AllowUserToAddRows = False : 入庫單_dgv.RowTemplate.Height = 25
-        SQL_倉儲出庫清單()
-        da.Fill(ds) : 入庫單_dgv.DataSource = ds.Tables(0) : conn.Close()
-        入庫單_dgv.Columns(0).ReadOnly = True
+        Dim ds As New DataSet : 出庫單_dgv.DataSource = Nothing : ds.Clear()
+        出庫單_dgv.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.EnableResizing
+        出庫單_dgv.ColumnHeadersHeight = 40 : 出庫單_dgv.AllowUserToAddRows = False : 出庫單_dgv.RowTemplate.Height = 25
+        If 未出庫_ch.Checked = True Then : SQL_倉儲出庫清單("LIKE") : Else : SQL_倉儲出庫清單("NOT LIKE") : End If
+        da.Fill(ds) : 出庫單_dgv.DataSource = ds.Tables(0) : conn.Close()
+        出庫單_dgv.Columns(0).ReadOnly = True
+    End Sub
+    Private Sub 未入庫_ch_CheckedChanged(sender As Object, e As EventArgs) Handles 未出庫_ch.Click
+        未出庫_ch.Checked = True : 已出庫_ch.Checked = False : 明細_dgv.DataSource = Nothing : Set_清單1()
+    End Sub
+    Private Sub 已入庫_ch_CheckedChanged(sender As Object, e As EventArgs) Handles 已出庫_ch.Click
+        未出庫_ch.Checked = False : 已出庫_ch.Checked = True : 明細_dgv.DataSource = Nothing : Set_清單1()
     End Sub
     Private Sub Set_清單2()
         Dim ds As New DataSet : 明細_dgv.DataSource = Nothing : ds.Clear()
@@ -102,9 +108,10 @@ Public Class 倉儲出庫
             End If : conn.Close()
         End If : 料號1_tb.Focus()
     End Sub
-    Private Sub 入庫單_dgv_CellClick(ByVal sender As System.Object, ByVal e As DataGridViewCellEventArgs) Handles 入庫單_dgv.CellClick
+    Private Sub 入庫單_dgv_CellClick(ByVal sender As System.Object, ByVal e As DataGridViewCellEventArgs) Handles 出庫單_dgv.CellClick
         If e.RowIndex = -1 Then : Else
-            單據編號_bt.Text = 入庫單_dgv("出庫單號", e.RowIndex).Value.ToString : NUM = -1 : 項次_tb.Text = "" : 流水號_tb.Text = "" : Set_清單2()
+            單據編號_bt.Text = 出庫單_dgv("出庫單號", e.RowIndex).Value.ToString : 紙號_tb.Text = 出庫單_dgv("單據單號", e.RowIndex).Value.ToString
+            NUM = -1 : 項次_tb.Text = "" : 流水號_tb.Text = "" : Set_清單2()
         End If : 料號1_tb.Focus()
     End Sub
     Private Sub 明細_dgv_CellClick(ByVal sender As System.Object, ByVal e As DataGridViewCellEventArgs) Handles 明細_dgv.CellClick
@@ -204,13 +211,14 @@ Public Class 倉儲出庫
     End Sub
     Private Sub 存檔_bt_Click(sender As Object, e As EventArgs) Handles 存檔_bt.Click
         If 單據編號_bt.Text = "" Then : MsgBox("沒有選擇要儲存的單號") : Else
+            SQL_倉儲控制_存檔(單據編號_bt.Text, 紙號_tb.Text)
             For i As Integer = 0 To 明細_dgv.Rows.Count - 1
                 Dim 出庫 As String = 明細_dgv.Rows(i).Cells("出庫").Value.ToString()
                 Dim 備註 As String = 明細_dgv.Rows(i).Cells("備註").Value.ToString()
                 Dim 流水號 As String = 明細_dgv.Rows(i).Cells("資料流水號").Value.ToString()
                 Dim 產品編號 As String = 明細_dgv.Rows(i).Cells("產品編號").Value.ToString()
                 SQL_倉儲明細表_存檔1(流水號, 備註, 產品編號, 出庫)
-            Next : conn.Close() : Set_清單2() : MessageBox.Show("儲存完成")
+            Next : conn.Close() : Set_清單1() : Set_清單2() : MessageBox.Show("儲存完成")
         End If : 料號1_tb.Focus()
     End Sub
     Private Sub 去除_bt_Click(sender As Object, e As EventArgs) Handles 去除_bt.Click

ZJ-ERP-SYS/04、倉儲系統/列印確認.Designer.vb

@@ -36,6 +36,7 @@ Partial Class 列印確認
         '
         'Panel2
         '
+        Me.Panel2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
         Me.Panel2.Controls.Add(Me.確認_bt)
         Me.Panel2.Controls.Add(Me.數量_NUD)
         Me.Panel2.Controls.Add(Me.自訂_rb)
@@ -43,12 +44,12 @@ Partial Class 列印確認
         Me.Panel2.Controls.Add(Me.單張_rb)
         Me.Panel2.Location = New System.Drawing.Point(2, 47)
         Me.Panel2.Name = "Panel2"
-        Me.Panel2.Size = New System.Drawing.Size(232, 184)
+        Me.Panel2.Size = New System.Drawing.Size(232, 115)
         Me.Panel2.TabIndex = 1593
         '
         '確認_bt
         '
-        Me.確認_bt.Location = New System.Drawing.Point(44, 140)
+        Me.確認_bt.Location = New System.Drawing.Point(44, 73)
         Me.確認_bt.Name = "確認_bt"
         Me.確認_bt.Size = New System.Drawing.Size(132, 36)
         Me.確認_bt.TabIndex = 1492
@@ -58,7 +59,7 @@ Partial Class 列印確認
         '數量_NUD
         '
         Me.數量_NUD.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
-        Me.數量_NUD.Location = New System.Drawing.Point(113, 94)
+        Me.數量_NUD.Location = New System.Drawing.Point(113, 48)
         Me.數量_NUD.Maximum = New Decimal(New Integer() {999, 0, 0, 0})
         Me.數量_NUD.Minimum = New Decimal(New Integer() {1, 0, 0, 0})
         Me.數量_NUD.Name = "數量_NUD"
@@ -70,7 +71,7 @@ Partial Class 列印確認
         '自訂_rb
         '
         Me.自訂_rb.AutoSize = True
-        Me.自訂_rb.Location = New System.Drawing.Point(64, 97)
+        Me.自訂_rb.Location = New System.Drawing.Point(64, 50)
         Me.自訂_rb.Name = "自訂_rb"
         Me.自訂_rb.Size = New System.Drawing.Size(49, 20)
         Me.自訂_rb.TabIndex = 4
@@ -81,7 +82,7 @@ Partial Class 列印確認
         '數量_rb
         '
         Me.數量_rb.AutoSize = True
-        Me.數量_rb.Location = New System.Drawing.Point(64, 58)
+        Me.數量_rb.Location = New System.Drawing.Point(64, 27)
         Me.數量_rb.Name = "數量_rb"
         Me.數量_rb.Size = New System.Drawing.Size(97, 20)
         Me.數量_rb.TabIndex = 3
@@ -92,7 +93,7 @@ Partial Class 列印確認
         '單張_rb
         '
         Me.單張_rb.AutoSize = True
-        Me.單張_rb.Location = New System.Drawing.Point(64, 20)
+        Me.單張_rb.Location = New System.Drawing.Point(64, 4)
         Me.單張_rb.Name = "單張_rb"
         Me.單張_rb.Size = New System.Drawing.Size(88, 20)
         Me.單張_rb.TabIndex = 2
@@ -123,7 +124,7 @@ Partial Class 列印確認
         '
         Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!)
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
-        Me.ClientSize = New System.Drawing.Size(240, 235)
+        Me.ClientSize = New System.Drawing.Size(240, 166)
         Me.Controls.Add(Me.Panel2)
         Me.Controls.Add(Me.品名_lb)
         Me.Controls.Add(Me.Label8)

ZJ-ERP-SYS/04、倉儲系統/列印確認.vb

@@ -1,17 +1,9 @@
-Imports Telerik.Windows.Documents.Spreadsheet.Expressions.Functions
-
-Public Class 列印確認
+Public Class 列印確認
     Public 列印確認通過 As Boolean = False
     Private Sub 確認_bt_Click(sender As Object, e As EventArgs) Handles 確認_bt.Click
-        If 單張_rb.Checked = False AndAlso 數量_rb.Checked = False AndAlso 自訂_rb.Checked = False Then
-            MsgBox("請選擇列印的張數")
-            Exit Sub
-        End If
-
-        列印確認通過 = True
-        Me.Close()
+        If 單張_rb.Checked = False AndAlso 數量_rb.Checked = False AndAlso 自訂_rb.Checked = False Then : MsgBox("請選擇列印的張數") : Exit Sub : End If
+        列印確認通過 = True : Me.Close()
     End Sub
-
     Private Sub 列印確認_Load(sender As Object, e As EventArgs) Handles MyBase.Load
         列印確認通過 = False
     End Sub