首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm,该程序是不完整的。在窗体上有一个名称为Textl的文本框,3个命令按钮,名称分别是Commandl、Command2和Command3,标题分别是“读入”、“加密转换”和“保存”。要求程序运行
在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm,该程序是不完整的。在窗体上有一个名称为Textl的文本框,3个命令按钮,名称分别是Commandl、Command2和Command3,标题分别是“读入”、“加密转换”和“保存”。要求程序运行
admin
2010-07-13
46
问题
在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm,该程序是不完整的。在窗体上有一个名称为Textl的文本框,3个命令按钮,名称分别是Commandl、Command2和Command3,标题分别是“读入”、“加密转换”和“保存”。要求程序运行后,单击“读入”按钮,将文本文件in5.txt(该文件在考生文件夹下)中的文本信息读入文本框Textl中;单击“加密转换”按钮将Textl中的小写英文字母加密转换,并将转换(变为大写)后的结果显示到Textl中。加密方式是该字母对应字母表中的后一个位置的字母,如“a”加密后是“b”,转换方式为转换成加密后的字母对应字母的大写形式。例如,转换前的字母是“a”,则转换后的是“B”;单击“保存”按钮,则将转换后的文本框中的文本保存到out5.txt文件中(该文件保存到考生文件夹下)。程序运行的窗体界面如图11—7所示。
注意:请在有“?”的地方填入正确的程序代码,然后删除“?”及代码前的所有注释符号(即“’”号),但不能修改其他部分。修改后的程序文件都保存,存盘时不得修改文件夹和文件名。
选项
答案
在原来字符的ASCII码加上一个整数(题目要求为1)转换为其他的字符,然后再将加密后的字符显示在文本框中。这要用到Chr函数和Asc函数。Chr函数返回String,其中包含与指定的字符代码相关的字符。其语法格式为:Chr(charcode)。charcode是必要参数,是一个用来识别某字符的Long型。Asc函数返回一个Integer,代表字符串中首字母的字符代码。其语法格式为:Asc(string)。string必要的参数,可以是任何有效的字符串表达式。 根据题意,将一个文本框控件和3个命令按钮添加到窗体中,文本框的名称为Textl、Text属性为空,命令按钮的名称分别为Commandl、Command2和Command3,Caption属性分别为“读人”、“加密转换”和“保存”。双击Commandl进入代码窗口,补充后的具体代码如下: Dim Tel As String Private Sub Commandl_Click() Dim str As String ’ str="" Textl.Text=""’初始化Textl的文本 Open App.Path&"\in.txt"For
Input
As#l’打开文件,进行读取 While EOF(1)=False ’判断文件是否读取完 Input#1,str’读取文本 Textl.
Text
=Textl.
Text
+str Wend Close#1 End Sub Private Sub Command2_Click() Dim str As String Dim tmp As String Dim i As Integer str="" rel="" Textl.Text="" ’初始化Textl的文本 Open App.Path&"\in.txt"For Input As#1’打开文件,进行读取 While EOF(1)=False ’判断文件是否读取完 Input#l,str’读取文本 For i=1 To
Len
(str) tmp=Mid(str,i,1) ’将str中的字符逐个传给tmp进行判断 If Asc(tmp)>=Asc("a")And Asc(tmp)<=Asc("z")Then tmp=Chr((Asc(trap)+1-Asc("a")+26)Mod 26+Asc("a")) ’向后移一位,如果到最后为Z则变为a tmp=
UCase
(tmp) ’如果是小写字母,则将其转换成大写 End If rel=rel+tmp’将字符连接起来 Next i Textl.
Text
=Textl.
Text
+rel’在Text1中显示转换后文本 Wend Close#1 End Sub Private Sub Command3_Click() Open"App.Path&\out5.txt"For Output As#2 Print#2,rel’将转换后的文本存入文件中 Close#2 End Sub 单击[*]按钮运行程序,并按要求保存。
解析
转载请注明原文地址:https://kaotiyun.com/show/9Gmp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
执行下列程序后,输出结果为()。publicclassTest{publicstaticvoidmain(String[]args){StringBuffersb=newStri
数据字典是各类数据描述的集合,它通常包括5个部分,即数据项、数据结构、数据流、【】和处理过程。
下列不属于JComponent类的功能的是( )。
在Java新的I/O功能中,通过文件锁定来实现多个线程的【】,避免了可能存在的安全隐患。
Java的简单性首先体现在自身系统的精炼上,它的基本解释程序和【】占内存40KB,附加的基本标准类库和支持线程程序占175KB。
下面的程序用“冒泡”法将数组a中的10个整数按升序排列,请在横线处将程序补充完整。publicclassSun{publicstaticvoidmain(Stringargs[]){int[]a={678,45,324,528,439,3
运行下面的程序时,会产生( )。publicclassTest{publicstaticvoidmain(Stringargs[]){intx=0;inty
下列程序的功能是创建了一个显示5个"Hello!"的线程并启动运行,请将程序补充完整。publicclassThreadTestextendsThread{publicstaticvoidmain(Stringargs[]){Thre
随机试题
患者女,55岁,因左侧耳闷伴耳鸣1月余就诊。门诊电耳镜检查:左侧外耳道通畅,鼓膜完整,混浊,光锥消失。左颈部可及一实性包块,约3cm×2cm大小,活动差。该患者CT发现鼻腔及鼻窦未见明显新生物,按照TNM分期,最可能正确的是
A.促进钙离子释出B.抑制镁离子释出C.抑制骨吸收D.吸收镁离子E.抑制磷的回吸收甲状旁腺激素对骨的主要作用是
A.IP的固有特征B.输入到影像读出装置的信号和输出信号之间的关系C.影像处理功能D.检测功能E.影像记录装置CR系统运行的四象限理论,第三象限表示
根据我国公司法的规定,上市公司是指其股票在证券交易所上市交易的股份有限公司。下列有关上市公司的描述中,正确的有:()
项目目标动态控制的纠偏措施主要包括()。
某“营改增”的增值税一般纳税人2017年1月出售一栋外购办公楼,取得价款9200万元。该办公楼2013年1月4日购置时支付价款5500万元。该纳税人选择按“简易计税方法”计算增值税。则该纳税人应在办公楼所在地地税局预缴增值税为()万元。
税务咨询最主要的内容是()。
下列不属于欧洲债券市场的参与者的是()。
具有“先存款后消费”特点的银行卡是()。
[*]
最新回复
(
0
)