加密程式是一個文本串可用事先給定的字母映射表進行加密的程式 。
基本介紹
- 中文名：加密程式
- 性質：概念
- 類型：程式
- 特點：加密
概述,VB加密舉例,
概述
一個文本串可用事先給定的字母映射表進行加密 。 例如，設字母映射表為：
abcdefghigklmnopqrstuvwxyz
ngzqtcobmuhelkpdawxfyivrsj
則字元串"encrypt"被加密為"tkzwsdf"。試寫一算法將輸入的文本串進行加密後輸出；另寫一算法，將輸入的已加密文本串進行解密後輸出。
VB加密舉例
Private Sub Command1_Click()
Dim a As String, b As String * 1
Dim I As Integer, c As String, d As String * 1
a = InputBox("輸入原始字元串")
For I = 1 To Len(a)
b = Mid(a, I, 1)
d = Chr(Asc(b) + 1)
c = c + d
Next I
Text1.Text = c
End Sub
此程式是把原數字或字母往後移一位
例：12345→23456
abcde→bcdef
大家可以試一下……
