VB中关于 App 使用

 

VB中关于 App 使用

APP：是一个对象，指应用程序本身。

App对象有两种重要属性：
    (1)App.Path，在VB编程状态下返回你的.vbp文件所在目录；在以.EXE文件运行时，则返回你的.EXE文件所在目录。
    (2)App.EXEName它返回你的程序名。

首先，VB中App.Path不是相对路径。App.Path是用来获取当前应用程序所在的路径的,这个路径是一个绝对路径,不是相对路径！ 不过,这个路径会随着你的程序的位置的变化也会变化 实际应用中,比如你要打开一个文本文件1.txt,这个文件与程序放在一个目录下,你就可以用这个来打开:

App.Path 是系统内的一个变量值，app.path是返回程序所在的路径 (是程序的工作目录,不一定都是程序路径) ，一个相对路径。如果你要打开的文件和你的程序在同一个文件夹下，那就可以这样app.path ＆"\文件名" 如你程序生成可执行文件后要实现播放Flash.就可以：
    比如: Open App.Path & "\1.txt" For output as #1
          Me.ShockwaveFlash1.Movie = App.Path & "\01.swf"

下面举一个简单的例子，假如你有一个程序为DDC，其目录为C：＼HVB＼DDC4(包括DDC.EXE)在VB编程环境下，在Debug窗口运行：Print App.Path,显示结果：C：\HVB＼DDC4，再运行Print App.EXEName显示结果：DDC。知道了以上两种属性，前面所述问题就很好解决了，可以将其修改为：

Dim Apath ,Dim FilePath
        Apath=App.Path
        FilePath=Apath＋"＼HAN.BMP"
        Picture1.Picture=LoadPicture(FilePath)
这样，这程序的工作目录无论改为什么，都能正常工作了。