VB程序?qū)崿F(xiàn)XP效果的界面

字號(hào):

具體的實(shí)現(xiàn)方法如下:  
    ①:在你的窗體加入代碼。如果是多個(gè)窗口,可以將此代碼放到模塊中?! ?BR>    代碼如下:  
    '聲明API函數(shù)
    Private Declare Sub InitCommonControls Lib "comctl32.dll" ()
    Private Sub Form_Initialize()
    InitCommonControls
    End Sub 
    注意:千萬不要在Form_load()事件下寫InitCommonControls這句話,否則你的窗體會(huì)啟動(dòng)不了。(不要怪我沒告訴你啊~~~~) 
    ②:建立一個(gè)和你的.exe同名的.exe.manifest文件(假如:如果你最后編譯好的文件名為WindowXPStyle.exe,則建立一個(gè)文件名為WindowXPStyle.exe.manifest的文件),并且此文件必須存在于和你Exe文件的同一目錄下?!?BR>    以WindowXPStyle.exe為例,則這個(gè)WindowXPStyle.exe.manifest的文件的內(nèi)容如下:  
    version="1.0.0.0"
    processorArchitecture="X86"
    name="CompanyName.ProductName.YourApp"
    type="win32"
    />
    Your application description here.
    type="win32"
    name="Microsoft.Windows.Common-Controls"
    version="6.0.0.0"
    processorArchitecture="X86"
    publicKeyToken="6595b64144ccf1df"
    language="*"
    />
    將以上內(nèi)容保存為WindowXPStyle.exe.manifest。并且和執(zhí)行文件放在一個(gè)目錄下(一定要記?。?。