{"id":36234,"date":"2012-06-10T02:50:57","date_gmt":"2012-06-09T18:50:57","guid":{"rendered":"http:\/\/www.lanmaowang.com\/?p=36234"},"modified":"2015-04-01T23:20:38","modified_gmt":"2015-04-01T15:20:38","slug":"autocad-vbas-switch-to-paper-space-creating-a-floating-viewport-set-the-view-and-enable-the-viewport","status":"publish","type":"post","link":"http:\/\/www.lanmaowang.com\/?p=36234","title":{"rendered":"AutoCAD VBA\u4e4b\u5207\u6362\u5230\u56fe\u7eb8\u7a7a\u95f4\u3001\u521b\u5efa\u6d6e\u52a8\u89c6\u53e3\u3001\u8bbe\u7f6e\u89c6\u56fe\u4ee5\u53ca\u542f\u7528\u89c6\u53e3"},"content":{"rendered":"<p>\u672c\u6837\u4f8b\u8bf4\u660e\u5982\u4f55\u5c06 AutoCAD \u5207\u6362\u5230\u56fe\u7eb8\u7a7a\u95f4\u3001\u521b\u5efa\u6d6e\u52a8\u89c6\u53e3\u3001\u8bbe\u7f6e\u89c6\u56fe\u4ee5\u53ca\u542f\u7528\u89c6\u53e3\u3002<\/p>\n<pre class=\"brush:vb;toolbar:false\">Sub&nbsp;Ch9_SwitchToPaperSpace()\r\n&nbsp;&nbsp;&nbsp;&#39;&nbsp;\u5c06\u6d3b\u52a8\u7a7a\u95f4\u8bbe\u7f6e\u4e3a\u56fe\u7eb8\u7a7a\u95f4\r\n&nbsp;&nbsp;&nbsp;&nbsp;ThisDrawing.ActiveSpace&nbsp;=&nbsp;acPaperSpace&nbsp;&nbsp;&nbsp;\r\n&nbsp;&nbsp;&nbsp;&#39;&nbsp;\u521b\u5efa\u56fe\u7eb8\u7a7a\u95f4\u89c6\u53e3\r\n&nbsp;&nbsp;&nbsp;&nbsp;Dim&nbsp;newVport&nbsp;As&nbsp;AcadPViewport\r\n&nbsp;&nbsp;&nbsp;&nbsp;Dim&nbsp;center(0&nbsp;To&nbsp;2)&nbsp;As&nbsp;Double\r\n&nbsp;&nbsp;&nbsp;&nbsp;center(0)&nbsp;=&nbsp;3.25\r\n&nbsp;&nbsp;&nbsp;&nbsp;center(1)&nbsp;=&nbsp;3\r\n&nbsp;&nbsp;&nbsp;&nbsp;center(2)&nbsp;=&nbsp;0\r\n&nbsp;&nbsp;&nbsp;&nbsp;Set&nbsp;newVport&nbsp;=&nbsp;ThisDrawing.PaperSpace.&nbsp;_\r\n&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;AddPViewport(center,&nbsp;6,&nbsp;5)&nbsp;&nbsp;&nbsp;\r\n&nbsp;&nbsp;&nbsp;&#39;&nbsp;\u4fee\u6539\u89c6\u53e3\u7684\u89c2\u5bdf\u65b9\u5411\r\n&nbsp;&nbsp;&nbsp;&nbsp;Dim&nbsp;viewDir(0&nbsp;To&nbsp;2)&nbsp;As&nbsp;Double\r\n&nbsp;&nbsp;&nbsp;&nbsp;viewDir(0)&nbsp;=&nbsp;1\r\n&nbsp;&nbsp;&nbsp;&nbsp;viewDir(1)&nbsp;=&nbsp;1\r\n&nbsp;&nbsp;&nbsp;&nbsp;viewDir(2)&nbsp;=&nbsp;1\r\n&nbsp;&nbsp;&nbsp;&nbsp;newVport.direction&nbsp;=&nbsp;viewDir&nbsp;&nbsp;\r\n&nbsp;&nbsp;&nbsp;&#39;&nbsp;\u542f\u7528\u89c6\u53e3\r\n&nbsp;&nbsp;&nbsp;&nbsp;newVport.Display&nbsp;True&nbsp;&nbsp;\r\n&nbsp;&nbsp;&nbsp;&#39;&nbsp;\u5207\u6362\u5230\u6a21\u578b\u7a7a\u95f4\r\n&nbsp;&nbsp;&nbsp;&nbsp;ThisDrawing.MSpace&nbsp;=&nbsp;True&nbsp;\r\n&nbsp;&nbsp;&nbsp;&#39;&nbsp;\u5c06&nbsp;newVport&nbsp;\u7f6e\u4e3a\u5f53\u524d\r\n&nbsp;&nbsp;&nbsp;&#39;&nbsp;\uff08\u5e76\u975e\u59cb\u7ec8\u9700\u8981\uff0c\u4f46\u5efa\u8bae\u5982\u6b64\uff09\r\n&nbsp;&nbsp;&nbsp;&nbsp;ThisDrawing.ActivePViewport&nbsp;=&nbsp;newVport\r\n&nbsp;&nbsp;&nbsp;&#39;&nbsp;\u5728\u6a21\u578b\u7a7a\u95f4\u4e2d\u8fdb\u884c\u8303\u56f4\u7f29\u653e\r\n&nbsp;&nbsp;&nbsp;&nbsp;ZoomExtents&nbsp;&nbsp;&nbsp;&nbsp;\r\n&nbsp;&nbsp;&nbsp;&#39;&nbsp;\u5173\u95ed\u6a21\u578b\u7a7a\u95f4\u7f16\u8f91\r\n&nbsp;&nbsp;&nbsp;&nbsp;ThisDrawing.MSpace&nbsp;=&nbsp;False&nbsp;&nbsp;&nbsp;&nbsp;\r\n&nbsp;&nbsp;&nbsp;&nbsp;&#39;&nbsp;\u5728\u56fe\u7eb8\u7a7a\u95f4\u4e2d\u8fdb\u884c\u8303\u56f4\u7f29\u653e\r\n&nbsp;&nbsp;&nbsp;&nbsp;ZoomExtents\r\nEnd&nbsp;Sub<\/pre>\n<p><\/p>\n<p>\u4e0a\u8ff0\u4ee3\u7801\u4e2d\u7684\u6b65\u9aa4\u987a\u5e8f\u975e\u5e38\u91cd\u8981\u3002\u4e00\u822c\u6765\u8bb2\uff0c\u6b65\u9aa4\u7684\u987a\u5e8f\u5fc5\u987b\u4e0e\u5b83\u4eec\u5728 AutoCAD \u547d\u4ee4\u884c\u4e2d\u7684\u6267\u884c\u987a\u5e8f\u76f8\u540c\u3002\u552f\u4e00\u4e0d\u80fd\u9884\u671f\u7684\u64cd\u4f5c\u662f\u5b9a\u4e49\u89c6\u56fe\u548c\u542f\u7528\u89c6\u53e3\u3002&nbsp;<\/p>\n<p>\u6ce8\u610f &nbsp;\u8981\u8bbe\u7f6e\u6216\u4fee\u6539\u89c6\u56fe\u7684\u7279\u6027\uff08\u89c2\u5bdf\u65b9\u5411\u3001\u955c\u5934\u957f\u5ea6\u7b49\uff09\uff0c\u5fc5\u987b\u5c06 Viewport \u5bf9\u8c61\u7684 Display \u65b9\u6cd5\u8bbe\u7f6e\u4e3a\u5173\u95ed (FALSE)\uff1b\u5e76\u4e14\uff0c\u5728\u5c06\u67d0\u4e2a\u89c6\u53e3\u8bbe\u7f6e\u4e3a\u5f53\u524d\u89c6\u53e3\u4e4b\u524d\uff0c\u5fc5\u987b\u5c06 Display \u65b9\u6cd5\u8bbe\u7f6e\u4e3a\u6253\u5f00 (TRUE)\u3002<\/p>\n<p><\/p>\n","protected":false},"excerpt":{"rendered":"<p>\u672c\u6837\u4f8b\u8bf4\u660e\u5982\u4f55\u5c06 AutoCAD \u5207\u6362\u5230\u56fe\u7eb8\u7a7a\u95f4\u3001\u521b\u5efa\u6d6e\u52a8\u89c6\u53e3\u3001\u8bbe\u7f6e\u89c6\u56fe\u4ee5\u53ca\u542f\u7528\u89c6\u53e3\u3002 Sub&nbsp;Ch [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":36146,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":[],"categories":[193],"tags":[194,196],"_links":{"self":[{"href":"http:\/\/www.lanmaowang.com\/index.php?rest_route=\/wp\/v2\/posts\/36234"}],"collection":[{"href":"http:\/\/www.lanmaowang.com\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/www.lanmaowang.com\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/www.lanmaowang.com\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/www.lanmaowang.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=36234"}],"version-history":[{"count":1,"href":"http:\/\/www.lanmaowang.com\/index.php?rest_route=\/wp\/v2\/posts\/36234\/revisions"}],"predecessor-version":[{"id":36235,"href":"http:\/\/www.lanmaowang.com\/index.php?rest_route=\/wp\/v2\/posts\/36234\/revisions\/36235"}],"wp:featuredmedia":[{"embeddable":true,"href":"http:\/\/www.lanmaowang.com\/index.php?rest_route=\/wp\/v2\/media\/36146"}],"wp:attachment":[{"href":"http:\/\/www.lanmaowang.com\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=36234"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/www.lanmaowang.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=36234"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/www.lanmaowang.com\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=36234"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}