Application icon

[Guest]

I would like to change the Application Icon to the database program that I
created.
Is any one know how to do that.

 

[Van T. Dinh]

If you are talking about Microsoft Access, use the Menu Tools / Start-up ...
and specify a new icon.

 

[tw]

menu item tools | startup...| application icon then pick the icon you want
to use

 

[Kai Apel \(Berlin\)]

you can also use a fuction for doing that (when your Icon is in the database
path, don´t forget it!

Sub IconChange()
Dim intX As Integer

Const DB_Layout As Long = 10
intX = AddAppProperty("AppTitle", DB_Layout, "TheNameOfYourApplication")
intX = AddAppProperty("AppIcon", DB_Layout, CurrentProject.Path &
"NameOfYourIcon")
'MsgBox intX
CurrentDb.Properties("UseAppIconForFrmRpt") = 1
Application.RefreshTitleBar
End Sub
It work´s since Access 2000 otherwise you have to change for the pathname of
your Icon!

Greets

Kai Apel (Berlin)