Application icon

A

Arul

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

Van T. Dinh

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

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)
 
Top