[RESOLVED] Icon

[chris1990]

I can't seem to get this code working, i am trying to change the icon of a form

Private Sub Form_Load()
Dim TrayPath As String
TrayPath = App.Path + "\ent.ico"
End Sub

frmTray.Icon = TrayPath

I also tried:

frmTray.Icon = App.Path + "\ent.ico"

I dont know why but they both give error's.

[bushmobile]

frmTray.Icon = LoadPicture(App.Path + "\ent.ico")

[chris1990]

Thanks,
Chris1990.

for some reason i always forget the loadpicture part.