系统对象 (Word)
包含有关计算机系统的信息。
使用 System 属性可返回 System 对象。 如果操作系统是 Windows,则以下示例与 \Project\Info 建立网络连接。
If System.OperatingSystem = "Windows" Then
System.Connect Path:="\\Project\Info"
End If
以下示例显示当前屏幕分辨率(例如,“1024 x 768”)。
horz = System.HorizontalResolution
vert = System.VerticalResolution
MsgBox "Resolution = " & horz & " x " & vert
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。