FrontPage VBA教程:System对象

   
Application
System

代表 System对象的 Microsoft FrontPage 存取器,提供对操作系统、屏幕分辨率或注册表信息等信息的访问。

使用 System对象

使用 System属性可以返回 System对象。下列语句返回正在调用的应用程序的名称。


mySysApp = System.Application.Name

使用 Build 和 Version属性可以返回操作系统的 build 和版本信息。


myVer = System.Version
myBld = System.Build

水平和垂直显示率可用于确定图片能否能显示在客户端计算机上。下列语句返回分辨率设置。


currHorizRes = System.HorizontalResolution
currVertRes = System.Vertical.Resolution

使用 OperatingSystem属性可以返回当前操作系统的名称,如下列语句所示。


thisOps = System.OperatingSystem

使用 Parent属性可以返回指定对象的父对象。下列语句返回 System对象的父对象信息。


Private Sub GetSystemParentInfo()
    Dim mySys As System
    Dim mySysUserName As String
    Set mySys = System
    With mySys
        mySysUserName = .Parent.UserName
    End With
End Sub

使用 LanguageDesignation属性可以返回操作系统所用语言的三字母缩写。下列语句返回的“enu”是美国英语的语言名称缩写。


currSystemLanguage = System.LanguageDesignation

使用 ProfileString属性可以返回或设置 Windows 注册表中的条目。如果使用时没带参数,ProfileString属性默认为下列键值:

HKEY_CURRENT_USERS\Software\Microsoft\FrontPage

ProfileString属性的参数为:

下列示例返回 CentralProcessor 子键的标识符。


Private Sub GetProfileString()
    Dim mySys As System
    Dim myRegSec As String
    Dim myRegKeyInfo As String
    Set mySys = System
    myRegSec = _
     "HKEY_LOCAL_MACHINE\Hardware\Description\System\CentralProcessor\0"
    myRegKeyInfo
        = mySys.ProfileString(myRegSec, "Identifier")
End Sub

上页:FrontPage VBA教程:Survey对象 下页:FrontPage VBA教程:Theme对象

FrontPage VBA教程:System对象

FrontPage VBA教程:Theme对象 FrontPage VBA教程:Themes集合对象
FrontPage VBA教程:UndoTransaction对象 FrontPage VBA教程:WebEx对象
FrontPage VBA教程:WebFile对象 FrontPage VBA教程:WebFiles集合对象
FrontPage VBA教程:WebFolder对象 FrontPage VBA教程:WebFolders对象集合
FrontPage VBA教程:Webs集合对象 FrontPage VBA教程:WebWindowEx对象
FrontPage VBA教程:WebWindows集合对象 FrontPage VBA教程:ActiveDocument属性
FrontPage VBA教程:activeElement属性 FrontPage VBA教程:ActiveFrameWindow属性
FrontPage VBA教程:ActivePageWindow属性 FrontPage VBA教程:ActiveWeb属性
FrontPage VBA教程:ActiveWebWindow属性 FrontPage VBA教程:alinkColor属性
FrontPage VBA教程:all属性 FrontPage VBA教程:AllFiles属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号