具體的實現方法如下：
①：在你的窗體加入**。如果是多個視窗，可以將此**放到模組中。**如下：
』宣告api函式
private declare sub init***moncontrols lib "***ctl32.dll" ()
private sub form_initialize()
init***moncontrols
end sub
注意：千萬不要在form_load()事件下寫init***moncontrols這句話，否則你的窗體會啟動不了。（不要怪我沒告訴你啊~~~~）
②：建立乙個和你的.exe同名的.exe.manifest檔案（假如：如果你最後編譯好的檔名為windowxpstyle.exe，則建立乙個檔名為windowxpstyle.exe.manifest的檔案），並且此檔案必須存在於和你exe檔案的同一目錄下。
以windowxpstyle.exe為例，則這個windowxpstyle.exe.manifest的檔案的內容如下：
<?xml version="1.0" encoding="utf-8" standalone="yes"?>
version="1.0.0.0"
processorarchitecture="x86"
type="win32"
/>
type="win32"
name="microsoft.windows.***mon-controls"
version="6.0.0.0"
processorarchitecture="x86"
publickeytoken="6595b64144ccf1df"
language="*"
將以上內容儲存為windowxpstyle.exe.manifest。並且和執行檔案放在乙個目錄下（一定要記住）。
到此為止，我們的程式已經完成，不過在vb的設計環境下執行是看不到xp效果的。必須編譯成可執行檔案執行才可以。（因為這個我試了不知多少遍，以為vb程式就是實現不了xp效果呢~~，沒想到必須編譯成執行檔案才可以）。
常見問題和注意事項
由於vb6自身的原因，windows xp再一次給我們留了一些難題：
一、工具欄問題：工具欄控制項一定要用microsoft windows ***mon controls 5.0，而不要用microsoft windows ***mon controls 6.0。因為此init***moncontrols api函式是位於***ctl32.dll（microsoft windows ***mon controls 5.0控制項的動態鏈結庫中）。
二、圖形風格按鈕的問題：很遺憾，我們不能再使用graphical風格的命令按鈕（即style=1的命令按鈕控制項）了。因為一旦將命令按鈕的style屬性設為1，那麼它將失去windows xp風格。
VB程式實現WindowsXP效果的介面
雖然windowsxp 的介面非常華麗。但是令人遺憾的是，我們用vb 寫的程式除了選單和視窗的外觀是xp風格外，其他控制項還是一如既往的是普通風格。我想，有的程式在xp下有xp的風格，vb 也一定有辦法實現xp的風格。後來筆者在網上看到一篇介紹xml的文章，又在網上找到了一篇實現xp風格的文章，經過...
VB程式實現WindowsXP效果的介面
在看完 vb程式實現windowsxp效果的介面 一文後，感覺非常好，用vb也能做出xp風格的介面。但是有乙個可能讓大家都覺得不太舒服或者說很累贅的地方。就是在 vb程式實現windowsxp效果的介面 一文的具體實現方法的第2點裡，說 建立乙個和你的.exe同名的.exe.manifest檔案 假...
vb 打包程式
visual basic 安裝程式製作 安裝程式製作是做專案必不可少的一道工序，網上的安裝軟體很多，可以用五花八門來開形容了 在此筆者介紹乙個最簡單的安裝方法，就是用 自帶的打包程式進行打包，雖然比較普通，不過內部卻有不少竅門，相信這一點知道的人可能不多吧！請大家一定看到最後，好戲在後頭 好了，不廢...