Windows XP ulkoasun saa seuraavasti:
Esittele tämmönen Api:
Private Declare Function InitCommonControls Lib "comctl32.dll" () As Long
Sitten tarvitaan tämmönen koodi vaihtamaan ulkoasua:
Private Sub Form_Initialize()
InitCommonControls
End SubSitten teet exe:n ja laitat nimen <exenimi>.exe, ja <exenimi> kohdalle tietenkin haluamasi nimi.
Sen jälkeen tehdään joku manifesti, jota Windows etsii aina käynnistettäessä exeä. manifestiin kirjoitetaan (avaa notepadilla <exenimi>.exe ja kirjoita):
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
<assemblyIdentity type="win32" processorArchitecture="*" version="6.0.0.0" name="mash"/>
<description>Enter your Description Here</description>
<dependency>
<dependentAssembly>
<assemblyIdentity
type="win32"
name="Microsoft.Windows.Common-Controls" version="6.0.0.0"
language="*"
processorArchitecture="*"
publicKeyToken="6595b64144ccf1df"
/>
</dependentAssembly>
</dependency>
</assembly>Ja tallenna manifesti <exenimi>.exe.manifest
Sitten käynnistä.
Minulla ei toiminut ensimmäisellä kerralla ja exe jäi työpöydälle ja kun sitä yritti poistaa sanoi "Ei voi poistaa; yhteiskäyttövirhe..." mutta se lähtee pois ainakin
GiPolla. Google...
ja tämä löytyi Allapista
Muistaakseni tämäkin toimi:
Application.EnableVisualStyles
.NET:ssä ehkä. VB6:lla ainoa tapa on juuri tuo manifest-tiedosto.
Kannattaa laittaa manifesti VB:n kansioon niin kontrolleiden tyylit näkyvät jo muokkaustilassa.
Milläs nimellä se manifesti pitää silloin tallentaa?
Samoin kuin omalle ohjelmalle mutta nimenä vb:n exen nimi. Eli: VB6.exe.manifest
Aihe on jo aika vanha, joten et voi enää vastata siihen.