VB中如何编写一个加密程序?

选中要设置的控件 按f4调出它的属性框 在其属性里面有个“passwordchar将其后面空中输入*就可以了。

Private Sub Command1_Click()用每个字母的Ascii码加7，相加之后的Ascii码值若超过90但不超过97，则减去10，若超过122，则减去8。

你这个需求很有意思啊，编写难度不是很大，但要考虑全面。运行效果如上图，代码如下所示：判断中我将大小写字母均按规则进行了转换。原创，亲测可用，转发请说明出处。