Problem mit XP Style

[vb_user]

Hallo,

wie kann ich in Vb.net den Style einer Form auf das "XP - Design" umstellen? Ich habe jetzt den Windows 2000 Style und möchte aber den XP!

Bitte um Hilfe

 

[Shakie]

Das geht so:

    Public Sub main()
        'XP-Styles aktivieren:
        Application.EnableVisualStyles()

        'Bug Work-Around ("EnableVisualStyles" hätte sonst keine Wirkung):
        Application.DoEvents()

        'Programm starten:
        Application.Run(New Die_Startform_des_Programms_halt)
    End Sub

Sollte das Programm dann auf einem Nicht-XP-Windows ausgeführt werden, so hat das ganze keine Auswirkungen.
Beachte: Das DoEvents ist wichtig, sonst funktioniert der ganze Spaß nicht. Keine Ahnung warum ^^

 

[vb_user]

vielen Dank für die schnelle Antwort!