首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下有一个工程文件sjt5.vbp,装入该工程文件。窗体上有一个名称为Text1 的文本框,三个命令按钮,名称分别为Command1、Command2和Command3,标题分别为“读文件”、“删除”和“计算/保存”。程序运行后,单击“读文件”命令
考生文件夹下有一个工程文件sjt5.vbp,装入该工程文件。窗体上有一个名称为Text1 的文本框,三个命令按钮,名称分别为Command1、Command2和Command3,标题分别为“读文件”、“删除”和“计算/保存”。程序运行后,单击“读文件”命令
admin
2019-05-14
47
问题
考生文件夹下有一个工程文件sjt5.vbp,装入该工程文件。窗体上有一个名称为Text1 的文本框,三个命令按钮,名称分别为Command1、Command2和Command3,标题分别为“读文件”、“删除”和“计算/保存”。程序运行后,单击“读文件”命令按钮,将in5.txt 文件中的内容显示在Text1 中,如图1-302(a)所示;单击“删除”命令按钮,删除Text1中的字母“A”、“D”、“R”和“S”(小写字母也删),并将删除后的文本显示在Text1中,如图1-302(b)所示;单击“计算/保存”命令按钮,则计算当前Text1中显示的所有字符(删除后)的ASCII 码之和,并把结果保存到考生文件夹下的out5.txt 文件中。
要求:
1)要删除的字母不区分大小写。
2)不要改变窗体中各控件的属性设置及事件过程。
3)编写“计算/保存”按钮的事件过程。
4)“删除”按钮的事件过程不完整,去掉程序中的注释符,把程序中的?改为正确的内容,使程序能正常运行。最后把修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开考生文件中的本题工程文件sjt5.vbp,在代码编辑窗口中,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: ch = Mid(Form1.Text1.Text, i, 1) tmpStr = tmpStr + ch 步骤2:按指定位置编写“计算/保存”按钮的单击事件过程。 参考代码: Private Sub Command3_Click() Dim i, j As Long Dim s As String s = Trim(Text1.Text) j = 0 For i = 1 To Len(s) j = j + Asc(Mid(s, i, 1)) Next Open "out5.txt" For Output As #1 Print #1, j Close #1 End Sub 步骤3:按要求将文件保存至考生文件夹中。 步骤4:按<F5>键运行程序,先单击“读文件”按钮,接着单击“删除”按钮,最后单击“计算/保存”按钮。
解析
转载请注明原文地址:https://jikaoti.com/ti/LSN0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在名称为Form1的窗体上画一个名称为Image1的图像框,并通过属性窗口为其装入考生文件夹中的图标文件CARS.ico;再画一个名称为Timer1的计时器,一个名称为Command1、标题为“开始”的命令按钮,如图所示。要求:通过属性窗口设置适当的属性
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimxAsIntegerStaticsAsIntegerx=Val(InputBox("请输入一个正整数="
设有如下事件过程:PrivateSubForm_Click()x=0Whilex10x=x+1x=x*xWendPrintxEndSub运行程序,单击窗体,输出结果是
下列过程定义正确的是()。
下面属于白盒测试方法的是
一个栈的初始状态为空。现将元素1,2,3,A,B,C依次入栈,然后再依次出栈,则元素出栈的顺序是
在考生文件夹下有一个工程文件sjt4.vbp,其窗体上有一个计时器和两个命令按钮。计时器Timer1的初始状态为不可用;2个命令按钮的初始标题分别是“演示”和“退出”。请添加一个名称为Label1,且能根据标题内容自动调整大小的标签,其标题为“Visual
为了删除列表框中的一个列表项,应使用的列表框方法是
窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件n.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下:PrivateSubCommand1_Click()Open"c:\f1.txt"For
设有下面程序代码: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
随机试题
翼外肌是由以下哪条神经支配的
维生素K可用于哪些疾病
在填筑排水反滤层前,应对坝基覆盖层进行试验分析。对于黏性土,做天然干密度、含水量及塑性指数试验;当塑性指数小于()时,尚需进行颗粒分析。
发行人应披露会计师事务所的审计意见类型。财务报表被出具带强调事项段的无保留审计意见的,应全文披露审计报告正文以及董事会、监事会及注册会计师对强调事项的详细说明。( )
2011年11月,田某为达到虚开增值税专用发票牟利的目的,伙同涂某,以涂某名义注册了永盛公司。永盛公司经营范围为中药材收购、销售、加工。12月,永盛公司取得一般纳税人资格,2011年12月至2012年6月田某以永盛公司销售中药材的名义,在仅有少量货物交易量
()含有众多酶系,是细胞中含酶最多的由两层膜包被的细胞器。
观看视频,根据要求回答问题。题目:《尊重幼儿》视频描述:一位幼儿教师在教授《动物的对话》时,让幼儿分角色表演。有一位幼儿问:“老师,我能不用书中的原话吗?’’老师和蔼地问:“为什么呢?”幼儿说:“书中的原话太长,我背不下来,但拿书表演,
古代警察的特点包括()
Whichoneofthefollowingfourisleastliketheotherthree?
StephenWilliamHawkingputforwarda______thataself-containeduniversemayhavenoedgeorboundary.
最新回复
(
0
)