VB.NET里最方面的XP风格解决方案
来源:互联网 发布:淘宝评价流程 编辑:程序博客网 时间:2024/06/09 15:00
将以下代码添加到InitializeComponent()之后
On Error Resume Next
Dim y As Integer
Dim AppName As String
Dim ManFileName As String
Dim FullAppExeNameAndPath As String
FullAppExeNameAndPath = Application.ExecutablePath
y = Application.StartupPath.Length
' y = FullAppExeNameAndPath.LastIndexOf("")
y = y + 1
AppName = FullAppExeNameAndPath.Substring(y, FullAppExeNameAndPath.Length - y)
ManFileName = AppName & ".manifest"
If System.IO.File.Exists(ManFileName) = False Then
FileOpen(1, ManFileName, OpenMode.Binary)
FilePut(1, "<?xml version='1.0' encoding='UTF-8' standalone='yes'?>" & Environment.NewLine)
FilePut(1, "<assembly xmlns='urn:schemas-microsoft-com:asm.v1' manifestVersion='1.0'>" & Environment.NewLine)
FilePut(1, "<assemblyIdentity version='1.0.0.0' processorArchitecture='X86' name='zx.exe' type='win32' />" & Environment.NewLine)
FilePut(1, "<description>zxapplication</description>" & Environment.NewLine)
FilePut(1, "<dependency>" & Environment.NewLine)
FilePut(1, "<dependentAssembly>" & Environment.NewLine)
FilePut(1, "<assemblyIdentity type='win32' name='Microsoft.Windows.Common-Controls' version='6.0.0.0' processorArchitecture='X86' publicKeyToken='6595b64144ccf1df' language='*' />" & Environment.NewLine)
FilePut(1, "</dependentAssembly>" & Environment.NewLine)
FilePut(1, "</dependency>" & Environment.NewLine)
FilePut(1, "</assembly>" & Environment.NewLine)
FileClose(1)
End If
- VB.NET里最方面的XP风格解决方案
- 用C#和VB.NET实现VS.NET或Office XP风格的菜单(一)
- 用C#和VB.NET实现VS.NET或Office XP风格的菜单(二)
- 用C#和VB.NET实现VS.NET或Office XP风格的菜单(三)
- 用C#和VB.NET实现VS.NET或Office XP风格的菜单(一)
- 用C#和VB.NET实现VS.NET或Office XP风格的菜单(一)
- 用C#和VB.NET实现VS.NET或Office XP风格的菜单(三)
- 用C#和VB.NET实现VS.NET或Office XP风格的菜单(二)
- Wince5.0下实现XP风格的开始菜单源码(VB.net编码实现)
- 在VB.NET中使用XP风格界面
- VB.Net语言方面的改进(轉)
- [VB.NET]vb.net update 方面问题...
- VB方面的网站
- VB.NET里的MD5加密函数
- VB如何生成WINDOW XP风格界面!
- [VB.NET]关于VB.NET程序生成的方面的问题
- 如何使得.Net程序具有XP控件的样式风格
- vb.net 修改文件内容的解决方案
- JAR的解释~
- vb.net中windows服务的创建
- 由浅至深,谈谈.NET混淆原理 (一)
- 由浅至深,谈谈.NET混淆原理 (二) 最简单的混淆
- 如何编写DLL文件
- VB.NET里最方面的XP风格解决方案
- 由浅至深 谈谈.NET混淆原理 (三)-- 流程混淆
- 手工查杀木马病毒
- 基于Visual C++6.0的DLL编程实现
- 东实验楼arp病毒
- 由浅至深 谈谈.NET混淆原理 (三)-- 流程混淆(续)
- VB.NET中使用FTP下载文件的两种方法
- 转行还是继续打拼!?
- 2007年中国大学毕业生薪水排行榜(名单)