用vb对输入的英文单词加密.

来源：学生作业帮编辑：神马作文网作业帮分类：数学作业时间：2024/09/23 15:31:01

用vb对输入的英文单词加密.
要求,首尾互换,保持首字母大写,其余字母小写,单词长度为偶数时处于单词中间的两个字母互换,而长度为奇数时处于单词中间的字母按字母表顺序后移两位.如study变成Ytwds.

长度为奇数时,首尾字母用交换吗?
Private Sub Command1_Click()
a = InputBox("请输入字符")
If Len(a) Mod 2 = 0 Then
b = Mid(a,Len(a) / 2 + 1,1)
c = Mid(a,Len(a) / 2,1)
Mid(a,Len(a) / 2) = b
Mid(a,Len(a) / 2 + 1) = c
Mid(a,1) = UCase(Left(a,1))
Else
Mid(a,Len(a) / 2 + 0.5) = Chr(Asc(Mid(a,Len(a) / 2 + 0.5,1)) + 2)
e = Left(a,1) ' 奇数不用首尾颠倒可删除
Mid(a,1) = Right(a,1) ' 奇数不用首尾颠倒可删除
Mid(a,Len(a)) = e ' 奇数不用首尾颠倒可删除
Mid(a,1) = UCase(Left(a,1))
End If
Print a
End Su

VB编程常用英文单词?输入程序代码时常用的、还有属性中的英文单词等. C++程序中,对一个三位数每位数字加6后除以10取余数（加密）,如何解密,输入加密后的,输出原数. VB编程：输入一个数,求它的自然数对, 输入一段英文,找出字母a出现次数最多的英文单词的vb编程怎么写用vb编写程序代码,题目是输入20个英文单词,统计期中以D字母（大小写均可）的单词有多少个? 用vb编写程序代码,题目是输入20个英文单词,统计期中以D字母（大小写均可）结尾的单词有多少个? 用vb编程：输入三个数,求出最大的数 VB编程时常遇到的英文单词? 英文单词的音标怎么输入? 求会做VB的做一个程序内容是：求输入一段英文找出字母a出现次数最多的英文单词.大致就是这个意思. VB调用lingo请各位大侠多多指教!用lingo计算线性规划,变量和约束条件的上限由VB界面输入确定,最后,再用VB读编写程序,实现对任意字符串的加密和解密操作.其中,对大小写英文字母的加密规则