VB中的App函数怎么用?

来源：百度知道 编辑：UC知道 时间：2024/05/16 01:02:37
App对象有两种重要属性：(1)App.Path，它在VB编程状态下返回你的.MAK文件所在目录；在以.EXE文件运行时，则返回你的.EXE文件所在目录。(2)App.EXE Name它返回你的程序名。下面举一个简单的例子，假如你有一个程序为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)
这个我看不懂！有没有源代码！
我要运行E:\ME\1.exe 再别的目录也能运行！

shell(e:\me\1.exe)

你上面的例子是图片picture1加载指定路径下的一张bmp图片，如果你的是EXE可执行文件的话，那还是用shell吧。

App对象...

这段代码 :::::
Dim Apath ,Dim FilePath '声明两个字符串变量
Apath=App.Path '赋值Apath
FilePath=Apath＋"\HAN.BMP" '赋值FilePath
Picture1.Picture=LoadPicture(FilePath) '让Picture1控件显示程序目录下
'HAN.BMP