首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp,窗体如图所示。程序功能如下: ①单击“读数据”按钮,则考生文件夹下in4.dat文件的内容(该文件中仅含有字母和空格)在Text1文本框中显示。 ②在Text1中选取部分文本,单击“统计”按钮,
在考生文件夹下有一个工程文件sjt4.vbp,窗体如图所示。程序功能如下: ①单击“读数据”按钮,则考生文件夹下in4.dat文件的内容(该文件中仅含有字母和空格)在Text1文本框中显示。 ②在Text1中选取部分文本,单击“统计”按钮,
admin
2015-08-12
35
问题
在考生文件夹下有一个工程文件sjt4.vbp,窗体如图所示。程序功能如下:
①单击“读数据”按钮,则考生文件夹下in4.dat文件的内容(该文件中仅含有字母和空格)在Text1文本框中显示。
②在Text1中选取部分文本,单击“统计”按钮,则以不区分大小写字母的方式,自动统计选中文本中单词“the”出现的次数,并将统计结果显示在Text2文本框内。
请将“统计”按钮的Click事件过程中的注释符去掉,把“?”改为正确的内容,以实现上述功能。
*注意:考生不得修改窗体文件中已经存在的控件和程序,最后将程序按原文件名进行存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码如下: option Base 1 Dim s Ad string Private Sub Command1_C3ick() Open App.Path&"\in4?dat"For Input As #1 s=Input(LOF(1),#1) Close#1 Text1.Text=s End Sub Private Sub Command2_Click() Dim m As Integer ’If Len(s)=?Then MsgBox"请先使用‘读数据’功能!" Else ’If Text1.?=0 Then MsgBox"请先选中文本!" Else t="" For i=1 To Text1.SelLength c=Mid(Text1.SelText,i,1) If c<>""Then t=t+c Else ’If?="the" Then m=m+1 End If t="" End If Next i ’?=Str(m) End If End If End Sub 参考答案: 第1个?处填入:0 第2个?处填入:SelLength 第3个?处填入:kase$(t) 第4个?处填入:Text2 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
单击“读数据”按钮,运用文件操作将考生文件夹下in4.dat文件的内容显示在Text1文本框中。在Command2_Click事件过程中,否则运用Len()函数判断文本框中是否有字符,如果Len(s)=0那么弹出MsgBox对话框“请先使用‘读数据’功能!”,否则运用SelLength属性判断文本框中是否有字符被选中,如果SelLength属性0,那么弹出MsgBox对话框“请先选中文本!”。
在Text中选中部分文本,并单击“统计”按钮,通过LCase函数使统计不区分大小写字母,判断选中文本中是否出现单词“the”,并统计这个单词的出现的次数,将结果显示在Text2文本框内。
转载请注明原文地址:https://kaotiyun.com/show/bSQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序段的执行结果为a="ABBACDDCBA"ForI=6To2Step-2x=Mid(a,I,I)y=Leh(a,I)z=Right(a,I)z=x&y&
以下控件可作为其他控件容器的是
对象的属性用来描述对象的特征和状态,它们是一组
结构化程序设计的一种基本方法是
文件的打开和关闭语句分别是【】和【】。
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()c=1234c1=Trim(Str(C))Fori=1To4
下列程序段的执行结果为DimM(10)Fork=1To10M(k)=11-kNextkx=6PrintM(2+M(x))
从键盘上输入两个字符串,分别保存在变量str1、str2中。确定第二个字符串在第一个字符串中起始位置的函数是
以下控件可以用来实现定时地执行某段代码的是______。
随机试题
以下各项措施中可以提高投资报酬率的是()
牡蛎散用于
患者,男,16岁。左右上1冠折,已行根管治疗。下列选项中,最合适的模型材料
痈肿疮毒,咽喉肿痛,毒蛇咬伤疟疾寒热
建筑产品生产的单件性要求每一个建筑产品都要根据其特定的要求进行施工,其表现包括()。
下列()贸易行为应填写出口货物报关单。
面对一棵大树,一位教授算了两笔不同的账:算法一,一棵正常生长50年的大树,按当时市价计算最高能卖2000元。算法二,从大树生产氧气,减少大气污染,涵养水源,为鸟类与其它动物提供栖息环境的生态效益计算,其价值最低为130万元,该教授的算法二强调了:
高水平运动员在安静状态下,单位体积的红细胞数较一般人( )
(2007上系分)包过滤防火墙通过______来确定数据包是否能通过。
英文缩写CAM的中文意思是
最新回复
(
0
)