首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,其中,己给出了所有控件(如图3—141所示)和部分程序。 程序运行时,请按以下顺序操作: 1)单击“读入文件”按钮,把考生目录下的文件in5.dat中的内容读入内存并显示在上面的文本框(Tex
在考生文件夹下有一个工程文件sjt5.vbp,其中,己给出了所有控件(如图3—141所示)和部分程序。 程序运行时,请按以下顺序操作: 1)单击“读入文件”按钮,把考生目录下的文件in5.dat中的内容读入内存并显示在上面的文本框(Tex
admin
2019-05-14
20
问题
在考生文件夹下有一个工程文件sjt5.vbp,其中,己给出了所有控件(如图3—141所示)和部分程序。
程序运行时,请按以下顺序操作:
1)单击“读入文件”按钮,把考生目录下的文件in5.dat中的内容读入内存并显示在上面的文本框(Text1)中;
2)单击“加密”按钮,则可对Text1中的内容进行加密并显示在下面的文本框(Text2)中。
3)单击“存结果”按钮则把Text2中的内容存到out5.dat文件中。
加密规则:对于第奇数个字符,若是字母,则把它变为它后面的字符(若为“Z”则变为“A”),不是字母则不变;对于第偶数个字符,若是字母,则把它变为它前面的字符(若为“A”则变为“Z”),不是字母则不变。大小写字母都遵循此规则。例如:
若原有的字符是:AbbaZGHa-MnnKYzx
则加密后的字符是:BaczAFGb-NmoiXaw
已经给出“存结果”按钮的Click事件过程和函数isletter,函数isletter(aAsString)判断变量a中是否为一个字母,若是则返回True,否则返回False,可以直接调用。
请编写“读入文件”按钮和“加密”按钮的Click事件过程,以实现上述功能。(in5.dat文件中只含英文单词和空格,不分段落和行)
注意:考生不得修改已经存在的程序,必须用“存结果”按钮存储加密结果,否则无成绩。最后,按原文件名把程序存盘。
选项
答案
【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sjt5.vbp,在代码编辑窗口指定位置编写以下代码。参考代码: Private Sub Command1_Click() Open"in5.dat"For Input As 1 Line Input #1,s Close #1 Text1.Text=s End Sub Private Sub Command2_Click() Dim i As Integer,ss As String ss= " " For i=1 To Len(s) rf isletter(Nid(s,i,1))=True Then If i Mod 2=0 Then Tf Mid(s,i,1)="a"Then ss = ss & "z" Elsetf Hid(s,i,1)="A"Then ss=ss & "z" Else ss = ss & Chr(Asc(Mid(s,i,1))-1) End If Else Tf Mid(s,i,1)= "z" Then ss = ss & "A" Else If Mid(s,i,1)="z"Then ss = ss & "a" Else s = ss & Chr(Asc(Mid(s,i,1))+1) End If End If Else ss = ss & Mid(s, i, 1) End If Next Text2.Text=ss End Sub 步骤2:按
键运行程序,先单击“读入文件”按钮,接着单击“加密”按钮,然后单击“存结果”按钮保存结果,最后单击窗体右上角的关闭按钮结束程序。 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://jikaoti.com/ti/fSN0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在考生文件夹下有一个工程文件sit3.vbp,相应的窗体文件为sit3.frm,包含了所有控件和部分程序,如图3—90所示。要求如下:①利用属性窗口向列表框添加四个项目:VisualBasic、TurboC、C++、Java。②请编写适当的程
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimxAsIntegerStaticsAsIntegerx=Val(InputBox("请输入一个正整数="
考生文件夹下有一个工程文件sjt3.vbp,其功能是:①单击“读数据”按钮,则将考生文件夹下in3.dat文件中的100个0~999的整数读入到数组a中;②单击“计算”按钮,则找出这100个整数中的所有水仙花数,并将它们的最大值与最小值分别显示在文本框
下面关于VB应用程序的叙述中正确的是
以下关于VB对象属性的叙述中,错误的是
下面描述中不属于数据库系统特点的是
下面属于白盒测试方法的是
在考生文件夹下有一个工程文件sjt5.vbp,窗体上有三个文本框,其名称分别为Text1、Text2和Text3,其中Text1、Text2可多行显示。请添加三个命令按钮,名称分别为Cmd1、Cmd2和Cmd3,标题分别为“产生数组”、“统计”和“退出”,
为了删除列表框中的一个列表项,应使用的列表框方法是
现有程序如下:OptionBase1PrivateSubForm_Click()Dimx(5,6)AsInteger,y(5)AsIntegerFori=1To5Forj=1To6x(i,j)=Int(Rnd*9+1)
随机试题
法国最高行政法院最主要的职权是()
2型糖尿病患者胰岛素的分泌方式为
【背景资料】某省重点水利工程项目计划于2009年12月开工,由于工程复杂,技术难度大,一般施工队伍难以胜任,业主自行决定采取邀请招标方式。于2009年9月8日向通过资格预审的A、B、C、D、E五家施工企业发出投标邀请书。该五家施工企业均接受了邀请
首次公开发行股票,发行人应按第9号准则的要求制作和报送申请文件。未按第9号准则的要求制作和报送申请文件的,中国证监会按照有关规定不予受理。()
某投资方案的现值指数小于1,说明()。
某企业运用提前期法来确定各车间的生产任务,12月份装配车间(最后车间)应该生产到500号,产品的平均日产量为10台。该产品在机械加工车间的出产提前期为40天,生产周期为50天。根据以上资料,回答下列问题:提前期法适合()类
某企业按照政府统一会计政策计算出年度利润总额300万元,当年发生的公益捐赠共60万元,包括直接给受灾灾民发放慰问金10万元,通过市级政府机关对受灾地区捐赠50万元,其当年可以扣除的公益捐赠支出额是()万元。
彼得原理:是美国学者劳伦斯.彼得在对组织中人员晋升的相关现象研究后得出的一个结论,即在各种组织中,由于习惯于对在某个等级上称职的人员进行晋升提拔,因而雇员总是趋向于晋升到其不称职的地位。彼得原理有时也被称为“向上爬”原理。下列现象中符合彼得原理的是()
F公司有一投资方案,具体资料如下:该公司打算购入一台设备,价款为1500万元,预计使用3年,直线法折旧,预计期末无残值,会计处理与税法规定一致。设备投产后预计未来3年的销售收入分别为1200万元、2000万元和1500万元;付现成本(不含利息)分别为400
下列关于《中华民国临时政府组织大纲》内容的表述,正确的有()。(2009年多选62)
最新回复
(
0
)