VB6.0(第十课）

一、类

二、应用程序对象：app
APP对象是通过APP访问全局对象，指定的信息：应用程序的标题、版本信息、可执行文件和帮助文件的路径及名称，以及判断是否运行前一个应用程序的示例。
1、companyname：应用程序的公司或创建者名称

me.caption = Me.Caption & "(" & App.CompanyName & "创建)"

2、exename属性与path
exename：返回当前正运行的可执行文件的根名（不带扩展名）。如果是在开发环境下运行，则返回该工程名。
path：返回或设置当前路径。在设计时是不可用的。对于app对象，在运行时是只读的。

FileCopy App.Path & "\" & App.EXEName & ".exe", App.Path & "\" & App.EXEName & "备份.exe"

说明：上述实例在工程调试期间无法执行，需要将工程生成为exe后执行文件，即可在同目录下生成一个备份文件“备份.exe”

3、prevlnstance：返回是否运行前一个应用程序的示例。返回值为布尔型。
如：判断应用程序是否运行过，如果运行过则关闭当前运行的程序，代码如下：

if app.prevlnstance =false  then   '当程序没有运行过
else 
     msgbox           "程序已运行"
     end
end if    

说明：上述实例在工程调试期间无法执行，需要将工程生成为exe后执行。

4、Title属性：返回或设置应用程序的标题，该标题要显示在任务栏上的列表中。
app.title = “VB程序设计”

5、屏幕对象（scree对象）

6、剪贴板对象（Clipboard对象）

7、调试对象（debug对象）