Setup Display properties in Windows XP

[JCP]

In windows XP to change display properties, I go properties (right click on
desk top) and then, tab appearance and in windows an buttons combo box I can
change the style.

Question:
How can change the windows classic to windows XP style programmatically via
VBA?
When I open the database, I would like identify the style and if is classic
the function should change from one to another.

anyone can help me?
Thanks

Thanks,

JCP

 

[Douglas J. Steele]

While I'm sure it's possible, I would recommend very strongly against it.
You'd be messing with the settings the user chose, and that's not something
we as developers should be doing. It's possible that making a change like
you want could have some unexpected impact on another application which they
might be using at the same time as yours.

 

[JCP]

Hi Douglas,
I believe it is possible change display properties programmatically.
And about resgistry, doy know how can a change I change properties using
registry programmatically?

Thanks

 

[Bill Mosca, MS Access MVP]

What is the purpose behind changing the user's windows style? I can see
changing the style within the Access database (ie using the
Tools/Options/forms and reports tab/Use windows Themed controls.)

If that is what you really want the code would be using bolUseTheme as a
variable boolean:
Application.SetOption "Themed Form Controls", bolUseTheme

Set the variable to true if you want to turn on the themed option.

 

[JCP]

Hi Bill,
What I want is change windows Style in Display Properties .
Mannually, we can do this from control panel\Appearance and themes\Display\
and then Appearance Tab. in this tab we can change windows style, from
classic to windows xp style.

Do you have idea how can i do this procedure via VBA or VB?

Thanks

jcp

 

[Bill Mosca, MS Access MVP]

I would think it can be done with VBScript which means with a little
tweaking you can do it in VBA.

But I'm curious as to why you want to do this. Can't the user decide how he
wants his deskotp to look?