當我的picture1.picture=loadpicture(app.path & "\left.ico")  圖片也就是左
當我按下鍵盤上的左鍵要等於這個圖標，
If keycode = 37 And Picture1.Picture = LoadPicture("D:\勁\ARW02LT.ICO") Then
                Picture1.Picture = LoadPicture(App.Path & "\ARW06LT.ICO")
end if
但是如果我這樣執行代碼它不執行
 Picture1.Picture = LoadPicture(App.Path & "\ARW06LT.ICO")
因為圖標出現的是如:17500457
                    1675213
但是會出現圖處<-按下去時卻變成了->圖片
反正是隨機出的因此不能得到正確的圖標
有什么辦法解決此問題萬分感謝

[[it] 本帖最后由 jxyga111 于 2008-4-23 13:39 编辑 [/it]]

我觉得你那条判断语句有问题，我这样你看行不
dim nameString as string
nameString="D:\勁\ARW02LT.ICO"
Picture1.Picture = LoadPicture("D:\勁\ARW02LT.ICO")
if (keycode = 37) And(nameString<>"") Then
    Picture1.Picture = LoadPicture(App.Path & "\ARW06LT.ICO")
end if
这只是个想法，具体你自己再看看，就是判断load图片名，而不是直接load图片

在什么事件中写的？？

在什么事件中写的？？

picture1_kdydown(keycode as integer)
end sub