求VB（VBA）中使用的DES算法

Question

各位高手，我想要将程序的登陆密码、用户名用DES算法加密后写在表里，求DES算法程序，并能给出使用方法，调试成功后马上结贴，请大家帮忙，谢谢各位。

Answer 1

http://www.china-askpro.com/msg1/qa88.shtmlhttp://www.ccw.com.cn/htm/app/aprog/01_5_9_3.asp

Answer 2

http://www.wisepeak.com/downloadall.htm

Answer 3

http://www.china-askpro.com/msg1/qa88.shtml的例子不知道解密为何不对，
不行呀，http://www.wisepeak.com/downloadall.htm要控件，
另一个http://www.ccw.com.cn/htm/app/aprog/01_5_9_3.asp没有详细代码，
麻烦大家帮帮忙。