APP对象是过关键字APP访问的全局对象,它指定应用程序的标题,版本,可执行文件和帮助文件的路径和名称。利用APP对象的path属性,可以返回或设置应用程序的当前路径。通过具体的应用来探究一下APP。
1.App.Path返回或设置当前路径。在设计时是不可用的。比如你写了个程序,然后放在"C:\MyPrograme"下,则
Print App.Path就会打印出C:\MyPrograme。同样的,在窗体上实例化一个command1 ,编写代码:
Private sub command1_click
Msgbox app.path
End sub 结果:
2.App.EXEName
返回当前正运行的可执行文件的根名(也就是应用程序的名称,不带扩展名)。如果是在开发环境下运行,则返回该工程名。
Private Sub Command1_Click()
MsgBox App.EXEName
End Sub
3.App.PrevInstance 属性
用来判断是否已经有前一个应用程序实例在运行。
比如说,你写了个程序Good.exe,你若不想运行程序后还没有关闭,但不想再打开一个(重复运行)。你可以在窗体的Form_Load()事件中这样判断。
If App.PrevInstance = Ture Then
MsgBox "程序已经打开。",vbInformation,"温馨提示:"
End
End If
这样你就不会重复打开多次了。下面是还列举了一些具体的app属性:
1.Comments 属性
返回或设置一个字符串,该字符串包括运行中的应用程序的注释。该属性在运行时是只读的。
2.CompanyName 属性
返回或设置一个字符串,该字符串包括运行中的应用程序的公司或创建者名称。该属性在运行时是只读的。
3.FileDescription 属性
返回或设置一个字符串,该字符串包括运行中应用程序的文件说明信息。该属性在运行时是只读的。
4.Major属性
返回或设置该工程的主要版本号。该属性在运行时是只读的。
5.Minor 属性
返回或设置该工程的小版本号。该属性在运行时是只读的……