关于文档窗口的定位和大小 （VBA/ActiveX）
使用该对象可以修改任何文档窗口的位置和大小。Document 可以使用该属性最小化或最大化“文档”窗口，并且可以使用该属性查找“文档”窗口的当前状态。WindowStateWindowState “放置文档”窗口本示例使用 and 属性将活动的“文档”窗口设置为 400 像素宽 x 400 像素高。WidthHeight Sub Ch3_SizeDocumentWindow() ThisDrawing.Width = 400 ThisDrawing.Height = 400 End Sub 最大化活动的“文档”窗口Sub Ch3_MaximizeDocumentWindow() ThisDrawing.WindowState = acMax End Sub 最小化活动的“文档”窗口Sub Ch3_MinimizeDocumentWindow() ThisDrawing.WindowState = acMin End Sub 查找活动“文档”窗口的当前状态Sub Ch3_CurrentWindowState() Dim CurrWindowState As Integer Dim msg As String CurrWindowState = ThisDrawing.WindowState msg = Choose(CurrWindowState, "normal", "minimized", "maximized") MsgBox "The document window is " + msg End Sub |
|Archiver|CAD开发者社区
( 苏ICP备2022047690号-1 苏公网安备32011402011833)
GMT+8, 2025-3-5 17:50
Powered by Discuz! X3.4
Copyright © 2001-2021, Tencent Cloud.
