现在的加密狗基本都支持各种语言的，主要看你加密的需求是什么选择合适型号的加密狗就可以。可以试试ROCKEY加密狗，大厂家也不贵。
创新互联是一家专业的成都网站建设公司，我们专注网站设计、做网站、网络营销、企业网站建设，买友情链接，一元广告为企业客户提供一站式建站解决方案，能带给客户新的互联网理念。从网站结构的规划UI设计到用户体验提高，创新互联力求做到尽善尽美。
"采用DES算法"这个说法不明确，首先是使用多少位的DES进行加密，通常是128位或192位，其次是，要先把主密钥转化成散列，才能供DES进行加密，转化的方法是什么没有明确，通常是md5，所以有的银行卡说是128位md5 3DS就是指用md5转换主密钥散列，用DES进行加密，但是DES本身是64位（包含校验码），2DES是128位，3DES是192位，但是没有2DES的叫法，所以128位、192位统称3DES
要完整的md5+3DS实例，需要100分以上，要不到我的空间中查找相关的文章
网上有很多专业的加密教程
最适合小开发者的软件加密方式就是下面这个
获取硬件信息和个人注册时的姓名手机号等一系列信息，通过预先设定好的加密函数进行散列加密，生成一个只有本人本机能使用的序列号，软件正版授权的时候用同样的方式生成序列号进行比对，一样则通过
最好的加密就是通过你的网站去加密！用网络服务器验证把一些主要程序都可以加载到服务器上！这样你的程序加密就完美了！ （个人观点纯属不懂装懂的。哈哈见笑）
Public Class Form1
Dim s As String
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim yingshe As String = TextBox1.Text
Dim news As String
Dim temp As String
Dim new_temp As String
Dim i As Integer
If ofDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
Dim objfile As New System.IO.StreamReader(ofDialog1.FileName)
s = objfile.ReadToEnd
objfile.Close()
End If
For i = 1 To Len(s)
temp = Microsoft.VisualBasic.Mid(s, i, 1)
Select Case Asc(temp)
Case 97 To 123
new_temp = Microsoft.VisualBasic.Mid(yingshe, Asc(temp) - 96, 1)
Case 65 To 91
new_temp = UCase(Microsoft.VisualBasic.Mid(yingshe, Asc(temp) - 64, 1))
Case Else
new_temp = temp
End Select
news = news new_temp
Next
Dim objfile1 As New System.IO.StreamWriter(ofDialog1.FileName)
objfile1.Write(news)
objfile1.Close()
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim objfile1 As New System.IO.StreamWriter(ofDialog1.FileName)
objfile1.Write(s)
objfile1.Close()
MessageBox.Show("成功解密了")
End Sub
End Class
所需要的控件有按钮两个，一个加密，一个解密，文本框一个，里面是26个字母的对应表，比如bcdefghijklmnopqrstuvwxyza的话，就把a 改变为 b。
.Net软件
特点,
些强
编译工具
.Net
执行文件进行反编译操作,并
相应
IL代码甚至
源代码
即使
采用混淆工具
及强命名工具
能
根本
解决问题,代码依
容易
Reflectoer等工具反编译源代码
软件加密狗：威步(WIBU)
CodeMeter,AxProtector(for.net)两款软件加密狗性能非
错
反编译
问题,与传统
代码混淆工具（Obfuscator）
同,AxProtector
完全阻止
.NET
程序集（由
C#,
VB.NET,
Delphi.NET,
ASP.Net…
等语言编写）
反编译
通俗
讲,AxProtector
破解者
您
.NET
代码
间构建
强
防破解保护屏障,
基于
Windows
基于
MSIL
兼容格式文件
原始
.NET
代码完整
加密
封装
本
代码内,
论何
都
释放
硬盘,
于破解者
见
与单纯
.net加密软件
同,AxProtector与CodeMeter硬件加密狗配套餐使用,采用
更
严密
密钥管理,及
先进
AES、RSA、ECC等加密算
存储或传输密钥,保证通讯安全
.Net代码编译
.class
包含
源代码
所
信息（
包括注释）,尤其
其
保存
调试信息
候
所
按照
式编译
.class
文件
非
轻易
反编译
般软件
发商
采用
种叫做混淆器
工具
混淆器
作用
编译
代码进行混淆,使
其
反编译或者反编译
代码混乱难懂
由于混淆器
混淆
名称或流程,
能防止源代码
反编译,
混淆器
作用
增加
反编译
难度,
终
结
治标
治本
于
些掌握工具
说几乎
透明
AxProtector
款真
意义
加密源代码、防止反编译
.net软件加密软件
AxProtector加密
.net原代码,任何
候原代码都
能
原
硬盘
采用AxProtector加密
.net代码
程序调用或执行某
段函数
候,才能通
AxProtectorClass
内存
解密
返
程序
执行,运行
迅速立即加密
种随机加密、按需解密原代码
功能,能
防止.Net程序
反编译,同
能够
防止API加密点
摘除
效
保证
源代码
执行效率
安全性