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