首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,其中,己给出了所有控件(如图3—141所示)和部分程序。 程序运行时,请按以下顺序操作: 1)单击“读入文件”按钮,把考生目录下的文件in5.dat中的内容读入内存并显示在上面的文本框(Tex
在考生文件夹下有一个工程文件sjt5.vbp,其中,己给出了所有控件(如图3—141所示)和部分程序。 程序运行时,请按以下顺序操作: 1)单击“读入文件”按钮,把考生目录下的文件in5.dat中的内容读入内存并显示在上面的文本框(Tex
admin
2019-05-14
24
问题
在考生文件夹下有一个工程文件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://kaotiyun.com/show/RHUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生文件夹中有一个工程文件sjt5.vbp,如图3.129所示。运行程序时,从文件中渎入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是()。
数据库(DB)、数据库系统(DBS)和数据库管理系统(DBMS)之间的关系是()。
阅读程序:PrivateSubForm_Click()DimxAsInteger,yAsIntegerx=32:y=42CallPCS(x,y)Printx;yEndSubSubPCS(ByValnAsIntege
对于某些控件,只要将其Style属性设置为1,则可以在该控件上使用Picture属性显示图片。以下不具备这一使用规则的控件是
为了删除列表框中的一个列表项,应使用的列表框方法是
有下面程序代码:PrivateSubCommand1_Click()DimsignAsIntegersign=13a=1b=2Fork=1To5c=a+sign*ba=bb=cPrintc;sign=-signNe
设有下面程序代码:PrivateSubCommand1_Cliek()DimaAsVairanta=Array(22,43,23,56,87,45,67,12,98,98,56,34,23,75,64)m=a(0)n=mFork=1
在考生文件夹下有一个工程文件sjt5.vbp,包含了所有控件和部分程序。当程序运行时,单击“打开文件”按钮,则弹出“打开”对话框,默认目录为考生目录,默认文件类型为“文本文件”。选中in5.txt文件(如图1所示),单击“打开”按钮,则把文件中的内容读入并
随机试题
A、普鲁卡因B、利多卡因C、丁卡因D、布比卡因E、以上皆否毒性较小,既适用于浸润麻醉又适用于表面麻醉
BAGHDAD,Iraq—GunmenkidnappedafemaleAmericanjournalistandkilledherIraqitranslatorSaturday,Jan.7th,inwesternBaghd
对相当于第二底物的辅酶叙述错误的是
患者,女性,50岁。诊断为“冠心病、心绞痛”,遵医嘱给予吸氧,以下操作不正确的是
下列事件中,不属于工程变更的是()。【2010年真题】
承包商的索赔要求成立必须同时具备()。
下列不属于造成水平蔓延的主要途径和原因有()。
按污染物的特性划分的污染类型包括以下的()。
甲看见一女子乙在大街人才招聘信息栏处看信息,遂以介绍工作为名将其骗至自己的住处准备卖给他人为妻。乙发现骗局后要求离开,甲与丙合力对乙施以暴力致其重伤后将其捆绑。甲外出联系买主,在此期间丙趁机将乙强奸。甲遇人贩子丁,双方商定以2万元的价钱成交,丁随后又以3万
Hewantedtoshowusclearly______(他修理机器时是如何遇到麻烦的).
最新回复
(
0
)