编号 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 |
加密字符 | V | i | s | u | a | l | B | A | S | I | C |
小明按照上述方法,设计了一个数字加密的VB程序,功能如下:单击“加密”按钮Command1,程序依次将文本框Text1中每个数字进行加密,并将加密后的密文在文本框Text2中输出。下表显示了数字“2018”的加密过程:
数字 | 2 | 0 | 1 | 8 |
位置 | 1 | 2 | 3 | 4 |
编号 | 3 | 2 | 4 | 1 |
加密字符 | s | i | u | V |
程序运行效果如图所示。
(1)设计如图所示的程序界面,除窗体外,至少还要使用__________个类(填数字)。
(2)实现上述功能的VB程序如下,请在划线处填入合适代码。
Private Sub Command1_Click()
Dim s As String,s1 As String,s2 As String,num As Integer
s =“VisualBASIC”.
S1 = Text1.Text
s2=“ ”
i=1
Do While①_____
num = Val(Mid(s1, i, 1))+i
num = num Mod 11
If num=0 Then num =11
s2=②______
i= i+1
Loop
Text2.Text =s2
End Sub
(3)若密文是“uAV”,则明文是__________。
同类型试题
y = sin x, x∈R, y∈[–1,1],周期为2π,函数图像以 x = (π/2) + kπ 为对称轴
y = arcsin x, x∈[–1,1], y∈[–π/2,π/2]
sin x = 0 ←→ arcsin x = 0
sin x = 1/2 ←→ arcsin x = π/6
sin x = √2/2 ←→ arcsin x = π/4
sin x = 1 ←→ arcsin x = π/2
y = sin x, x∈R, y∈[–1,1],周期为2π,函数图像以 x = (π/2) + kπ 为对称轴
y = arcsin x, x∈[–1,1], y∈[–π/2,π/2]
sin x = 0 ←→ arcsin x = 0
sin x = 1/2 ←→ arcsin x = π/6
sin x = √2/2 ←→ arcsin x = π/4
sin x = 1 ←→ arcsin x = π/2