题目
Private Sub Command1 _Click()
Dim i As Integer
For i = 0 To 1 2
Print();Space(2)
Next i
End Sub
第2题
有一行电文,已按下面规律译成密码:
即第1个字母变成第26个字母,第i个字母变成第(26-i+1)个字母,非字母字符不变。要求编程序将密码译回原文,并输出密码和原文。
第6题
以下过程的作用是将26个小写字母逆序打印出来,请补充完整。
Sub Inverse()
For i=122 To 【10】
Print 【11】 ;
Next i
End Sub
第7题
第8题
给定明文“plaintext”,采用向前移位算法加密,密钥为63152(每个数字表示其对应字母在英文字母表中向前移动的位数),密钥自动循环使用,请写出加密后的密文,并给出明文中每个字母的加密过程。
第9题
下列程序的功能是将字符串“abcde”逆序打印出来。请填写空白处以完善程序。 Munction rev(str1)As String B = Mid(,1,1) If B =""Then rev ="" Else rev = rev(Mid(str1,2))+b End If End Function Private Sub Form_Click() old ="abcde" Print rev(old) End Sub
第10题
以下过程的作用是将26个小写字母逆序打印出来,请填空。
Sub Inverse()
Fori=122 To______
PrintChr$(i);
Nexti
End Sub
为了保护您的账号安全,请在“赏学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!