那是因为少了":",因为在光盘中的源程序的app.path为"g",你加个判断语句吧
如果为G则加个:,如果为G则算了
呵呵,如果我对了就给分啊!
哦,忘 了说了,只要是根目录就会少个:,不信你试试!

解决方案 »

  1.   

    当程序放在跟目录是app.path 返回的值为   X:\  你在后面又加入了“\bmp\aa.bmp“
    当然不对了应该在app.path加入判断
    if Right(app.path,1)<>"\" then 
    picture1.picture = loadpicture(app.path &"\bmp\aa.bmp")
    else
    picture1.picture = loadpicture(app.path & "bmp\aa.bmp")
    end if给分吧!呵呵~~~~~~~~
      

  2.   

    看来朋友们都一眼看出这个错误了!
    顺便说一句,你调试程序的能力需要改进呀!
    比如,你可以把程序放在硬盘的根目录和子目录下分别MSGBOX出APP.PATH
    等没有错误时再出掉MSGBOX,刻在光盘上!不过刻完后千万不要封顶,这样你可以随时替换你的程序文件!(其实我也犯过这个错误!)
      

  3.   

    to deityfox:
       我一般编程序的时候是这样用的,不知道行不行,反正还没有出过错误:
       比如说想访问"C:\ABC\DEF\G.MDB"
       APP.PATH="C:\ABC"的时候,我用app.path & ".\def\g.mdb"来访问。
       app.path="c:\"的时候,我用app.path & ".\abc\def\g.mdb"来访问。
       这样,我就不用在编那段程序了,反正是没出过错误,不知道对不对?