如何在VB6下得到XP样式的菜单？？？

Question

别告诉我不可能，因为我见过了。

Answer 1

是不是可以用FindWindow
用Spy＋＋查一下

Answer 2

Chice写过，我还没修改，7月6日我发布吧

Answer 3

XP菜单
http://www.dapha.net/down/list.asp?id=1863
XP下拉菜单(影子效果,酷!!!)
http://www.dapha.net/down/list.asp?id=426

Answer 4

[email protected] 谢谢各位了，给小弟发一份

Answer 5

[email protected]
也给我一份，谢谢先

Answer 6

[email protected]
我也要一份

Answer 7

如果只在XP下运行，只需一个文件即可：
假设编译好的文件是a.exe 写一个文本文件，文件名为：a.manifest，内容如下：<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
<assemblyIdentity
    version="1.0.0.0"
    processorArchitecture="x86"
    name="YourApp"
    type="win32"
/>
<description>Your app description here</description>
<dependency>
    <dependentAssembly>
        <assemblyIdentity
            type="win32"
            name="Microsoft.Windows.Common-Controls"
            version="6.0.0.0"
            processorArchitecture="X86"
            publicKeyToken="6595b64144ccf1df"
            language="*"
        />
    </dependentAssembly>
</dependency>
</assembly>注意要用UltraEdit等工具转换成UTF-8编码.放在同一目录下，然后运行a.exe发现菜单，按钮，列表框全变成xp风格的了，爽！

Answer 8

在VB开发环境中，您也许见多了XP菜单源码或控件，但是至今为止你也许没有找到一款适应目前所有操作系统、没有BUG、全面支持MDI窗口和系统菜单、完全模拟MS OfficeXP 风格菜单的XP菜单控件，VsNetMenu就是这样一款您已经找了很久的菜单控件，她号称VB下实现XP风格菜单的终极控件，纯VB6开发，零代码轻松实现XP菜单效果
　　下载地址：http://5ivb.net/club/dispbbs.asp?boardID=113&ID=18997　　ftp://upload:[email protected]/vsnetmenu.exe

Answer 9

下载地址一：ftp://upload:[email protected]/vsnetmenu0710.exe
下载地址二：http://www.emugua.net/mgrj/vbangle/VsNetMenu.exe
下载地址三：http://www.dapha.net/source/good/VsNetMenu.rar
下载地址四：http://dapha.0air.com/vb/ocx/VsNetMenu.rar　　除Delphi或VC++外，在VB开发环境中，您也许见多了XP菜单源码或控件，但是至今为止你也许没有找到一款适应目前所有操作系统、没有BUG、全面支持MDI窗口和系统菜单、完全模拟MS OfficeXP 风格菜单的XP菜单控件，VsNetMenu就是这样一款您已经找了很久的菜单控件，她号称VB下实现XP风格菜单的终极控件，纯VB6开发，零代码轻松实现XP菜单效果。
　　1、自适应操作系统(Win98/Me、2000、NT、XP)，用VB实现MS OfficeXP & Vs .Net 风格菜单的终极代码。
　　2、除实现一般VB菜单的XP化外，还支持系统菜单XP化；解决了MDI窗口自绘菜单的老大难，支持MDI窗口加入图标、MDI子窗口主菜单光标移入效果。
　　3、如何用VB插件(Implements)技术将VC生成的Tlb转换为VB代码。
　　4、在VB中使用汇编语言技术实现无崩溃Hook、SubClass。
　　5、自定义菜单字体，包括使用系统菜单字体或是其它自设字体。
　　6、有关MDI窗口一些鲜为人知的总结。
　　7、vbPicTypeIcon类型Picture与vbPicTypeBitmap类型Picture的互转。
　　8、其它有关Win98/Me与XP下菜单诸多表现不同处理。
　　9、VB的Menu类详细处理。
　　10、图片处理技术，…………控件使用特别说明　　1、您只需放一个VsNetMenu控件到每个窗口上。　　2、最好每个窗口上都放一个VsNetMenu控件，虽然MDI窗口的子窗口上不放也能实现XP效果，但是当MDI子窗口没有最大化时子窗口的系统菜单没有XP效果，解决办法：MDI子窗口上也放一个VsNetMenu控件。　　3、要想实现主菜单上的分隔符，只需在VB开发环境IDE下“菜单编辑器”中的第一行(其它地方也可)插入一个标题为" "(为半角的空格)的顶级菜单，命名为mnuSep1等，并在“可见”上打“√”。　　4、怎样使用系统菜单字体？首先在窗口上添加的“VsNetMenu”控件上右击鼠标，在弹出菜单选“属性”，在弹出的“属性页”中选“菜单图标”并在当页的“使用系统字体”前打“√”。然后就可以验证是不是使用的系统菜单字体了，首先在桌面上单击右键，在弹出的菜单中选“属性”，弹出“显示　属性”窗口，选“外观”选项卡，设置菜单为其它某种字体后运行自己的程序，看看是不是改变了菜单字体为刚才你所设置的。