首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件sjt4.vbp。该程序的功能是将文件in4.txt中的文本读出并在文本框Text1中显示。输入一个英文字母到文本框Text2中,然后单击“统计”命令按钮,统计该字母(大小写被认为是不同的字母)在文本中出现的次数,统计结果在标签
在考生文件夹中有一个工程文件sjt4.vbp。该程序的功能是将文件in4.txt中的文本读出并在文本框Text1中显示。输入一个英文字母到文本框Text2中,然后单击“统计”命令按钮,统计该字母(大小写被认为是不同的字母)在文本中出现的次数,统计结果在标签
admin
2019-08-21
77
问题
在考生文件夹中有一个工程文件sjt4.vbp。该程序的功能是将文件in4.txt中的文本读出并在文本框Text1中显示。输入一个英文字母到文本框Text2中,然后单击“统计”命令按钮,统计该字母(大小写被认为是不同的字母)在文本中出现的次数,统计结果在标签Label3中显示。
给出的窗体文件中已经有了全部控件,如图所示。程序不完整,要求:去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不能修改程序的其他部分和控件属性,最后将修改后的文件按原文件名进行存盘。
选项
答案
步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Private Sub Form+Load() Open App.Path&”\"in4.txt"For Input As#1 Line Input#1.s ’Text.1.Text=? Close#1 End Sub Private Sub Command1_Click() Dim n As Integer s=Text1.Text s1=RTrim(Text2.Text) Do p=InStr(?) If p<>0T hen n=n+1 s=Mid(s,p+1) ’Lmop While p?0 ’Label3.Caption=? End Sub 程序结束 参考答案 第1个?处填入:s 第2个?处填入:s,sl 第3个?处填入:<> 第4个?处填入:n 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
通过文件操作和“&”连接符将文件in4..txt中的文本读出并显示在文本框Text1中,在Command1 Click事件过程中,在文本框Text2中输入一个英文字母,然后单击“统计”命令按钮,统计该字母(大小写被认为是不同的字母)在文本中出现的次数,统计结果显示在标签Label3中。
转载请注明原文地址:https://kaotiyun.com/show/POUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下关于变量作用域的叙述中错误的是
有如下语句序列:Dima,bAsIntegerPrintaPrintb执行以上语句序列,下列叙述中错误的是
设有如下通用过程:PublicFunctionFun(xStrAsString)AsStringDimtStrAsString,strLAsIntegertStr="":strL=Len(xStr)i=strL/2
下面循环语句中在任何情况下都至少执行一次循环体的是
软件需求分析阶段的工作,可以分为四个方面:需求获取、编写需求规格说明书、需求评审和()。
关于自定义数据类型,下面叙述中不正确的是()。
软件按功能可以分为应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是()。
将E—R图转换为关系模式时,实体和联系都可以表示为()。
下面的程序执行时,将把当前目录下的顺序文件smtextl.txt的内容读入内存,并在文本框Text1中显示出来。在横线处应填写()。PrivmeSubCommand1_Click()DiminDataAsString
不能正确表示条件“两个整型变量A和B之一为0,但不能同时为0”的布尔表达式是()。
随机试题
你和一个私交甚好的朋友同在一个微信群里,这个朋友经常在群里转发一些不实的消息或文章,你怎么劝阻?
中国的高考神校都出在底层,大城市反倒不行,因为优越就缺乏动力。衡水中学所处地区不算富裕,安徽六安毛坦厂更是山中灯火,黄冈中学也曾发力造就过辉煌,这些学校都有一个“拼”字,都有一套异于常规的手段,将不谙世事的孩子们推向喜马拉雅山脉,让他们出人头地,一览众山小
2005年3月5日,A房地产开发公司(以下简称“A公司”)与B银行签订借款合同。该借款合同约定:借款总额为2亿元;借款期限为2年6个月;借款利率为年利率5.8%,2年6个月应付利息在发放借款之日预先一次从借款本金中扣除;借款期满时一次全额归还所借款项;借款
保和丸主要用于
青霉素的最严重不良反应是
陆某平素身体状况良好,在2006年3月被医院诊断为胆结石,2008年12月因患感冒引发胆囊炎。2010年1月2日入省医院肝胆科拟行手术治疗。住院后经全面体检,证明病人营养良好,无心脏及脑血管等疾病,可以施行手术。1月18日在静脉麻醉下采用腹腔镜行胆囊结石取
减刑
已知图示T形截面梁上的弯矩M=3.1kN.m,截面对z轴的惯性矩Iz=53.1×10-6m4,则中性轴以上部分截面的正应力构成的总压力为()。
()是本级行政区的政治、行政核心,也是区内重要的城镇。
会计政策变更的内容和理由应在()中披露。
最新回复
(
0
)