VB中關(guān)于 App 使用

APP：是一個(gè)對(duì)象，指應(yīng)用程序本身。

App對(duì)象有兩種重要屬性：
    (1)App.Path，在VB編程狀態(tài)下返回你的.vbp文件所在目錄；在以.EXE文件運(yùn)行時(shí)，則返回你的.EXE文件所在目錄。
    (2)App.EXEName它返回你的程序名。

首先，VB中App.Path不是相對(duì)路徑。App.Path是用來(lái)獲取當(dāng)前應(yīng)用程序所在的路徑的,這個(gè)路徑是一個(gè)絕對(duì)路徑,不是相對(duì)路徑！ 不過(guò),這個(gè)路徑會(huì)隨著你的程序的位置的變化也會(huì)變化 實(shí)際應(yīng)用中,比如你要打開(kāi)一個(gè)文本文件1.txt,這個(gè)文件與程序放在一個(gè)目錄下,你就可以用這個(gè)來(lái)打開(kāi):

App.Path 是系統(tǒng)內(nèi)的一個(gè)變量值，app.path是返回程序所在的路徑 (是程序的工作目錄,不一定都是程序路徑) ，一個(gè)相對(duì)路徑。如果你要打開(kāi)的文件和你的程序在同一個(gè)文件夾下，那就可以這樣app.path ＆"\文件名" 如你程序生成可執(zhí)行文件后要實(shí)現(xiàn)播放Flash.就可以：
    比如: Open App.Path & "\1.txt" For output as #1
          Me.ShockwaveFlash1.Movie = App.Path & "\01.swf"

下面舉一個(gè)簡(jiǎn)單的例子，假如你有一個(gè)程序?yàn)镈DC，其目錄為C：＼HVB＼DDC4(包括DDC.EXE)在VB編程環(huán)境下，在Debug窗口運(yùn)行：Print App.Path,顯示結(jié)果：C：\HVB＼DDC4，再運(yùn)行Print App.EXEName顯示結(jié)果：DDC。知道了以上兩種屬性，前面所述問(wèn)題就很好解決了，可以將其修改為：

Dim Apath ,Dim FilePath
        Apath=App.Path
        FilePath=Apath＋"＼HAN.BMP"
        Picture1.Picture=LoadPicture(FilePath)
這樣，這程序的工作目錄無(wú)論改為什么，都能正常工作了。