首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读以下说明及Visual Basic 程序代码,将应填入(n)处的字句写在对应栏内。 [说明] 本程序将利用文本框txtInput 输入的一行字符串中的所有字母加密,加密,加密结果在文本txtCode中显示。加密方法如下:将每个字母的序号移动5个位
阅读以下说明及Visual Basic 程序代码,将应填入(n)处的字句写在对应栏内。 [说明] 本程序将利用文本框txtInput 输入的一行字符串中的所有字母加密,加密,加密结果在文本txtCode中显示。加密方法如下:将每个字母的序号移动5个位
admin
2009-02-15
88
问题
阅读以下说明及Visual Basic 程序代码,将应填入(n)处的字句写在对应栏内。
[说明]
本程序将利用文本框txtInput 输入的一行字符串中的所有字母加密,加密,加密结果在文本txtCode中显示。加密方法如下:将每个字母的序号移动5个位置,即“A”->“F”“a”->“f”,“B”->“G”……“Y”->“D”,“Z”->“E”。程序段如下:
[Visual Basic 代码]
Private Sub Form_ Click()
Dim strInput As String*70 ; 输入字符串
Dim Code as String*70 ;加密结果
Dim strTemp As String*1 ;当前处理的字符
Dim i as Integer
Dim Length As Integer ;字符串长度
Dim iAsc As Integer ;第i个字ASCII码
(1) ;取字符串
i=1
Code=“”
(2) ;去掉字符串右边的空格,求真正的长度
Do While(i<=Length)
(3) ;取第i个字符
If (strTemp>="A" And strTemp<="Z’,) Then
iAsc= Asc (strTemp)+5
If iAsc>Asc(“Z”)Then iAsc=iAsc-26
Code=Left$(Code,i-1)+Chr$ (iAsc)
ElseIf (strTemp>="a" And strTemp<="z") Then
iAsc=Asc(strTemp)+5
If iAsc>Asc (“z”) TheniAsc=iAsc-26
Code=Left$(Code,i-1)+Chr$(iAsc)
Else
Code=Left$(Code,i-1)+strTemp
End If
(4)
Loop
(5);显示加密结果
End Sub
选项
答案
(1)strlnput=txtlnput. Text (2)Length=Len(RTrim(strInput)) (3)strTemp=Mid(strInput,i,1) (4)i=i+1 (5)txtCode.Text=Code
解析
转载请注明原文地址:https://kaotiyun.com/show/MojZ777K
本试题收录于:
程序员下午应用技术考试题库软考初级分类
0
程序员下午应用技术考试
软考初级
相关试题推荐
在Windows7中,剪贴板是用来在程序和文件间传递信息的临时存储区,此存储区是______。
在Excel的A1单元格中输入函数“=LEFT(“信息处理技术员”,2)”,按回车键后,A1单元格中的值为()。
下列不属于手机操作系统的是(28)。
在PowerPoint中,使用快捷键(55)可以使选定的文本添加下划线。
企业信息系统的用户一般不包括()。
为在Excel2010的A1单元格中生成一个60到100之间的随机数,则应在A1单元格中输入________________。
在Excel2010中,C3:C7单元格中的值分别为10、OK、20、YES和48,在。D7单元格中输入函数“=COUNT(C3:C7)”,按回车键后,D7单元格中显示的值为________________。
人类传播信息的五大类媒体按其出现的先后顺序排列为________。
打开DOC文档48.doc,有如下表格,欲在空白单元格中计算出整行其他四个单元格的数值之和,应在空白单元格中插入公式(48)。
阅读以下说明,回答问题1至问题4。说明某公司A楼高40层,每层高3.3米,同一楼层内任意两个房间最远传输距离不超过90米,A楼和B楼之间距离为500米,需在整个大楼进行综合布线,结构如图1-1所示。为满足公司业务发展的需要,要求为楼内客户机提供数
随机试题
以虫瘿入药的药材是()。
施工计划由设计单位及其领导部门负责制定。
职业性有害因素是指
依照《合伙企业法》规定,在下列哪些情形下,合伙人可以经其他合伙人一致决议而被除名?
世界银行最近决定,从2003年起,所有世行贷款项目一律使用()1999年新版合同范本。即:()、()、()和()。
审计人员在执行审计业务过程中采用各种方法获取的真实凭据用于_____________被审计单位会计报表所反映的财务状况和经营成果的公允性、合法性、一惯性的一切资料是审计证据。
下列对《食物成分表2002》中食物编码规则叙述正确的有()。[江苏2011年三级真题]
世界万物的变化,可以归结为两种基本力,即引力和非斥力。()
设y=e-x是微分方程xy’+p(x)y=x的一个解,求此微分方程满足条件y|x=ln2=0的特解。
Someconsumerresearchersdistinguishbetween"rational"motivesand"emotional"motives.Theyusetheterm"rationality"inthe
最新回复
(
0
)