求教高手:vb界面可以优化msgbox像vista 那样淡出淡入的漂亮效果吗?在普通的显卡上显示。 求教高手:vb界面可以优化msgbox像vista 那样淡出淡入的漂亮效果吗?在普通的显卡上显示。另外我还想把界面改成windows xp这样的风格有例子看看吗, 谢谢```` 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 xp风格首先创建一个文件,文件名一定要是这样的格式:“EXE名.Manifest”,其中“EXE名”是你生成EXE后的文件名。如:你生成后的文件是“MyExe.exe”,则你先要在放有“MyExe.exe”文件的同一目录创建一文件“MyExe.exe.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="Company.Product.ffdshow.ax" type="win32" /> <description>WindowsExecutable</description> <dependency> <dependentAssembly> <assemblyIdentity type="win32" name="Microsoft.Windows.Common-Controls" version="6.0.0.0" processorArchitecture="X86" publicKeyToken="6595b64144ccf1df" language="*" /> </dependentAssembly> </dependency> </assembly> 然后再在你的程序里面加入以下代码: Private Declare Sub InitCommonControls Lib "comctl32.dll" () Private Sub Form_Initialize() InitCommonControls End Sub 这样你的控件就不再是VB6提供的平凡的模式,而是XP的样式! 或者你再程序里加入Private Declare Sub InitCommonControls Lib "comctl32.dll" () Private Sub Form_Initialize() InitCommonControls End Sub 这段代码后,用exescope打开你的文件 点工具栏上的 xp样式,就好了 只要你可以获得它的窗口句柄,就什么都好说!得到窗口句柄后,使用SetLayeredWindowAttributes函数再加个定时器就可以实现了! sandrer,能跟据你的思路, 给个示例吗,我是新手,哪个效果更好的,给高分一点 SetLayeredWindowAttributes这个我在色球的制作当中也用到过。目前的V1.04版本还是应用这个函数来实现透明度渐变效果的。www.colorlinez.cn不过下一版本V1.1中,将取消该函数的使用 楼主修改自己的帖子好像不允许了 是么 (VB)怎么把焦点(按照窗体里面不同控件各自的tabindex属性顺序)依次放到不同的控件上? "进销存管理系统"和"库存管理系统"用英文怎么说? VB 怎样判断一个数 ( a / 2 ) 带不带小数点阿 马上给分了 TreeView树结构的问题,请教高手.解决后给100分. 如何去掉MDIform标题栏上的最大化的按钮呀,高手明示! 在richtextbox中,为什么无段前空阁???????? 拿钱找人写一个输入法?? 在VB中 如何将WORD文档中的表格数据(文本)? 请看里面 怎样获取网页中的超链接地址?? 菜鸟问个问题
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
<assemblyIdentity version="1.0.0.0" processorArchitecture="X86" name="Company.Product.ffdshow.ax" type="win32" />
<description>WindowsExecutable</description>
<dependency>
<dependentAssembly>
<assemblyIdentity type="win32" name="Microsoft.Windows.Common-Controls" version="6.0.0.0" processorArchitecture="X86" publicKeyToken="6595b64144ccf1df" language="*" />
</dependentAssembly>
</dependency>
</assembly> 然后再在你的程序里面加入以下代码: Private Declare Sub InitCommonControls Lib "comctl32.dll" () Private Sub Form_Initialize()
InitCommonControls
End Sub 这样你的控件就不再是VB6提供的平凡的模式,而是XP的样式!
InitCommonControls
End Sub 这段代码后,用exescope打开你的文件 点工具栏上的 xp样式,就好了
得到窗口句柄后,使用SetLayeredWindowAttributes函数再加个定时器就可以实现了!
这个我在色球的制作当中也用到过。目前的V1.04版本还是应用这个函数来实现透明度渐变效果的。
www.colorlinez.cn不过下一版本V1.1中,将取消该函数的使用