初学VB编程,很快就能编出些实用的程序了。我便将它们制成安装盘送给朋友,但很快就发现一个问题,程序总是按编程时固定好的路径读写文件,但文件路径改变,程序就找不到路径了,因此不能正常写文件。例如编程时设定:picture1.picture=LoadPicture("c:HVBHAN.BMP")但若安装使用时,工作目录变为E:HVBHAN.BMP或其它路径,程序就会出错,并提示:找不到文件路径。这个问题看起来很复杂,但实际上很好解决,这只需用VB的App对象。
App对象有两种重要属性:(1)App.Path,它在VB编程状态下返回你的.MAK文件所在目录;在以.EXE文件运行时,则返回你的.EXE文件所在目录。(2)App.EXEName它返回你的程序名。下面举一个简单的例子,假如你有一个程序为DDC,其目录为C:HVBDDC4(包括DDC.EXE)在VB编程环境下,在Debug窗口运行:PrintApp.Path,显示结果:C:HVBDDC4,再运行PrintApp.EXEName显示结果:DDC。知道了以上两种属性,前面所述问题就很好解决了,可以将其修改为:DimApath,DimFilePath
Apath=App.Path
FilePath=Apa...[ 查看全文 ]