首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件Sjt4.vbp。程序的功能是:程序运行时,文本框中显示一篇英文短文,单击“查找”按钮时可输入查找内容,如图1所示。 若未找到查找内容,查找结束;若找到查找内容,被找到的内容在文本框中以反相显示(即呈选中状态),每找到
在考生文件夹下有一个工程文件Sjt4.vbp。程序的功能是:程序运行时,文本框中显示一篇英文短文,单击“查找”按钮时可输入查找内容,如图1所示。 若未找到查找内容,查找结束;若找到查找内容,被找到的内容在文本框中以反相显示(即呈选中状态),每找到
admin
2018-12-20
43
问题
在考生文件夹下有一个工程文件Sjt4.vbp。程序的功能是:程序运行时,文本框中显示一篇英文短文,单击“查找”按钮时可输入查找内容,如图1所示。
若未找到查找内容,查找结束;若找到查找内容,被找到的内容在文本框中以反相显示(即呈选中状态),每找到一次都给出提示,并在左下角文本框中显示累计的次数,如图2所示,若单击提示对话框的“是”按钮,则继续向后查找;若单击“否”按钮,则终止查找。
在给出的窗体文件中已经有了全部控件,但程序不完整。请将事件过程中的注释符去掉,把?改为正确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后将程序按原文件名存盘。
选项
答案
步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Private Sub Commandl_Click() Dim fstr As String,ostr As String Dim times As Integer,pos As Integer Dim ans As Integer fstr=InputBox(”输入待查内容”,”查找”) If fstr=“”Then Exit Sub End If times=0 ostr=Text1.Text pos=InStr(1,ostr,fstr) Db While pos<>0 Text1.SelStart=? Text1.SelLength=? times=? Text2.Text=times ans=MsgBox(”找到了,是否继续查找?”,vbYesNO) If ans==vbYes Then pos=pos+Len(fstr) pos=? Else Exit Do End If Loop End Sub 程序结束 第1个?处填:pos-1 第2个?处填:Len(fstr) 第3个?处填:times+1 第4个?处填:InStr(pos,ostr,fstr) 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
本题主要考察文本框控件属性的使用,包括SelLength属性和SelStart属性。其中SelStart属性为定义当前选择的文本的起始位置。0表示选择的开始位置在第一个字符之前,1表示从第二个字符之前开始选择,以此类推;SelLength属性为当前选中的字符数,可以在程序中把该属性设置为一个整数值。还有就是字符串匹配函数InStr的用法。
转载请注明原文地址:https://kaotiyun.com/show/v5Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程:PrivateSubCommand1_Click() s=0 Fori=1To15 x=2*i-1 IfxMod
阅读程序:OptionBase1PrivateSubForm_Click()Dima(3,3)AsIntegerFori=1To3Forj=1To3a(
以下不能用形状控件画出的图形是
标准模块中有如下程序代码:PublicxAsInteger,yAsIntegerSubvar_pub() x=10∶y=20EndSub在窗体上有1个命令按钮,并有如下事件过程:PrivateSubCommand1_Clic
要求如果x被7除余2,则输出x的值,下列语句中不能实现此功能的语句是( )。
软件按功能可以分为:应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是( )。
下面描述中不属于数据库系统特点的是
下面不能作为结构化方法软件需求分析工具的是()。
下面属于黑盒测试方法的是
下面不能作为结构化方法软件需求分析工具的是
随机试题
肾病综合征患儿最常见的并发症是()。
临床上行输精管结扎术常用的部位是
流行病学的病因定义为
常用的余热处理钢筋级别为Ⅲ级,强度等级代号为()。
收款人根据购销合同发货后委托银行向异地付款人收取款项,付款人向银行承兑付款,这种结算方式称为()结算方式。
当收益额选取企业的净利润,而资本化率选择净资产收益率时,直接资本化的结果应为企业的()。
非公开增发的对象主要是针对()。
肾病综合征临床特点是()。
马克思主义中国化就是将马克思主义基本原理同中国具体实际相结合,不断形成具有中国特色的马克思主义理论成果的过程。具体地说,就是()。
在质量控制过程中,经常会使用一些工具和方法。______(1)是一种基于80/20原理,用于找出影响项目产品或服务质量的主要因素的方法。_______(2)不属于质量控制活动。(2)
最新回复
(
0
)